Login Giriş Sayfası Hatası
Tarih
21/08/2009 14:10
Konu Sahibi
ancyra
Yorumlar
3
Okunma
1991
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy



ancyra
Hesap Aktif Değil
Kullanici Avatari
Aktivasyon Bekleyen
60
01/07/2009
Kayseri
Ofis 2003
16/06/2010,10:59
Çözüldü 
Oluşturduğum program login formunda şu şekilde kod kullandım ama hep hata alıyorum. Yardımcı olabilirseniz sevinirim.
Private Sub OK_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OK.Click
Dim komut As New OleDbCommand
Try
If IsDBNull(tbxsifre.Text) = False Then
Dim ds As New DataSet
komut.Connection = b
komut.CommandType = CommandType.Text
komut.CommandText = "select username_,password_ from tblusers where username_='" & cmdkullanıcı.Text & "' and password_='" & tbxsifre.Text & "'"
Dim oku As OleDb.OleDbDataReader = komut.ExecuteReader
If oku.Read = True Then
If (ds IsNot Nothing) AndAlso (ds.Tables.Count > 0) AndAlso (ds.Tables(0).Rows.Count = 1) Then
admin = CBool(ds.Tables(0).Rows(0).Item("admin"))

If admin = True Then
MsgBox("Yönetici Hoşgeldiniz" & cmdkullanıcı.Text & "!", MsgBoxStyle.OkOnly, "")
Else
MsgBox("Hoşgeldiniz" & cmdkullanıcı.Text & "!", MsgBoxStyle.OkOnly, "")
End If

giris = True
kisiid = cmdkullanıcı.Text
Me.Close()
End If
Else
MsgBox("Kullanıcı Adı veya Şifre Yanlış!", MsgBoxStyle.OkOnly, "")
giris = False
End If
End If
Catch ex As Exception
MsgBox("Hata!!!")
giris = False
End Try
End Sub

programın bir parçası ektedir......................


Ek Dosyalar
.rar   login form.rar (Dosya Boyutu: 234,62 KB / İndirme Sayısı: 48)
Cevapla


cuneyt

Kullanici Avatari
Onursal
321
29/10/2008
81
İstanbul
Ofis 2007
08/06/2016,10:56
Çözüldü 
merhaba,
ilk etapta sadece kullanıcı ve şifre doğrulaması yaptırarak dene. hatta sadece kullanıcı kriterlerlerini karşılıklı sorgulatarak girişi yaptır. ayrıca ilk etapta Admin olarak kriter sorgulayıp giriş yapmasın. ki buna göre hatanın asıl yerini bulabiliriz.. admin olarak sorgulamadan girişi yaparsa bu durumda admin için kullanılan kodda hata var anlayacaz. birde combo da text ile karşılaştırıp giriş yapmak yerine comboda isimler görünecek şekilde arka planda da sayı çalışsın. yani combo da iki alan olacak ilki gizli ve 0 genişlik diğeri ise kullanıcı adları ve görünür. çünkü text karşılıklı sorgulamalarda mutlaka hata verebilmektedir. bunları bir dene olmazsa vb.net yükleyip kendi bilgisayarımda deneyeyim.
selamlar.
Cevapla


ancyra
Hesap Aktif Değil
Kullanici Avatari
Aktivasyon Bekleyen
60
01/07/2009
Kayseri
Ofis 2003
16/06/2010,10:59
Çözüldü 
evet dediğiniz gibi yaptım. Kullanıcı girişinde bir sorun yok ama adminin sorguladığımda hata veriyor, yada -- kullanıcı adı veya şifre yanlış diyor. admin sorgulamasını nasıl yapabilirim?
Birde Login Formunu şifre doğruysa me.hide ile gizleyim ana formu açıyorum. Ana formu çıkış butonu ile me.close ile kapattığımda ekran kapanıyor ama program hala çalışır durumda bulunuyor bunu nasıl düzelte bilirim?
Cevapla


mehmetdemiral
.
Kullanici Avatari
Uzman
M.... D....
4.734
30/10/2008
Samsun
Ofis 2013 Tr. 32 Bit
05/12/2016,11:17
Çözüldü 
Konuya cevap bekleniyor..
İnadına, ille de Accesstr.net...
Cevapla







Konuyu Okuyanlar: 1 Ziyaretçi


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
  Vb.net 'Object reference not set to an instance of an object.' Hatası. Mettleshade 5 147 06/11/2016, 21:48 Mettleshade
  vb.net access bağlantı hatası emir ustaoğlu 6 1.508 24/05/2016, 15:26 HilasNemkid
  nesne başvurusu bir nesnenin örneğine ayarlanmadı hatası quardio4 4 448 23/05/2016, 18:34 atoz112
Çözüldü Nesne başvurusu bir nesnenin örneğine ayarlanmadı. hatası Gorkemku 4 4.561 02/06/2015, 23:01 drmet
Çözüldü Vb.net Sayısal İfadede Noktayı Virgüle çevirme hatası 47terminator 8 3.149 24/05/2014, 00:35 47terminator


Türkçe Çeviri: MCTR, Forum Yazılımı: MyBB, © 2002-2016 MyBB Group.
DMCA.com Protection Status
© Desing by XSTYLED| Develops by ozanakkaya