#7
Sayın Puletin çok teşekkür ederim.
Mükerrer Giriş İçin Yardım..
#7
#8
Ben soruyu anlamamışım siz daha ayrıntılı açıkladıktan sonra anlayabildim. Puletin hocam açıklamış bende yapmış olduğum örneği ekleyeyimde boşuna gitmesin 
deneme.rar
(Dosya Boyutu: 18,79 KB | İndirme Sayısı: 82)
AccessTr.Net teknik konular içeren bir sitedir. Bu tip sitelerde en iyi şekilde yardım alabilmeniz için Site Kurallarını mutlaka okumanız ve buna göre hareket etmeniz lazım.
#9
konu Access soruları bölümüne taşınmıştır.
#10
Sayın alpeki99 örneğinizi inceledim. mükerrer kayıt uyarısı verdikten sonra "tamam" dediğimizde yinede kaydı tamamlıyor. Devam etmek isteyip istemediğimizi sormasını, şayet biz istersek kaydetmesini, yoksa etmeden eski haline dönmesini sağlamalıyız.
Son Düzenleme: 12/11/2009, 02:14, Düzenleyen: ercansahin.
#11
metin kutusunun güncelleşme sonrasında olayına aşağıdaki kodu deneyebilirmisin
Kod:
Private Sub txt_babaadi_AfterUpdate()
Dim varmi As Integer
varmi = DCount("*", "tablo1", "[baba adı]= '" & Me.txt_babaadi & "'" & "And [adı]= '" & Me.txt_adi & "'" & "And [soyadı]= '" & Me.txt_soyadi & "'")
If varmi > 0 Then
If MsgBox("Bu veri daha önce girilmiş, devam edilsin mi?", _
vbYesNo) = vbNo Then
Cancel = True
Me.txt_babaadi = ""
End If
End If
End Sub
Konuyu Okuyanlar: 1 Ziyaretçi
