form üzerinden tekrarlayan kaydı açma

25/01/2013, 01:16

metehan16

(24/01/2013, 20:51)ozanakkaya yazdı: kodu aşağıdaki ile değiştirip "numuneadid" metin kutusundaki veriyi sorgulat.

If Dlookup ("[idnumuneadi]", "tbl_numadi", "[numuneadi]=" & "'" & Me.numuneadid & "'") > 0 Then 'Form_frm_numadi.numuneadi
If MsgBox("Aynı kayıt var Yinede Kaydetmek İstiyormusunuz", vbCritical + vbYesNo, "Kayıt Tekrarı") = vbNo Then
Me.Undo
'Docmd.goto....*burada yukarıda eşit olan kayda gitsin istiyorum
Else
End If
Else
End If


iyi geceler sayın arkadaşlar
yukarıdaki kodla bir kayıtla benzer kayıt varsa uyarı verme işini ozanhocam çözdü.

şimdi ise msj vbno dediğimde benzer kayda gitsin istiyorum.

bende fazla oluyorum ama kusuruma bakmayacağınızı umuyorum
teşekkür ediyorum.
25/01/2013, 16:07

QATLET

umarım talebinize uygun olmuştur.
26/01/2013, 11:03

metehan16

(25/01/2013, 16:07)QATLET yazdı: umarım talebinize uygun olmuştur.

sayın qatlet ilginize teşekkürler bu benim düşündüğümden biraz farklı olmuş ,
benim istediğim msj a no dediğimde açık formda benzer olan kayda gidebilirmiyim??
05/02/2013, 00:29

metehan16

arkadaşlar konuyu çözüme ulaştırdım.
ufuk hocama ve accesstr ailesine sonsuz teşekkürler

çözülm örnekteki gibidir.

konu çözülmüştür.