Examples: UserGroupNameList property
This agent gets the user group name list for the current session.
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