Examples: Generation property (NotesName - LotusScript®)

This agent creates a hierarchical name then displays its generation component.

Sub Initialize
  Dim session As New NotesSession
  Dim nam As NotesName
  REM Create a hierarchical name
  Set nam = session.CreateName( _
  "CN=John B Goode Jr/OU=Sales/OU=East/O=Acme/C=US/S=Goode/G=John/I=B/Q=Jr")
  REM Returns "Jr"
  Messagebox nam.Generation,, "Generation"
End Sub