Domino 9 und frühere Versionen > ND6: Entwicklung

dokument nicht schliessen, wenn Eingaben noch fehlen

<< < (3/3)

cfiber:
die Zeile Continue = False steht am Ende, macht es einen Unterschied, wenn ich da noch Exit Sub vor End Sub schreibe?

Axel:
Wenn danach nichts mehr kommt macht es keinen Unterschied. Sehr mysteriös das Ganze.

Wie sieht denn der Code im QuerySave-Event aus? Gibt es noch andere Ecken wo ein Save oder Close ausgelöst werden kann?


Axel

cfiber:
mein code:



--- Code: ---If doc.name(0) = "" Then
Messagebox "Enter the name of the employee."
Call Source.GotoField("name")
Goto dontsave
End If
'andere Sachen, die übersprungen werden
dontsave:
Continue = False
End Sub

--- Ende Code ---

Axel:
Hi,

rein gefühlsmässig sollte das funktionieren. Allerdings ist die Verwendung von Gotos nicht unbedingt ein guter Programmierstil. Man sollte die goto-Anweisung nur dort verwenden, wo es sich unter keinen Umständen vermeiden lässt.

Darum würde ich das Ganze so machen:


--- Code: ---If doc.name(0) = "" Then
  Messagebox "Enter the name of the employee."
  Call Source.GotoField("name")
  Continue = False
  Exit Sub
End If

'andere Sachen, die übersprungen werden

End Sub


--- Ende Code ---

Das Problem was ich bei deinem Code sehe, ist, das eigentlich gar nicht gespeichert wird. Denn auch wenn das Feld gefüllt ist, am Ende des Events Continue aud False gesetzt wird.

Axel

Navigation

[0] Themen-Index

[*] Vorherige Sete