Membuat Form Login di VB.Net dengan Database Sql Server

Share:

Membuat Form Login di VB.Net dengan Database Sql Server

Pada ulasan ini saya kan berbagi mengenai bagaimana Cara Membuat Form Login di VB.Net dengan Database Sql Server. Pentingnya sebuah form login tentunya akan membuat pengamanan yang kuat terhadap program aplikasi yang akan kita buat.

Berikut Gambarnya :

Membuat Form Login di VB.Net dengan Database Sql Server

Membuat Form Login di VB.Net dengan Database Sql Server

Mungkin di bisa dibilang membuat form login dengan database SQL Server agak rumit, ya tapi semua itu bisa asal kita mau usaha. Ok langsung saja.

Pertama.

Kita harus membuat sebuah database terlebih dahulu. Disini saya membuat dengan contoh :

-nama database : db_saya
-nama table : tb_login

Dengan field :
userid ----varcar(50) ----notnull
nama ----varcar(50) ----null
pass ----varcar(50) ----notnull

Ingat Disini saya membuat Database dengan Authentication : SQL Server Authentication dengan user sa. Bila ada yang belum tau cara mengaktifkan login sa dengan SQL Server Authentication bisa dibaca Mengaktifkan login user sa di Microsoft SQL Server 2005

Dan juga disini saya menkoneksikan database dengan vb.net menggunakan module, bila ada yang belum tau silahkan baca Membuat Koneksi Database SQL dengan VB.Net. Setelah semua selesai barulah kita menuju login yang akan kita buat, salinlah kodeberikut :

-Buatlah Decralasi sebagai berikut dan letakkan di paling atas flogin

Imports System.Data.SqlImports System.Data.SqlClient

-Di form_load

buka()--- ini adalah cara memanggil koneksi yang kita buat di module

End sub

button login
Dim Sql, user, pass As String
user = txtuser.Text---namatexbox
pass = txtpass.Text---namatexbox
koneksi.Close()
Call buka()
Sql = "SELECT * FROM tb_login WHERE userid='" + user + "' AND pass='" + pass + "'"
cmd = New SqlCommand(Sql, koneksi)
baca = cmd.ExecuteReader()
If baca.HasRows = True Then
Form1.Show()
Me.Hide()
Else
MessageBox.Show("Kombinasi Username dan Password Salah", "Konfirmasi", MessageBoxButtons.OK, MessageBoxIcon.Error)
txtuser.Focus()
End If
txtuser.Text = ""
txtpass.Text = ""
baca.Close()
cmd.Dispose()
end sub

Semoga membantu gan. Sekian dulu tentang Membuat Form Login di VB.Net dengan Database Sql Server di TIPS DAN INFORMASI. Ikuti terus setiap postingan nya gan.