LOTUSSCRIPT /COM/OLE のクラス
例:NotesDirectory クラス
1. 次の LotusScript エージェントは、デフォルトサーバーのディレクトリのビュー「Contacts」にある名前「John」の最初のインスタンスのアイテム「email」値を取得します。
Sub Initialize
Dim s As New NotesSession
Dim direct As NotesDirectory
Dim nav As NotesDirectoryNavigator
Dim value As Variant
Set direct = s.getDirectory
Set nav = direct.LookupNames("Contacts","John","email")
value = nav.GetFirstItemValue
Msgbox "Value:" + Cstr(value(0))
End Sub
2. 次の LotusScript エージェントは、デフォルトサーバーのディレクトリのビュー「Contacts」にある名前「Anne」、「Bob」、「Carlos」の最初のインスタンスのアイテム「email」および「ShortName」の値を取得します。
Sub Initialize
Dim s As New NotesSession
Dim direct As NotesDirectory
Dim nav As NotesDirectoryNavigator
Dim value As Variant
Dim searchArray (1 To 3) As String
Dim itemArray (1 To 2) As String
Set direct = s.getDirectory
searchArray(1) = "Anne"
searchArray(2) = "Bob"
searchArray(3) = "Carlos"
itemArray(1) = "email"
itemArray(2) = "ShortName"
Set nav = direct.LookupNames("Contacts", searchArray, itemArray)
End Sub
用語集
フィードバック
ヘルプ
または
プロダクトユーザビリティ
ヘルプの使い方
すべてのヘルプ項目
用語集