LOTUSSCRIPT/COM/OLE CLASSES
Examples: NotesDirectory class
1. This LotusScript agent gets the value in the item "email" of the first instance of the name "John" in the view "Contacts" in the directory on the default server.
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. This LotusScript agent gets the values in the items "email" and "ShortName" of the first instances of the names "Anne", "Bob", and "Carlos" in the view "Contacts" in the directory on the default server.
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
Glossary
Feedback on
Help
or
Product Usability
?
Help on Help
All Help Contents
Glossary