30/12/2008, 17:03
Daha önceki olayda kimlik bilgilerini girdiğim kişileri, yeni olayda tekrar girmeden nasıl eklerim, her olayda alınan ifadeleri ve durumları değişmeden (ekledigim örnekte kişino çift tıklandığında kimlik bilgileri formu açılıyor)
30/12/2008, 17:03
30/12/2008, 17:26
Eğer Dlookup kullanımını biliyorsanız çözümü DCount ile bulabilirsiniz.
şeklinde kullanabilirsiniz.
Kod:
Dim Kayit_Varmi As Byte
Kayit_Varmi = DCount("k_adi", "tbl_Kullanicilar", "[k_adi]='" & txt_Kullanici.Value & "'" & " and [k_parola]='" & txt_Parola.Value & "'")
If (Kayit_Varmi > 0) Then
Call Ad_Soyad
DoCmd.Close acForm, "frm_Parola_Kontrol"
DoCmd.OpenForm "frm_Merhaba"
Else
MsgBox "Bu kullanıcı veya parola yanlış.", vbCritical + vbOKOnly, "H A T A ! ! !"
End Ifşeklinde kullanabilirsiniz.