weißt Du was hoch interessant ist? Hab' den Agenten jetzt so eingestellt (Auswahl aus der Liste der Agenten) - und im Aufruf den Namen auch in die eckigen Klammern gesetzt. => Der Agent läuft nicht. Mache ich es eigentlich falsch (heißt ohne Klammer) läuft er.
Lasse zum Testen jetzt ein ganz normales Textfeld ändern - Agent läuft durch, Feldinhalt wird nicht geändert.
Dim session As New NotesSession
Dim db As NotesDatabase
Dim col As NotesDocumentCollection
Dim doc As NotesDocument
Set db=session.CurrentDatabase
Set col=db.UnprocessedDocuments
Set doc=col.GetFirstDocument
test=Evaluate( { @IsMember("[Daten]";@userroles) } )
If test(0)=1 Then
doc.Subject="Test"
End If
Print doc.Subject(0)
print schreibt "Test" - mein Dokument hat aber den ursprünglichen Eintrag. Das Speichern passiert laut Dokumenteigenschaften. Auch ein Aktualisieren der Seite bringt nichts.
Der User hat Managerrechte, die richtige Rolle - mit der Maske darf jeder schreiben.
Das macht keinen Spaß. Ich mache morgen früh weiter.
Gute Nacht
Barbara