LOTUSSCRIPT/COM/OLE CLASSES
Sub Initialize Dim session As New NotesSession If Isempty(session.UserGroupNameList) Then message$ = "None" Else Forall group In session.UserGroupNameList message$ = message$ & group.Abbreviated & Chr(10) End Forall End If Messagebox message$,, "User group name list" End Sub
See Also