AccessTr.neT

Sayın Üstadlar ve arkadaşlar
ekteki çalışmamda asker adılı uygulamamda Askerler3 adlı forma asker isimlerini ve tüfek seri numaralarını girmekteyim.amacım şu Askerler3 Formuna yeni kayıt girerken aynı asker ismini ve tüfek seri numarasını ikinci kez yazdığımda kaydedirken bana "mükerrer kayıt "uyarısı verebilir mi? İyi geceler.

Not"Tüfek seri nosunu girdikten sonra uyarı vermesini istiyorum"

lütfen sorularınız uygun başlık altına -access soruları ve cevapları- altına açalım, Access örnekleri kısmında sorulan sorular dikkatten kaçabilir

mükerrer varsa, uyarı verdikten sonra kayıt istenirse kayıt yapılabilir mi yoksa hiçbir koşulda kayda izin verilmeyecek mi?

(14/06/2022, 11:02)berduş yazdı: [ -> ]mükerrer varsa, uyarı verdikten sonra kayıt istenirse kayıt yapılabilir mi yoksa hiçbir koşulda kayda izin verilmeyecek mi?

Hocam mükerre kayıt girdiniz devam etmek istiyormusnuz evet-hayır olacak.Evet tıklanırsa kayıda devam hayır tıklanırsa kayıda izin yok.

aşağıdaki kodu dener misiniz?

Private Sub Form_BeforeUpdate(Cancel As Integer)

x = DCount("*", "askerler3", "[adi]='" & Me.adi & "' and [Tufek_Seri_No]=" & Me.Tufek_Seri_No)

If x > 0 Then Sonuc = MsgBox("Mükerrer Kayıt! Yine de eklemek istiyor musunuz?", vbQuestion + vbYesNo + vbDefaultButton2, "Mükerrer Kayıt Uyarısı")

If Sonuc = vbNo Then Undo

End Sub

Tesekkur ederim saolun Kod Çalıştı