#6
(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.GoToRecord , , , Me.idnumuneadi
Else
End If
Else
End If
| Bu Konudaki Yorumlar |
|
form üzerinde benzer kayıt uyarısı - Yazar: metehan16 - 24/01/2013, 16:08
Cvp: form üzerinde benzer kayıt uyarısı - Yazar: ozanakkaya - 24/01/2013, 20:11
Cvp: form üzerinde benzer kayıt uyarısı - Yazar: metehan16 - 24/01/2013, 20:28
Cvp: form üzerinde benzer kayıt uyarısı - Yazar: ozanakkaya - 24/01/2013, 20:51
Cvp: form üzerinde benzer kayıt uyarısı - Yazar: metehan16 - 24/01/2013, 21:36
Cvp: form üzerinde benzer kayıt uyarısı - Yazar: access_delisi - 26/01/2013, 23:02
Cvp: form üzerinde benzer kayıt uyarısı - Yazar: metehan16 - 26/01/2013, 23:25
|
