Home
HCL Domino Designer Basic User Guide and Reference
Basic product usage information and programming language reference information.
LotusScript/COM/OLE Classes
LotusScript® Classes A-Z
This documentation lists each class, property, and method in the Domino® class library. Each class is followed by an alphabetical listing of the properties for that class and an alphabetical listing of the methods for that class. To find the property or method you want, turn to the class to which the property or method belongs.
NotesACLEntry (LotusScript®)
Represents a single entry in an access control list. An entry may be for a person, a group, or a server.
EnableRole (NotesACLEntry - LotusScript®)
Given the name of a role, enables the role for an entry.
Examples: EnableRole method

Examples: EnableRole method

This script enables the Auditor role for Bill Ehrhardt, in the database DISCUSS.NSF.

Dim db As New NotesDatabase _
("Reykjavik", "data\discuss.nsf")
Dim acl As NotesACL
Dim entry As NotesACLEntry
Set acl = db.ACL
Set entry = acl.GetEntry( "Bill Ehrhardt/East/ACME" )
Call entry.EnableRole( "Auditor" )
Call acl.Save

This sub enables one role for multiple people in an ACL. Its parameters are a NotesACL object, the name of the role to enable, and an array of strings that represent user names.

Sub enablePeople( acl As NotesACL, _
role As String, names As Variant )
  Dim person As NotesACLEntry
  Forall n In names
    Set person = acl.GetEntry( n )
    If ( person.Level = ACLLEVEL_NOACCESS ) Then
      Set person = New NotesACLEntry _
      ( acl, n, ACLLEVEL_AUTHOR )
      Call acl.Save
    End If
    Call person.EnableRole( role )
  End Forall
  Call acl.Save
End Sub