+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Kayıt Bul Butonu Hatası (/konu-kayit-bul-butonu-hatasi.html)
Kayıt Bul Butonu Hatası - 1tk - 17/12/2017
iyi günler arkadaşlar,
ekteki çalışmamda; ana tablo kayıt ekranında verileri girdiğimde öğrenci adı soyadı, öğrenci okul numarası ve öğrenci cep telefonu numaralarını kontrol ederek mükerrer kayıt yapılmasını engellemek istiyorum. bu arada yıllar sonra aynı okul numarasının başka bir öğrenciye verilebilecek olduğunu da göz önünde bulundurmamız gerekir.
Cvp: Kayıt Bul Butonu Hatası - direnist - 18/12/2017
Merhaba;
Aşağıdaki kodu Öğrenci Adı Soyadı metin kutusunun Güncelleştirme Sonrası olay yordamına eklemeniz durumunda aynı isimde bir kayıt var ise bir uyarı mesajı verip kaydı geri alır ve mükerrer kayıt yapılmasını önler.
Kodu inceleyerek, araştırarak aynı mantık ile diğer alanlara sizde uygulayabilirsiniz.
İyi çalışmalar.
Dim OgrenciAdSoyad_Adet As Byte
OgrenciAdSoyad_Adet = DCount("[Öğrencinin Adı Soyadı]", "Ana_Tablo")
If OgrenciAdSoyad_Adet > 0 Then
MsgBox "Bu isimli öğrenci zaten kayıtlı. Tekrar kaydedemezsiniz..!"
Me.Undo
Exit Sub
End IfCvp: Kayıt Bul Butonu Hatası - 1tk - 18/12/2017
sn. direnist
öneriniz için teşekkürler. çalışmama uyguladım ve başarılı ancak; veli kayıtları farklı olsa bile aynı isimli ögrenci adını kaydetmiyor. kod yazımını hiç bilmediğimden işin içinden çıkamıyorum. buradaki püf noktası bütün kayıtlardaki bilgilerin aynı olması yani mükerrer kayıt yapmamak üzerine idi.
Cvp: Kayıt Bul Butonu Hatası - direnist - 19/12/2017
Merhaba;
Ekli örneği inceler misiniz?
Cvp: Kayıt Bul Butonu Hatası - 1tk - 19/12/2017
(19/12/2017, 00:06)direnist yazdı: Merhaba;
Ekli örneği inceler misiniz?
sn. direnist emeğinize sağlık güzel olmuş