Membuat Form Login di Visual Basic .Net dengan Terkoneksi ke Database Sql Server

Tutorial kali ini kita akan membahas cara Membuat Form Login di Visual Basic .Net yang data usernya tersimpan di sebuah tabel di database SQL Server. Jadi, form login akan mengarahkan ke form lain(form menu utama) jika di isikan username dan password yang sesuai dengan record tabel yang ada di SQL Server.

Mempersiapkan database dan tabel di SQL Server

Untuk membuat form login yang terhubung ke database SQL Server, maka terlebih dahulu kita akan mempersiapkan database dan tabel di SQL Server. Silakan buka SQL server anda, klik New query  dan ketikkan code dibawah. Untuk menjalankannya, blok perintah query per baris dan klik tombol execute


create database latihan

use latihan

create table users(id int identity not null primary key, username varchar(35) unique,password varchar(35))

insert into users values('bravo','bravopass')
insert into users values('alfa','alfapass')

select * from users

  • Pada baris 1 dan 2, kita membuat sebuah database baru dengan nama latihan dan masuk atau mengaktifkan database tersebut.
  • Pada baris ke 5, kita membuat sebuah tabel baru dengan nama users. Field id dengan tipe integer, sebagai primary key dan akan otomatis terisi (auto increment). Field kedua username, untuk menampung data username dan kita set unik sehingga tidak akan ada username yang sama. Field password untuk menampung password.
  • Pada baris 7 dan 8, kita isikan dua buah record ke tabel users.

Merancang Form Login di Visual Basic .Net

Setelah database, tabel dan record sudah selesai dipersiapkan, sekarang kita akan merancang form login di visual basic. Silakan buka Visual Basic dan buatkan sebuah project baru dengan nama Latihan Login, design sebuah form seperti gambar berikut:

form Login di Visual Basic

Sesuaikan properties Form1 dan elemen form seperti berikut ini:

Form1 ->Name: frmLogin
Form1 ->Text: Form Login

Label1 -> Text: Username
Label2 -> Text: Password

TextBox1 -> Name: txtUsername
TextBox2 -> Name: txtPassword
TextBox2 ->PasswordChar: *

Button1 -> Name: btnLogin
Button1 -> Text: &Login
Button2 -> Name: btnBatal
Button2 -> Text: &Batal

Kemudian tambahkan sebuah form baru, ganti Properties form2 seperti berikut:

Form2 -> Name: frmUtama
Form2 -> Text: Form Utama

Membuat Koneksi dan Validasi Login

Langkah selanjutnya, tambahkan sebuah module, dari menu Project pilih Add Module, ganti nama module menjadi modKoneksi. Ketikkan kode berikut di modKoneksi


Imports System.Data.Sql
Imports System.Data.SqlClient
Module modKoneksi
Public koneksiSQL As New OleDb.OleDbConnection

Public Sub koneksi()
On Error GoTo err
Dim source As String
source = "Provider=SQLOLEDB;Data Source=.\SQLEXPRESS;Integrated Security=SSPI;Initial Catalog=latihan"
koneksiSQL = New OleDb.OleDbConnection(source)
koneksiSQL.Open()
Exit Sub
err:
MsgBox(Err.Description, MsgBoxStyle.Information, "Koneksi Database bermasalah")
End Sub
End Module

  • Pada baris 1 dan 2, kita import library di visual basic untuk dapat terkoneksi dengan Sql server
  • Pada baris ke 4, kita buat sebuah variabel koneksiSql untuk membuka koneksi ke SQL Server
  • Pada baris 7 sampai dengan 14, kita buat variabel koneksi  untuk membuka database (latihan) yang sudah di buat sebelumnya.

Langkah selanjutnya, kita akan membuat validasi record yang ada di tabel SQL server dengan yang di inputkan pada form login. Klik dua kali pada button Login dan tambahkan kode berikut:

Call koneksi()
Dim query As Integer
Dim command = New OleDb.OleDbCommand("select count(id) from users where username='" & Me.txtUsername.Text & "' and password='" & Me.txtPassword.Text & "'", koneksiSQL)
query = command.ExecuteScalar()

If txtUsername.Text = "" Or txtPassword.Text = "" Then
MsgBox("Isi user dan password", vbCritical)

ElseIf (query <> 1) Then
MsgBox("User atau password salah", vbCritical)

Else
frmUtama.Show()

End If
  • Pada baris 1, kita panggil variabel koneksi yang berada pada modKoneksi agar terhubung ke database yang sudah kita buat (database latihan)
  • Baris 2 sampai 4, membuat variabel query  dengan tipe data integer
  • Pada baris 3, query untuk menampilkan jumlah record di tabel users berdasarkan username dan password yang di input ke form login
  • pada baris 9 sampai 13, mengecek nilai variabel query. Jika bernilai 1 maka akan di tampilkan form utama, jika nilainya bukan 1 maka akan di tampilkan pesan error.

Demikian tutorial Membuat Form Login di Visual Basic .Net dengan Terkoneksi ke Database Sql Server. Tutorial ini masih sederhana karena password yang di simpan di tabel SQL Server tidak dienkripsi. Untuk pengembangannya silakan berkreasi sendiri. Terimakasih dan Semoga bermanfaat

Leave a Reply

Your email address will not be published. Required fields are marked *