Examples: Language property (NotesName - LotusScript®)

This agent creates a hierarchical name with a language then displays its language.

Sub Initialize
  Dim session As New NotesSession
  Dim nam As NotesName
  REM Create a hierarchical name with a language
  Set nam = session.CreateName( _
  "CN=John B Goode/OU=Sales/OU=East/O=Acme/C=US", "fr-CA")
  REM Returns "fr-CA"
  Messagebox nam.Language,, "Language"
End Sub