MEMBUAT FORM LOGIN DENGAN DATABASE MENGGUNAKAN VISUAL STUDIO 2012

MEMBUAT FORM LOGIN DENGAN DATABASE MENGGUNAKAN VISUAL STUDIO 2012



Assalamualaikum Wr.Wb


Sekarang kita akan membuat form login menggunakan Visual Studio 2012

baiklah Berikut Caranya :


Pada awal Mula Buka Visual Studio


Klik pada bagian New Project , isinama dan komponen-komponennya , Seperti :
label (2), Textbox(2), dan saya juga menambahkan PictureBox , & CheckBox utk lihat dan menyembunyikan KataSandi.
Anda bisa membuat form anda sesuai keinginan hati anda, namun saya membuatnya seperti ini :






Dan anda juga harus membuat sebuah database , seperti SQL dan lain sbgnya !
Buat Sql Anda Seperti Gambar Dibawah




Pada Bagian ID, yg format nya int ,kita Harus Mengubah
Identity Specification > (Is Identity) menjadi Yes
Buatlah Akun Di sql Anda Contoh :




Bila anda salah Memasukkan nama & katasandi
secara otomatis pesan error keluar .Contoh :


Coding :



Public Class Form_login

    Private Sub Button1_Click(sender As Object, e As EventArgsHandles Button1.Click
        Dim Connection As New SqlClient.SqlConnection
        Dim command As New SqlClient.SqlCommand
        Dim adaptor As New SqlClient.SqlDataAdapter
        Dim dataset As New DataSet

        Connection.ConnectionString = ("Data Source=desktop-fr227o0\khaidir;Initial Catalog=login;Integrated Security=True")
        command.CommandText = "SELECT * FROM [user] WHERE nama='" & TextBox1.Text & "'AND katasandi='" & TextBox2.Text & "';"
        Connection.open()

        command.Connection = Connection

        adaptor.SelectCommand = command
        adaptor.Fill(dataset, "0")

        Dim Count = dataset.Tables(0).Rows.Count
        If Count > 0 Then
            FormUnlocker.Show()
            Me.Hide()
        Else
            MsgBox("Akun Yang Anda masukkan Salah!,coba lagi"MsgBoxStyle.Critical)
            TextBox1.Clear()
            TextBox2.Clear()


        End If

    End Sub


    Private Sub Button2_Click(sender As Object, e As EventArgsHandles Button2.Click
        End

    End Sub


    Private Sub CheckBox1_CheckedChanged(sender As Object, e As EventArgsHandles CheckBox1.CheckedChanged
        If CheckBox1.Checked = True Then
            CheckBox1.Text = "Show password"
            TextBox2.UseSystemPasswordChar = True
        Else
            CheckBox1.Text = "Hide password"
            TextBox2.UseSystemPasswordChar = False
        End If
    End Sub


End Class











Bila Tidak Jelas Boleh Ditanyakan Di komentar..


Sekian Dulu Buat Postingan Saya
Semoga Bermanfaat Buat Anda

Assalamualaikum WR.WB

1 Response to "MEMBUAT FORM LOGIN DENGAN DATABASE MENGGUNAKAN VISUAL STUDIO 2012"

Unknown said...

Bang saya error di bagian FormUnlocker.Show()
ada solusi??