Domino 9 und frühere Versionen > ND6: Entwicklung

Maske nicht schließen

(1/2) > >>

Wiesel:
Hallo!

Wie sage ich es Notes, dass wenn ich auf "nein" klicke, dass es in der Maske stehen bleiben soll und diese nicht schließt?

Ich habe folgenden Script dazu:

Sub Querysave(Source As Notesuidocument, Continue As Variant)
   Dim readflag As Integer
   If Source.FieldGettext("txtStatus") = "in Erstellung" Then
      readflag = Msgbox("Möchten Sie die Anforderung ohne Weiterleitung speichern?",20, "Hinweise")
      If readflag = 7 Then
         End
      End If
   End If
End Sub

Egal, was ich mache, das Dokument wird trotzdem geschlossen.

Danke und Gruß,
Wiesel

diali:
Continue = False

Thomas Schulte:
Continue = False setzen Dann funktioniert das auch

Wiesel:
Sub Querysave(Source As Notesuidocument, Continue As Variant)
   Dim readflag As Integer
   If Source.FieldGettext("txtStatus") = "in Erstellung" Then
      readflag = Msgbox("Möchten Sie die Anforderung ohne Weiterleitung speichern?",20, "Hinweise")
      If readflag = 7 Then
         Continue = False
      End If
   End If
End Sub

Hab ich auch schon gemacht, funzt nicht. Notes schließt trotzdem das Dokument.

diali:
dann darfst Du es nicht im QuerySave abfangen sondern im QueryClose.

Navigation

[0] Themen-Index

[#] Nächste Seite