Examples: Abbreviated property

This agent creates a canonical hierarchical name then displays it in abbreviated format.

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 "John B Goode/Sales/East/Acme/US"
  Messagebox nam.Abbreviated,, "Abbreviated name"
End Sub