Examples: Roles property (NotesACLEntry - LotusScript®)

This script displays all the roles that are enabled for Bob Kidder. For example, the script might display "[Project Leader]" and "[Writer]."

Dim session As New NotesSession
Dim db As NotesDatabase
Dim acl As NotesACL
Dim entry As NotesACLEntry
Set db = session.CurrentDatabase
Set acl = db.ACL
Set entry = acl.GetEntry( "Bob Kidder/East/ACME" )
Forall r In entry.Roles
  Messagebox( r )
End Forall