sifreyi doğru girdiğim halde şifreyi kabul etmiyor

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
Kullanıcı avatarı
delphist
Üye
Mesajlar: 595
Kayıt: 05 Oca 2005 04:34

sifreyi doğru girdiğim halde şifreyi kabul etmiyor

Mesaj gönderen delphist »

s.a. Arkadaşlar kullancıyı doğru olarak buluyor ama sifreyi girdiğimde ki bu işlemleri telnetle bağlanıp test ediyorum...şifreyi kabul etmiyor çıldırmak üzereyim...Lütfen yardımcı olursanız çok sevineceğim...

Kod: Tümünü seç

begin
 suiMemo1.Lines.Add(AThread.Connection.Socket.Binding.PeerIP+' adresinden bağlantı isteği geldi');
 AThread.Connection.Write('Kullanici Adi:');
 kullanici:=AThread.connection.ReadLn;
  if dm.TBLKULLQ.Active=False then
   begin
   dm.TBLKULLQ.Active:=true;
   end;
    
  if dm.TBLKULLQ.Locate('username',kullanici,[]) then
   begin
   suiMemo1.Lines.Add(kullanici+' için şifre soruluyor');
   AThread.Connection.write('Sifre:');
   sifre:=AThread.Connection.ReadLn;
   edit1.Text:=sifre;
   suiMemo1.Lines.Add(kullanici+'kullanıcısı'+sifre+' ile sisteme girmeye çalışıyor');
    if dm.TBLKULLQ.FieldByName('password').AsString = edit1.Text then
     begin
     suiMemo1.Lines.Add(kullanici+' için şifre kabul edildi');
     AThread.Connection.WriteLn('Sifre Kabul Edildi');
     end
     else
     begin
     suiMemo1.Lines.Add(kullanici+' için şifre kabul edilmedi');
     AThread.Connection.WriteLn('Sifre Kabul Edilmedi');
     athread.Connection.Disconnect;
     end;
      
   end
   else
   begin
   AThread.Connection.WriteLn('Hata:');
   AThread.Connection.WriteLn('Kullanıcı Adı bulunamadı');
   suiMemo1.Lines.Add(kullanici+' sisteme giremedi');
   athread.Connection.Disconnect;
   end;
   
Misafir

Mesaj gönderen Misafir »

merhaba.
şifreyi vt den değil de manuel olarak denediniz mi?öncelikle hatanın hangisinden kaynaklandığını tespit etmek gerek sanırım.
kolay gelsin.
Kullanıcı avatarı
delphist
Üye
Mesajlar: 595
Kayıt: 05 Oca 2005 04:34

Mesaj gönderen delphist »

hocam manuel olarak denedim bir problem yok ama veritabanında username kabul ediyor ama şifre doğru olduğu halde olmuyor...Kabul etmiyor
Misafir

Mesaj gönderen Misafir »

vt den gelen şifreyi herhangi bi yerde show ederek test ediniz.
kolay gelsin.
Kullanıcı avatarı
delphist
Üye
Mesajlar: 595
Kayıt: 05 Oca 2005 04:34

Mesaj gönderen delphist »

s.a. hocam test ettim herşey normal....bir problem yok ama kabul etmiyor...elimle sifreyi bi değişkene aktardığım zaman örneği a değişkenine 12345 elimle yazıp kabul ediyor ama veritabanından aldığım zaman kabul etmiyor yukardaki gibi problem nedir....sql ile de alıyorum böyle yapıyor anlayamadım...Lütfen bu konuda yardımcı olursanız sevinirim....Teşekkürler
Kullanıcı avatarı
sadettinpolat
Moderator
Mesajlar: 2131
Kayıt: 07 Ara 2003 02:51
Konum: Ankara
İletişim:

Mesaj gönderen sadettinpolat »

eğer şifre alanı char olarak tanımlanmışsa sonunda boşluklar olabilir.

Kod: Tümünü seç

if dm.TBLKULLQ.FieldByName('password').AsString = edit1.Text then 
satırını

Kod: Tümünü seç

if Trim(dm.TBLKULLQ.FieldByName('password').AsString) = edit1.Text then 
şeklinde deneyin birde...
"Sevmek, ne zaman vazgececegini bilmektir." dedi, bana.

---
http://sadettinpolat.blogspot.com/
Kullanıcı avatarı
delphist
Üye
Mesajlar: 595
Kayıt: 05 Oca 2005 04:34

Mesaj gönderen delphist »

s.a. @sadettin polat hocam teşekkür ederim...Allah razı olsun...Verdiğiniz çözüm ve yardımlarınız için....

Teşekkürler
Cevapla