Kullanıcı adı ve şifre oluşturma en baştan
#19
Merhabalar,

Benim formumda 2 tane textbox var. ( Kullanıcı adı ve şifre alanları için ) Buradaki gibi kullanıcı adını Combobox'a aldırmadım. DLookup ile verileri çekiyorum ancak sadece tablomda ilk satırdaki verileri yazdığımda dogru kabul ediyor. 2. sıradaki veriyi girdiğimde kabul etmiyor. Kodu inceleyerek yanlış yaptığım nokta hk. bilgi verebilirseniz sevinirim.

TBlerin adı Username ve Password. Kıyaslamayı Kullanıcı_Bilgileri isimli tabloda yer alan Kullanıcı_adi ve Sifre alanlarından yapması gerekiyor.

Şimdiden teşekkürler.

Visual Basic
  1. If Nz(Username, "") = "" Or Nz(Password, "") = "" Then
  2. MsgBox "Kullanıcı Adı veya Şifre alanlarını boş geçemezsiniz."
  3. Else ' Dolu ise;
  4.  
  5. kadi = DLookup("Kullanici_adi", "Kullanici_Bilgileri", Username)
  6. GSifre = DLookup("Sifre", "Kullanici_Bilgileri", Password)
  7.  
  8. If kadi <> Username Or GSifre <> Password Then
  9.  
  10. MsgBox "Hatalı Kullanıcı adı veya Şifre Girişi Sağladınız. Lütfen kontrol ederek tekrar deneyin veya sistem yöneticisine danışın."
  11.  
  12. Username.SetFocus ' Kullanici_adi metin kutusuna odaklan
  13. Username.Text = "" ' Kullanici_adi metin kutusunu temizle
  14.  
  15. Password.SetFocus ' Sifre metin kutusuna odaklan
  16. Password.Text = "" ' Sifre metin kutusunu temizle
  17.  
  18. Username.SetFocus ' Kullanici_adi metin kutusuna odaklan
  19.  
  20. Exit Sub
  21.  
  22. Else
  23. DoCmd.OpenForm "Anasayfa", acNormal, , , acFormReadOnly, acDialog 'Anasayfa isimli Formu Aç
  24. DoCmd.Close acForm, "Giris", acSaveNo





  Alıntı
Bu mesajı beğenenler:
#20
Taruz hocam elinize aklınıza sağlık Smile



  Alıntı
Bu mesajı beğenenler:
#21
ALLAH CC sizden razı olsun inşallah elinize sağlık



  Alıntı
Bu mesajı beğenenler:


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  Kullanıcı Adı Parola harun kaçar 2 75 15-03-2024, 14:27
Son Mesaj: harun kaçar
  [FORM] QR Kod Oluşturma ebenli 20 3.981 08-02-2024, 13:24
Son Mesaj: BeyTor
  [SORGU] Onay Kutusuna Göre Sorgu Listesi Oluşturma 88888888 6 364 31-07-2023, 16:40
Son Mesaj: 88888888
  [VBA] Form Olaylarına Koşul Oluşturma Ahmet51 2 185 21-07-2023, 10:51
Son Mesaj: onur_can
  [FORM] KULLANICI DENETİMLERİ memmetcavus 2 1.015 28-04-2023, 21:38
Son Mesaj: alperalper
access-sql-3 Access I Bulut Uygulamaları Ile Anlık çoklu Kullanıcı Erişimi BeyTor 12 564 23-04-2023, 22:05
Son Mesaj: BeyTor
  Gelişmiş Kullanıcı Ve Grup Yetkilendirme promigben 1 149 18-03-2023, 17:33
Son Mesaj: dsezgin
  [MAKRO] Access Tuş Kombinasyonları Ile Whatsapptan Gönderi Oluşturma orhnkprn 1 181 13-12-2022, 08:48
Son Mesaj: onur_can

Foruma Git:


Bu konuyu görüntüleyen kullanıcı(lar): 1 Ziyaretçi