Domino Code Fragment

Code Name*
Detecting Roles in Script
Date*
11/10/1999
Source (or email address if you prefer)*
Ben Vander Veen
IP address:.18.223.124.244
Description*
Type*
LotusScript
Categories*
Security
Implementation:
None (plug and play)
Required Client:
(none)
Server:
(none)
Limitations:
Comments:
Files/Graphics attachments (if applicable): Code:
Dim roles as Variant

roles = Evaluate("@UserRoles")
'using evaluate("@UserRoles") you will be able to retrieve all the roles the user has for the database. It is then a matter of just going through the values.

Forall values in Roles
'do whatever ....
end forall