Examples: Addr822LocalPart property

This agent creates an Internet name then displays the RFC 822 LocalPart component.

Sub Initialize
  Dim session As New NotesSession
  Dim nam As NotesName
  REM Create an internet name
  Set nam = session.CreateName( _
  {"John B Goode" <jbg@us.acme.com> (Guitars) (Music) (East)})
  REM Returns "jbg"
  Messagebox nam.Addr822LocalPart,, "Addr822LocalPart"
End Sub