Regular
Beiträge: 86
Ort: Saarland | Hallo,
ich würde es so machen:
1. Du schreibst eine kleine VBA Funktion im Formular, die die Checks macht, z.B so
function DoChecks as boolean
if isnull(txtFeld1) or isnull(txtfeld2) then
doChecks=false
elseif dcount("*","AbfDublikate","feld1=" & txtFeld1 & " and feld2=" & txtfeld2 & ")>0 then
doChecks=false
else
doChecks=true
endif
end function
dann brauchst Du die Funktion nur noch an den richtigen Stellen per Ereignisprozedur aufzurufen:
1. beim entladen:
form_unload(cancel as integer)
if not doChecks then
cancel=true
msgbox "Bitte beide Werte eindeutig angeben"
endif
end Sub
2. Vor Aktualisierung
ich hoffe das hilf
viele Grüße, bin auch aus dem Saarland
wilo
|
Fehler abfangen und beheben