Determine the current user's access to a database

Use this code to find out what the current user's access is to the current database. You could use this with any database, just set the "db" to any database

Dim session As New NotesSession

Dim db as NotesDatabase
Set db = session.CurrentDatabase
Dim dbAL As Integer
dbAL = db.CurrentAccessLevel
If dbAL >= 4 Then
	'User has Editor access or more
	'User has Author access or less
End If


Posted by fbrefere001 on Wednesday March 27, 2002