LOTUSSCRIPT/COM/OLE CLASSES
Private Sub UserNameObject_Click() Dim s As New NotesSession s.Initialize MsgBox s.UserNameObject.Common, , "Common user name" End Sub
See Also