Arkadaşlar herkese iyi akşamlar.

kullanıcı adı ve şifre girişi yaptığım bir form var sorunsuz çalışıyor. istediğim doğru bilgiler girildiğinde giriş butonuna basıldığında istediğim forma yönlenmesini istiyorum. bir türlü beceremedim. yardımcı olabilecek var mıdır?

teşekkürler

Kontrol ifadesi butona bağlı ise

kodu eklenerek form açılabilir

teşekkür ederim. giriş butonu ile yapıyorum bu kodu da olay yordamına aynı buton adına bağlı olarak mı yazacağım?

(10-08-2020, 19:58)halily demiş ki: Kontrol ifadesi butona bağlı ise

Visual Basic

DoCmd.OpenForm "formAdi", acNormal

kodu eklenerek form açılabilir

butona yazdığınız kontrol kodunu bilmediğimden kesin bir şey diyemem ama eğer if kullanmışsanız şifre doğru ise bloğuna eklemelisiniz

(10-08-2020, 20:24)kodum aşağıdaki gibi.. ben en sonuna ekledim.. demiş ki:

Visual Basic

Private Sub Komut18_Click()
If Metin5.Value = "" Or IsNull(Metin5) Then
MsgBox ("Lütfen Geçerli bir Kullanıcı Adı Giriniz.")
Else
GoTo 1
Exit Sub
End If
 
 
1
If Metin7.Value = "" Or IsNull(Metin7) Then
MsgBox ("Lütfen Geçerli bir Şifre Giriniz.")
Else
GoTo 2
Exit Sub
End If
 
2
'kontrolleri yapacağız
If Metin7.Value = DLookup("sifre", "kullanicilar", "eposta='" & Metin5.Value & "'") Then
MsgBox ("Şifre Doğru.")
Else
MsgBox ("Şifre Yanlış")
Metin7.Value = ""
Metin7.SetFocus
 
Exit Sub
End If
 
 
 
End Sub
 
Private Sub Komut19_Click()
DoCmd.OpenForm "form_ana_menu", acNormal
End Sub

halilybutona yazdığınız kontrol kodunu bilmediğimden kesin bir şey diyemem ama eğer if kullanmışsanız şifre doğru ise bloğuna eklemelisiniz

neden ayrı bir buton kullanmışasınız, şifre doğruysa doğrudan formu açması daha uygun olmaz mı? bu haliyle Komut19a bastığınız an şifreden bağımsız olarak formu açar.
ayrıca Komut18 hatalı gibi geldi exit sub else'den önce gelmeliydi ve daha sade olabilirdi.