#PART 2 MEMBUAT MASTER LOGIN DAN MENU UTAMA

Master Project

Aplikasi Pemrograman III
VB. NET 2012

ROJIKIN

Membuat form login

Langkah membuat Form Login

- Klik kanan pada SIMPAN_PINJAM_KOPERASI  lalu pilih Add à Windows Form

- Pilih Login Form, beri nama MasterLogin.vb (tanpa spasi) lalu klik Add

- Buat desain login seperti gambar brikut :

§ - Ubah properties name pada texbok  seperti gambar berikut

- Buat form menu utama

Dengan cara sama seperti membuat form master login dan sesuaikan seperti gambar berikut:

§ - Kembali ke menu master_Login Klik 2 kali pada Button Login, lalu tambahkan seperti berikut dibagian paling atas coding (diatas Public Class MasterLogin)

§  - Pada Private Sub Login_Click tambahkan coding berikut :

Call koneksi()

        'membuat variabel mysql data redaer

      Dim dr As MySqlDataReader

        'membuat variabel mysqlcomand

        cmd = New MySqlCommand("select * from user_akses where username = '" & username.Text & "' and password = MD5('" & password.Text & "')", conn)

        'mengekseskusi data reader

        dr = cmd.ExecuteReader

        dr.Read()

        'membuat informasi apabila data di dalam DB user kosong/textbox kosong

        If Not dr.HasRows Then

            MsgBox("LOGIN GAGAL..", MsgBoxStyle.Information, Title:="INFORMASI")

            username.Text = ""

            password.Text = ""

            username.Focus()

        Else

           Me.Visible = False

           Menu_utama.Show()

            menu_utama.nama_user.Text = dr.Item("namauser")

            Menu_utama.hak.Text = dr.Item("hak")

        End If

·       -   Save file tersebut dengan menekan Ctrl + S

·        - Kembali ke menu master_Login Klik 2 kali pada Button cancel , lalu tambahkan skrip seperti berikut :

Me.Close()

·       -   Save file tersebut dengan menekan Ctrl + S

- Kemudian jalankan aplikasinya dengan menekan menu star yang ada di menubar

BACK #PART 1