AccessTr.neT
Login Sayac Kodu İle İlgili Sorun - Baskı Önizleme

+- 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ığı: Login Sayac Kodu İle İlgili Sorun (/konu-login-sayac-kodu-ile-ilgili-sorun.html)

Sayfalar: 1 2


Login Sayac Kodu İle İlgili Sorun - Ali İhsan Yavuz - 26/10/2021

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.....


RE: Login Sayac Kodu İle İlgili Sorun - berduş - 26/10/2021

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



RE: Login Sayac Kodu İle İlgili Sorun - Ali İhsan Yavuz - 26/10/2021

Olumsuz kodun yazılış sırasında bir farklılık var erkenden kapanış uyarısı veriyor bu şekilde


RE: Login Sayac Kodu İle İlgili Sorun - berduş - 26/10/2021

kaç defa uyaracaktı


RE: Login Sayac Kodu İle İlgili Sorun - Ali İhsan Yavuz - 26/10/2021

3 kez


RE: Login Sayac Kodu İle İlgili Sorun - berduş - 26/10/2021

benim yazdığımda kaç kez uyarıyor?
If sayac = 2 Then buradaki 2 değerini değiştirerek dener misiniz?