Zugriffsprobleme in Datenbank

[Fbaum]

Hallo miteinander,
folgendes Probelm...
Ich habe eine Datenbank gemacht, um Volagen öffentlich zu machen.
Nun habe ich die Zugriffsrechte so verteilt, daß 5 Leute auf diese Datenbank Zugriff haben. 4 Davon dürfen Dokumente nicht löschen. Ich habe diese 4 als EDITOR angelegt mit der deaktivierten Option "Dokumente löschen". Trotzdem können diese 4 Dokumente löschen. Gibt es irgendeine Einstellung in ner Maske oder Ansicht, wo das nochmal eingestellt werden kann?
Danke für Eure Hilfe.
Gruß Frank

[Till_21]

Hi Fbaum,
arbeite doch einfach mit autorfeldern in den masken...
dann legst du in der acl eine Rolle [Schreibrechte] an, und füllst das Autorfeld der Maske dann.
Deine 4 User sollten natürlich die Rolle inne haben..
Gruss Till

[Fbaum]

Hallo,
das mit den Schreibrechten funktioniert ja. Habe das mit ner Rolle definiert. Es geht jetzt nur darum, daß in der Ansicht die Dokumente gelöscht werden können was nicht sein darf.
Ich weiß nicht, wo ich die Rolle [LÖSCHEN] einbinden kann. In einer Ansicht geht das nicht...
Also [ERSTELLEN]-Rolle funktioniert.
Gruß Frank

[Till_21]

achso, sorry. Unter ressourcen/ others / database script
überprüfst du am besten im querydocumentdelete event ob der benutzer ausreichend rechte besitz.
dies erfolgt über ls.
bei fragen -> posten...
Till

[Fbaum]

aha...
also in der Option steht bei mir nur folgendes:

Sub Querydocumentdelete(Source As Notesuidatabase, Continue As Variant)

End Sub

Kannst Du mir sagen, was da rein muß?

[Till_21]

probiers mal hiermit :

Sub Querydocumentdelete(Source As Notesuidatabase, Continue As Variant)
     loeschrechte = Evaluate( |@if(@ismember("[XXXXXX]";@userroles))| )
     If ibm(0) = 1 Then
           continue = True
     Else
           continue = False
           Msgbox "Sie besitzen nicht ausreichend rechte um dokumente zu löschen"
     End If
End Sub


wobei XXXXX deine Rolle ist.

Gruss Till

[Till_21]

Sub Querydocumentdelete(Source As Notesuidatabase, Continue As Variant)
     loeschrechte = Evaluate( |@if(@ismember("[XXXXXX]";@userroles))| )
     If loeschrechte(0) = 1 Then
           continue = True
     Else
           continue = False
           Msgbox "Sie besitzen nicht ausreichend rechte um dokumente zu löschen"
     End If
End Sub

[Fbaum]

Also wenn ich das richtig verstanden habe muß ich im ACL eine Rolle [LÖSCHEN] erstellen und dies dann anstelle der XXXXX eintragen?

[Till_21]

yep

[Fbaum]

Ja, funktioniert !!!
Leider kann ich jetzt nicht mehr das Recht zum Löschen geben. Ich kann die Rolle [LÖSCHEN] aktivieren oder auch nicht. Es kommt jedes mal die Meldung, daß ich nicht berechtigt bin...

[Fbaum]

UIUIUIUI...Sorry...hatte Schreibfehler drin... Funktioniert jetzt !!!!

Vielen Dank für Deine Hilfe !!!!