I can not copy/past an Extended ACL from one database to an other

HCL Domino Domino Forum
1

When I copy/past an ACL, the ACL is updated but not the extended ACL. Has anyone done this or is there a workaround I can use?

2

Subject: I can not copy/past an Extended ACL from one database to an other.

Copy and paste this code into an agent and edit it to reflect your target db and your source db. Once ran, this agent will copy the acl of the source db to the target db.

Dim s As New NotesSession

Dim acl1 As NotesACL

Dim acl2 As NotesACL

Dim newentry As NotesACLEntry

Dim testentry As NotesACLEntry

Dim entry As NotesACLEntry

Dim targetDb As New NotesDatabase( “”, “” )

Dim sourceDb As New NotesDatabase( “”, “” )

Call targetDb.Open(“”, “” )

Call sourceDb.Open(“”, “” )

Set acl1 = targetDb.ACL

Set acl2 = sourceDb.ACL

Set entry = acl2.GetFirstEntry

While Not (entry Is Nothing)

Set testentry = acl1.GetEntry( entry.name)

If (testentry Is Nothing) Then

Set newentry = acl1.CreateACLEntry ( entry.name, entry.level )

newentry.UserType = entry.UserType

End If

Set entry = acl2.GetNextEntry( entry )

Wend

Call acl1.Save

hth,

Heather Smith

3

Subject: RE: I can not copy/past an Extended ACL from one database to an other.

Thx, but this script will copy an ACL from one Db to an other. You can do this in ND6 by default via the Admin Client. What I need is a complete ACL copy including the Extended ACL.