Membuat Login Menggunakan Vb.Net (2008, 2010, 2012, 2013) dengan database SQL SERVER.

Selamat Malam teman-teman, malam-malam gini dari pada mikirin yang aneh-aneh mending membuat sesuatu yang lebih bermanfaat.

Kali ini saya akan bahas mengenai membuat Form Login menggunakan Vb.net yang menggunakan sql server sebagai databasenya.

Langsung saja.

Pertama kita buat dulu projek vb kita terserah teman teman mau dikasih nama apa.

Yang ke dua berikan dua buah textbox pada form yang telah kita buat tadi. Pada propertisnya ganti namenya menjadi txtUsername dan yang satunya lagi ubah menjadi txtPassword supaya tidak membingungkan kita ketika membuat kodingnya nanti.

Yang ketiga berikan dua buah button ubah propertis yang name nya menjadi btnLogin serta pada properties textnya ganti dengan LOGIN dan button yang ke dua name nya ubah menjadi btnCancel dan properties textnya ganti dengan CANCEL

Kemudian kita buat sebuah class untuk menampung koneksi antara vb.Net dengan sql server.

Caranya klik kanan pada project kita kemudian add class Ganti nama class.vb menjadi CLSKoneksi.vb untuk mempermudah kita mengingatnya. Silahkan klik disini untuk membuka kodin CLSKoneksi.vb

Setelah anda membuka coding CLSKoneksi.VB copi pastekan coding tadi ke CLSKoneksi.vb anda.

Setelah itu klik dua kali pada button LOGIN dan copi pastekan coding dibawah ini.

    Dim sql As String

    Dim proses As New CLSKoneksi

    Dim tabel As DataTable

    Private Sub btnLogin_Click(sender As Object, e As EventArgs) Handles btnMasuk.Click

        If txtUserName.Text = "" Or txtPassword.Text = "" Then

            MsgBox("username atau password tidak boleh kosong !!!", MsgBoxStyle.Exclamation, "Perhatian !!!")

        Else

            sql = "select kata_Kunci from tbl_Login where username = '" & txtUserName.Text & "' and pasword = '" & txtPassword.text & " '"

            tabel = proses.reader(sql)

            If tabel.Rows.Count > 0 Then

MsgBox("Anda Berhasil Login!", MsgBoxStyle.Exclamation, "Info !!!")

            Else

                        MsgBox("Maaf! Anda gagal login", MsgBoxStyle.Exclamation, "Perhatian !!!")

            End If

        End If

    End Sub

Catatan : anda sudah membuat tabel dengan nama tbl_Login pada database sql server dan tabel tersebut mempunyai field username serta password.

Keterangan coding.

Pada coding tersebut mempunyai dua buah kondisi yaitu if .

If yang pertama berfungsi untuk memberikan informasi jika pengguna belum memasukkan username dan password. Jika pengguna belum memasukkan username atau password maka akan muncuk pesan user name atau password tidak boleh kosong. Kemudian setelah itu ada kondisi jika pengguna sudah memasukkan username dan password. Maka akan membaca kondisi yang ke dua yaitu membaca query sql server, untuk if yang kedua ini untuk memberikan informasi jika data atau user berhasil dengan benar memasukkan user name serta password maka akan muncul pesan Anda berhasil Login dan jika user memasukkan kata kunci dan password yang salah maka akan muncul pesan maaf! Anda gagal login.!

Mudah bukan.

Selamat mencoba dan berekplorasi..!!!!!!!