| mouse up, mousedown, Cursor schieben | Greiff | 21.01.14 00:17
| | └ RE: mouse up, mousedown, Cursor schieben | StefanWirrer | 21.01.14 08:57
| | └ RE: mouse up, mousedown, Cursor schieben | Greiff | 21.01.14 10:04
| | └ RE: mouse up, mousedown, Cursor schieben | StefanWirrer | 22.01.14 10:20
| | └ 3/4 gelöst, mouse up, mousedown, Cursor sc... | Greiff | 22.01.14 23:10
|
| |
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
| |
|
