Skip to main content

AccessTr.neT

Kayıt Ol

 | Facebook ile Bağlan  | Twitter İle Bağlan | Google+ İle Bağlan

Mükerrer Giriş İçin Yardım..

derebeyi
derebeyi
Access Cevaplanmış Soruları
12
6633

Mükerrer Giriş İçin Yardım..

Çözüldü #11
ozanakkaya
sledgeab
ozanakkaya
Bul
Kurucu
Adı Soyadı: Oz.... Ak....
Konum: Denizli
Ofis Versiyonu: Ofis 2016 64 Bit
Son Oturumu: Bugün,15:33
Yorumları: 13.536
Konuları: 499
Kayıt Tarihi: 29/01/2008
Teşekkür Puanı: 3.139
Mesleğiniz: Memur
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
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da

Bu Konudaki Yorumlar
Mükerrer Giriş İçin Yardım.. - Yazar: derebeyi - 11/11/2009, 00:04
Cvp: Mükerrer Giriş İçin Yardım.. - Yazar: Entepli - 11/11/2009, 00:09
Cvp: Mükerrer Giriş İçin Yardım.. - Yazar: Puletin - 11/11/2009, 10:51
Cvp: Mükerrer Giriş İçin Yardım.. - Yazar: ozanakkaya - 12/11/2009, 02:41
Task