By submitting your email address, you agree to receive emails regarding relevant topic offers from TechTarget and its partners. You can withdraw your consent at any time. Contact TechTarget at 275 Grove Street, Newton, MA.
finds all NSF and NTF files and ensures the admin group is listed as manager in
Dim session As New notessession
Set directory = New NotesDbDirectory( "" )
While Not (db Is Nothing)
Call db.Open( "", "" )
Call db.GrantAccess( "$NotesAdminGlobal",ACLLEVEL_MANAGER )
Set db = directory.getnextdatabase