Skip to main content

AccessTr.neT


VB.NET & Access ile Login İşlemi

oguzhanbakir07
oguzhanbakir07
4
12214

VB.NET & Access ile Login İşlemi

#1
Access dosyamızın adı:db.mdb;
İçine Login adında bir tablo açalım.İçine de ID (Otomatik Sayı),KADI(Metin),SIFRE(Metin)
alanlarını açalım.db.mdb dosyasını proje exemizin bulunduğu yere yani Bin>Debug klasörünün içine atalım.

VB.Nette bir form açalım ve ismini frmLogin olarak verelim.Daha sonra bu formun üstüne 2 textbox ve 2 buton ekleyelim.

Textbox isimleri:txtKullanici,txtSifre
txtSifrenin passwordchar özelliğine * koyalım ki yazdığımız şifre *(yıldız) olarak görünsün.

Buton isimleri:btnGiris,btnIptal

btnGirisin click olayına şu kodları yazalım


Try

//Yeni bir oledb bağlantısı yarattık ve yerini exemizin yanındaki db.mdb olarak verdik.
Dim con As New OleDbConnection(Application.StartUpPath & "\db.mdb")

//ds adında bir DataSet yarattık.
Dim ds As New DataSet
//da adında bir adaptor tanımladık eğer Login tablosundaki KADI alanı txtKullaniciAdina
//ve PASS alanı txtSifreye girdiğimiz alanla uyuşuyorsa
//If da.Fill(ds) satırına düşecektir.

Dim da As New OleDbDataAdapter("select * from Login where KADI='" & Trim(txtKullanici.Text) & "'and PASS='" & Trim(txtSifre.Text) & "'", con)


If da.Fill(ds) Then
DigerForm.Show() //Şart sağlanıyorsa DigerFormu göster dedik.
Me.Hide()//frmLogin adlı formumuzu gizledik.

Else
//Şart sağlanmamışsa Yanlış kullanıcı adı veya şifre girdiniz diye bir mesaj döndürdük.
MsgBox("Yanlış kullanıcı adı veya şifre girdiniz")
End If



Catch ex As Exception
MsgBox(ex.Message)
End Try


Olası bir hata içinde try catch bloğuna aldık ki hata verdiğinde programımız yarıda kesilmeyip hatayı bize mesaj olarak versin diye.
Cevapla
#2
önek ekleseydin keşke arkadaşım anlamadım açıkçası...

.exe nerede .??
Cevapla
#3
Akşam eve gidince atayım arkadaşım.
Cevapla
#4
çok sağol açıklama için yaptığım proje içine ekledim
Son Düzenleme: 16/10/2011, 13:33, Düzenleyen: goodfalles.
Cevapla
#5
teşekkürler cok isime yaradı ellerine sağlık
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da
Task