Manage Learn to apply best practices and optimize your operations.

UserRoles in LotusScript to control rights

In a Navigator, it is not possible to hide an option if the user does have rights to access based on the user roles. It is therefore good to control the execution of this option with the underlying LotusScript.

Code: Sub Click(Source As Button)

Dim URoles As Variant
URole = Evaluate("@UserRoles")
MyRole = ""
Forall ur In URole
  If ur = "[DbAdmin]" Then
     MyRole = "DbAdmin"
     Goto NextStep
  End If
End Forall

NextStep:
If MyRoles = "DbAdmin" Then
  Put your codes here....
Else   
  Beep
  Msgbox "You are not authorised to access this option.", 64, "Not Authorised"
End If
	
End Sub


Dig Deeper on Domino Resources

SearchWindowsServer

Search400

  • Favorite iSeries cheat sheets

    Here you'll find a collection of valuable cheat sheets gathered from across the iSeries/Search400.com community. These cheat ...

  • HTML cheat sheet

    This is a really cool cheat sheet if you're looking to learn more about HTML. You'll find just about everything you every wanted ...

  • Carol Woodbury: Security

    Carol Woodbury

SearchDataCenter

SearchContentManagement

Close