GetFirstItem:获取文档中指定名字的域
Dim doc As NotesDocument
Dim item As NotesItem
Set item = doc.GetFirstItem( "Subject" )
If ( item Is Nothing ) Then
Messagebox( "No Subject item on the document." )
Else
Messagebox( "The Subject item on the document has the value: " + item.Text ) ’获取域对应的值
End If
GetItemValue:获取文档中指定域的值
subj = doc.GetItemValue( "Subject" )
添加新评论0 条评论