Und was verbirgt sich bei Dir hinter der Konstanten "THE_CONDITION"?... das muß keine Konstante sein - wir würden es aufgrund der Schreibweise als Konstante einschätzen - das kann genauso eine Variable sein...
Für den Platzhalter THE_CONDITION ist jeweils die konkrete Bedingung zu formulieren. Soll das Editieren generell verhindert werden, kann dieser Zweig auch entfallen.
Zwei Beispiele:
If (Source.EditMode = True) And (Source.Document.Status (0) = "Accepted") Then
oder - ohne Bedingung -
If (Source.EditMode = True) ThenCodeSub Postopen (Source As Notesuidocument) 'Prevent editing a document under a certain condition: If (Source.EditMode = True) And (THE_CONDITION) Then Source.EditMode = False 'This triggers the QueryModeChange event ! End If End Sub