Das Notes Forum
Domino 9 und frühere Versionen => Entwicklung => Thema gestartet von: mgeidl am 22.07.03 - 15:22:57
-
Hallöchen!
Ich hab in einer Maske unter LS (eh aus dem Forum) die Prüfung, ob ein Dokument gerade bearbeitet wird. Nun müsste aber beim Queryclose zusätzlich noch eingebaut werden, dass das Dokument als gelesen markiert werden soll, denn wenn das Doku geöffnet wird, wird ins Lock-Feld der Name reingeschrieben, d.h. wenigstens ein Feld im Dokument wurde bearbeitet.
Einem Kollegen aus England ist das aufgefallen und er rätselt nun, warum ein Dokument, das er gerade gelesen hat, nach F9 wieder als ungelesen markiert ist.
Kann mir da jemand weiterhelfen?
Sub Queryclose(Source As Notesuidocument, Continue As Variant)
If strNewDoc="New" Then '(exit if it's a new doc.Set this variable to New in postopen if it's a new doc)
Exit Sub
End If
Dim session As New NotesSession
Dim nnUserName As New NotesName(session.UserName)
If (Strcomp(nnUserName.Common,Source.FieldGetText("Lock"),5)=0) Then
Set docBackend=Source.document
docBackend.Lock=""
Call docBackend.Save(True, True)
End If
End Sub
-
Die problematische Zeile ist
Call docBackend.Save(True, True)
Werden Doks im Backend gespeichert, gelten sie als ungelesen.
NotesDocument.Save hat dafür den vergessenen dritten Parameter - True setzt das gespeicherte Dok für den Speicherer auf gelesen.
HTH,
Bernhard
PS: Warum steht denn der zweite Parameter auf True (CreateResponse) ?
-
????
Keine Ahnung, den Code hab ich hier aus dem Forum, sollte der auf (true, false) stehen????
Sag mal Bernhard, was ich schon wissen wollte, was heisst eigentlich dein HTH???
lg
Marietta
-
Dein Problem löst
NotesDocument.Save (True, False, True)
Ist (logischerweise) in der DesignerHelp gut erklärt.
Hope That Helps ;-)
Bernhard
-
Danke!
Du hast mir sehr geholfen!!!
Marietta