Aplikasi Login VB.NET Database SQL Server

Programer Vb.Net memungkinkan untuk Membuat form login menggunakan database SQL Server, Tutorial visual basic net kali ini akan membahas secara lengkap mulai dari pembuatan database di sql server, pembuatan form login berdasarkan tabel login yang ada di database sql server yang nanti akan di buat, namun sector code juga sudah pernah membahas tutorial membuat aplikasi crud menggunakan sql server pada postingan sebelumnya. Simak terus tutorial ini dan jangan lupa dibagikan jika bermanfaat ya..

Membuat Database Login Sql Server Management Studio

Kita akan membuat database baru atau boleh juga memakai database lama namun harus membuat tabel baru dengan nama "tbl_login", buat juga column id, username, passoword pada tabel login tersebut. lihat pembuatan database sql server tabel login secara detail :

Jika pembuatan database sudah selesai lanjut buka visual studio yang sudah kamu install di komputer kamu, kita akan membuat aplikasi login vb net.

Membuat Aplikasi Login VB.NET

Buatlah project baru di visual studio dan beri nama "aplikasiloginSQLserver.vb". pada form1.vb desain tampilan login kamu seperti gambar berikut :

Form login diatas saya menggunakan MetroForm, kamu juga bisa membuat tampilan metro Form penjelasannya sudah kami bahas silahkan baca Membuat tampilan Metro Form CSharp dan Vb.Net.

Lanjut kita akan membuat module koneksi dari aplikasi login ke database sql server.

Membuat Module Koneksi Database SQL Server

Buatlah sebuah module dan beri nama "mdlkoneksi.vb" dan tuliskan code berikut :

Imports System.Data.SqlClient
Module mdlKoneksi
    Public konek As SqlConnection
    Sub konekDB()
        Try
            konek = New SqlConnection _
                ("Data Source=DESKTOP-5VBP3C9\SQLEXPRESS;" _
            + "Initial Catalog=namadatabase;Integrated Security=True")
            konek.Open()
        Catch ex As Exception
            MsgBox("konek Kedatabase Bermasalah, " _
                   + "Periksa koneksi Jaringan Anda")
        End Try
    End Sub
End Module

Penjelasan :
Sesuaikan nama database dengan nama database yang kamu buat di sql server.

Code untuk Tombol Login

Sebelumnya silahkan Import namespace Imports System.Data.SqlClient Pada FrmLogin.vb

Private Sub MetroButton1_Click(sender As Object, e As EventArgs) _
        Handles MetroButton1.Click
        Dim drLogin As SqlDataReader
        Dim CMDLogin As SqlCommand
        Dim SQL As String
        konekDB()
        SQL = "SELECT * FROM tbl_login " _
        + "WHERE username = '" & MetroTextBox1.Text & "' " _
        + "And password= '" & MetroTextBox2.Text & "'"
        CMDLogin = New SqlCommand
        CMDLogin.CommandType = CommandType.Text
        CMDLogin.Connection = konek
        CMDLogin.CommandText = SQL

        drLogin = CMDLogin.ExecuteReader()
        If drLogin.HasRows Then
            MsgBox("selamat datang Admin")
            'Lakukan sesuatu disini
            'misalnya menampilkan form admin
        Else
            MsgBox("Nama User atau Password salah",
                   +vbCritical, "Password Salah")
        End If
        konek.Close()
        CMDLogin.Dispose()
        drLogin.Close()
    End Sub

Penjelasan :
Ketika admin memasukkan username dan password yang sesuai dengan field username dan password yang ada di database Sql Server maka akan muncul pesan "Selamat datang Admin ", kamu juga bisa merubah statement untuk menampilkan form lain,

sebaliknya akan muncul pesan Nama user atau Passowrd salah ketika admin memasukkan username dan password yang tidak sesuai dengan database.

Code untuk tombol Batal

    Private Sub MetroButton2_Click(sender As Object, e As EventArgs) _
        Handles MetroButton2.Click
        Me.Close()
    End Sub

Jika ada pertanyaan seputar tutorial membuat aplikasi login ini silahkan tanyakan di kotak komentar dibawah ini, kamu juga bisa membuat form login menggunakan database MySQL yang tutorialnya sudah pernah kami bahas, silahkan baca Tutorial Vb.Net : Form Login dengan Database MySQL.