wenn du die DB lokal hast, dann kannst du die ACL einer anderen DB in die nicht zugängliche kopieren. Hab da mal vor einiger Zeit eine Funktion gefunden (weiß leider nicht mehr, wo):
Declare Function NSFDbOpen Lib "nnotes.dll" (Byval PathName As String, rethDB As Long) As Integer
Declare Function NSFDbClose Lib "nnotes.dll" (Byval rethDB As Long) As Integer
Declare Function NSFDbCopyACL Lib "nnotes.dll" (Byval hSrcDB As Long, Byval hDstDB As Long) As Integer
Sub CopyACL(sourceServer As String, sourcePath As String, targetPath As String)
Dim hSourceDb As Long, hTargetDb As Long, result As Integer
If (sourceServer <> "") Then sourcePath = sourceServer + "!!" + sourcePath
result = NSFDbOpen (sourcePath, hSourceDb)
result = result + NSFDbOpen (targetPath, hTargetDb)
If (result = 0) Then result = NSFDbCopyACL (hSourceDb, hTargetDb)
If hTargetDb <> 0 Then Call NSFDbClose (hTargetDb)
If hSourceDb <> 0 Then Call NSFDbClose (hSourceDb)
End Sub
