IBM Lotus Domino Designer 8.5
  Versions 8.5 and 8.5.1

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

---

Library | Support | Terms of use |

Last updated: Monday, October 5, 2009