“Software zu entwickeln ist ähnlich komplex, wie Autos zu bauen.

Für ihr Auto gibt es Crashtests, wer testet ihre Software?”

» Waidner IT Solutions | Mainz/Wiesbaden | +49 176 10042345
Home » Lotus Notes » Mit LotusScript prüfen, ob ein User eine Rolle hat

Mit LotusScript prüfen, ob ein User eine Rolle hat

Da ich gerade mal wieder mit LotusScript programmiere, und mich ärgere, dass es völlig triviale Funktionen einfach nicht gibt, ein kleiner Tipp aus meiner Basisbibliothek. Wie ermittele ich in LotusScript elegant, ob ein User eine bestimmte Rolle der ACL innehat:

' Prüft, ob der Nutzer die übergebene Rolle hat. Der Rollenname muss ohne []
' übergeben werden.
Public Function hasRole(strRole As String) As Boolean
  Dim varResult
 
  ' =1 User hat die Rolle
  ' =0 User hat die Rolle nicht
  varResult = Evaluate(|@Contains(@UserRoles; "[| + strRole + |]")|)
  If varResult(0) = 0 Then
    hasRole = False
  Else
    hasRole = True
  End If
End Function

Der Aufruf lässt dich dann wunderbar einfach mit

if hasRole(“Admin”) then
  funktionDieRechteBraucht()
else
  funktionDieKeineRechteBraucht()
end if

einbauen. Finde ich extrem lesbar.