Hallo,
ich möchte einen neuen ACL Eintrag (Administratorgruppe) in die Mail Datenbanken per Script einfügen.
Kann ich überhaupt auf Datenbanken, auf die ich kein Zugriff habe die ACL ändern, außer lokal jede DB einzeln zu bearbeiten?
Mein Script sieht so im Moment aus:
Dim dbdir As New NotesDbDirectory("Server")
Dim db As NotesDatabase
Dim acl As NotesACL
Set db = dbdir.GetFirstDatabase(DATABASE)
While Not(db Is Nothing)
If Not ( db.IsOpen ) Then
Call db.Open( "", "" )
End If
Set acl = db.ACL
Dim person As New NotesACLEntry _
( acl, "Administratoren", ACLLEVEL_MANAGER )
Call acl.Save
Msgbox db.Title, , db.FileName
Set db = dbdir.GetNextDatabase
Wend