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 "US\Acme\East\Sales"
 Messagebox nam.Keyword,, "Keyword"
End Sub

See Also

Keyword property

Glossary