Skip to main content

Examples: Addr822Comment2 property

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

Sub Initialize
Dim session As New NotesSession
Dim nam As NotesName
REM Create an internet name
Set nam = session.CreateName( _
{"John B Goode" <[email protected].com> (Guitars) (Music) (East)})
REM Returns "Music"
Messagebox nam.Addr822Comment2,, "Addr822Comment2"
End Sub