LOTUSSCRIPT/COM/OLE CLASSES
Sub Initialize Dim session As New NotesSession Dim nam As NotesName REM Create a hierarchical name Set nam = session.CreateName( _ "CN=John B Goode/OU=Sales/OU=East/O=Acme/C=US") REM Returns "Sales" Messagebox nam.OrgUnit2,, "OrgUnit2" End Sub
See Also