Veritabanından Login İşlemi

waryoq · 10 Haz 2012

Merhaba. Şimdi VB.NET dilinde veritabanından kullanıcı adı ve şifre çekme olayını öğrenelim.

Öncelikle Data adında bir veritabanı oluşturalım. İçine de tblAdmin isminde bir tablo oluşturalım ve veritabanını programın çalıştığı dizine atalım.

Ardından formumuza 2 textbox ve 1 buton ekleyelim. Kullanıcı Adı textbox adını txtKullanici, şifre textbox adını txtSifre ve butonun adını da Giris Yapalım. ve aşağıdaki kodları butona yazalım.[...]

Dim c As New OleDbConnection("Provider=microsoft.jet.oledb.4.0;data source=" & Application.StartupPath & "/Data.mdb")

Dim dr As OleDbDataReader

Dim cmd As OleDbCommand

cmd = New OleDbCommand("Select * from tblAdmin", c)

If c.State = ConnectionState.Closed Then c.Open()

Dim girdimi As Boolean = False

dr = cmd.ExecuteReader

While dr.Read

If dr("KullaniciAdi") = txtKullanici.Text And dr("Sifre") = txtSifre.Text Then

girdimi = True

End If

End While

If girdimi = False Then

MsgBox("Hatalı Kullanıcı Adı / Şifre")

Else

Me.Hide()

AcilacakForm.Show()

End If

dr.Close()

Yukarıdaki kodları butonun içine yazın ve çalıştırın.

İşlem bu kadar.

Veritabanından Login İşlemi

waryoq

Üye

Sosyal medya sayfalarımız