Tutorial Pembuatan Aplikasi Perpustakaan Bagian 2 #formlogin

IT Dadakan-,Pada kesempatan kali saya ingin membagikan Tutorial Pembuatan Aplikasi Perpustakaan Bagian 2 #formlogin ,yaitu membuat form login . Untuk yang sebelumnya belum tahu tentang tutorial bagian 1 silahkan :

BACA JUGA : 

MEMBUAT APLIKASI PERPUSTAKAAN BAGIAN 1 #DESAIN
Apa itu guna UI ? Dan CARA PASANG GUNA UI

APA ITU FORM LOGIN ?

Form login adalah sebuah form yang berfungsi untuk proses validasi user ketika masuk ke sebuah Aplikasi dan juga dapat menentukan hak akses dari user ketika mamasuki aplikasi. Jadi intinya Form Login yang kita buat kali adalah hanya untuk admin ,jadi selain admin nggak bisa masuk wkwkwk.
   

CARA PEMBUATAN :

1. Masuk Ke PhpmyAdmin ,kemudian Buat Database ,beri nama :pustaq (bebas kalian mau ganti apa).

2. Buat tabel dengan nama bebas ,contoh : tbadmin  ,dengan rincian sebagai berikut :

3. Buat  Form baru dengan cara Klik Kanan >> Add atau CTRL+SHIFT+A , dan beri nama :form_login  ,untuk Desain sesuai dengan desain pada Tutorial Bagian 1 ,atau sesuai gambar berikut ini.

4 . Buat Module dengan cara Klik Kanan + Add atau CTRL+SHIFT+A , dan beri nama : module_koneksi ,isikan kode berikut ini pada module_koneksi

Imports MySql.Data.MySqlClient

Module Module_koneksi
    Public con As MySqlConnection
    Public query As String
    Public cmd As MySqlCommand
    Public da As MySqlDataAdapter
    Public ds As DataSet
    Public dt As DataTable
    Public rd As MySqlDataReader

    Sub koneksi()
        con = New MySqlConnection("data source=localhost;initial catalog=pustaq;user=root;password=") 'nama database sesuaikan dengan punya kalian
        Try
            If con.State = ConnectionState.Closed Then
                con.Open()
            End If
        Catch ex As Exception
            MsgBox("Koneksi Gagal", vbInformation)
        End Try
    End Sub

End Module

Jika kalian kurang jelas dalam pembuatan module_koneksi ,silahkan :

BACA JUGA :

CARA MEMBUAT MODULE KONEKSI DI VB.NET DENGAN DATABASE MYSQL

5. Double Klik pada formlogin dan masukkan script berikut ini :

koneksi()

NOTE : JANGAN LUPA UNTUK SETIAP FORM YANG AKAN TERHUNG DENGAN KONEKSI BERI KODE BERIKUT INI PADA BARIS PALING ATAS !

IMPORT.MYSQL.DATA.MYSQLCLIENT

6. Double Klik pada btnminimize Masukkan script berikut ini :

Me.WindowState = FormWindowState.Minimized

7. Double Klik pada btnclose Masukkan script berikut ini :

If MsgBox("Yakin Ingin Close ? ", vbYesNo) = vbYes Then
     Me.Close()
  End If

8. Buat Form baru dengan cara Klik Kanan >> Add atau CTRL+SHIFT+A , dan beri nama : form_admin ,desain kurang lebih seperti ini :

9. Double Klik pada Button Login Masukkan script berikut ini :

 If txtuser.Text = "" Or txtpass.Text = "" Then
            MsgBox("Username  Dan Password Tidak Boleh Kosong", vbOKOnly, "PUSTAQ")
            txtuser.Focus()
        Else

            cmd = New MySqlCommand
            cmd.Connection = con
            query = "select*from tbadmin where username='" & txtuser.Text & "' and password='" & txtpass.Text & "'"  'nama tabel sesuaikan dengan punya kalian
            cmd.CommandText = query  
            da = New MySqlDataAdapter(query, con)
            dt = New DataTable()
            Try
            da.Fill(dt)
            If dt.Rows.Count() <= 0 Then
                MsgBox("Username dan Password salah", vbOKOnly, "PUSTAQ")
                txtuser.Text = ""
                txtpass.Text = ""
                txtuser.Focus()
            Else
                Form_admin.Show()
                Me.Close()
                End If
            Catch ex As Exception

            End Try
        End If

10. Save project kemudian RUN atau F5 .

Nah cukup sekian Tutorial Pembuatan Aplikasi Perpustakaan Bagian 2 #formlogin ,Jika ada ada error silahkan bisa Komentar dibawah . Semoga bermanfaat dan selamat mencoba ...