Open ACL in another DB

Hello,I would like to have a button in a database that will allow a user to open an ACL from a different database. Does anyone have some code that can do this?

Thank You!

Steve

Subject: Open ACL in another DB(Code here)

srv := @Name([CN]; @Subset(@DbName; 1));dbpath := Path to your db

@Command([FileOpenDatabase]; srv : dbpath ; “” ; “” ; “” ; “1” );

@PostedCommand([FileDatabaseACL])

HTH John

Subject: RE: Open ACL in another DB(Code here)

Excellent - that works nicely! Should have known to stick with formula :0

Thank you!

Steve

Subject: Open ACL in another DB

Dim ns As New NotesSessionDim db As NotesDatabase

Dim nacl As NotesACL

Dim nacle As NotesACLEntry

Set db = ns.GetDatabase( “”, “” )

Set nacl = db.ACL

Set nacle = nacl.GetFirstEntry

'from there you can leverage properties and functions of the NotesACLEntry class to do pretty much anything.

Subject: RE: Open ACL in another DB

Thanks for your response Andrew! I have been using the NotesACLEntry properties to display the ACL in a message box but was wondering if there was a way to actually open the ACL of another database.