AccessTr.neT

Tam Versiyon: Login Sayac Kodu İle İlgili Sorun
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
Sayfalar: 1 2
Değerli Üstadlarım Benim Login Sayfasındaki Sayaç kodum çalışmıyor bir türlü bulamadım yardımcı olursanız çok sevinirim Acces Ailesinde olmaktan çok mutluyum.....
aşağıdaki gibi dener misiniz?
Private Sub BtnTamam_Click()
kullaniciadiD = Me.Kullanici
yetkiD = Kullanici.Column(3)
If Me.Sifre = Me.Kullanici.Column(2) Then
MsgBox "Programa Hoşgeldiniz"
Form_Login.Visible = False
DoCmd.OpenForm "TblKullanicigiris Sorgu"
Else
If sayac = 2 Then
MsgBox "Hatalı Giriş Sebebiyle Program Kapatılacaktır" & Chr(13) & "UYARI"
DoCmd.Quit
Else
sayac = sayac + 1
MsgBox ("Hatalı Giriş Yaptınız Lütfen Geçerli bir şifre Giriniz" & Chr(13) & "DİKKAT")
Me.Sifre.SetFocus
End If
End If
End Sub
Olumsuz kodun yazılış sırasında bir farklılık var erkenden kapanış uyarısı veriyor bu şekilde
kaç defa uyaracaktı
3 kez
benim yazdığımda kaç kez uyarıyor?
If sayac = 2 Then buradaki 2 değerini değiştirerek dener misiniz?
Sayfalar: 1 2