Hallo,
ich habe ein kleines Problem mit meiner Datenbank. Ich möchte das ein Dokument nachdem es angelegt wurde nicht mehr bearbeitbar ist. Dies hab ich einfach mit einem versteckten Feld ("bearbeitungsmodus"="ja" oder "nein") und einer Formel im Querymodesave
Sub Querymodechange(Source As Notesuidocument, Continue As Variant)
If Not Source Is Nothing Then
If Source.Document.bearbeitungsmodus (0) = "1" And Not Source.EditMode Then
Msgbox "Das Dokument wurde freigegeben und ist nicht mehr bearbeitbar.", 48, "Hinweis"
continue = False
End If
End If
End Sub
gemacht. Soweit funktioniert das auch alles, aber nun bekomme ich die Anforderung das das an dem Dokument doch noch Änderungen vorgenommen werden sollen, allerdings ausschließlich über Aktionen. Wie kann ich das Realisieren? Kann ich irgendwie aus dem Script der Aktion eine Variable an das QueryModeChange übergeben die ich abfrgae und dann "continue" auf "true" setze?
Danke schonmal für eure Unterstützung,
Jens
Hi,
Das NotesDocument ist Backend, und hierfür gelten die ganzen QueryOpen, Postopen, QueryModeChange nicht.
Die gibts nur im NotesUIDocument (frontend, "was der User sieht").
Und insofern wirken sie auch nur dafür.
Noch was anders, was macht dein QueryOpenDocument, ich hoff doch zumindest:
Sub Queryopen(Source As Notesuidocument, Mode As Integer, Isnewdoc As Variant, Continue As Variant)
if not Isnewdoc then
if mode=1 then
continue = false
End if
End if
End Sub
oder wenn eine Aktion @Command([EditDocument];1) da ist.
Das ist dann nämlich kein "ModeChange"!
Gruss, Pete(r)