Tutorial VB.Net Aplikasi Penjualan (PART 4)

Bona    Wednesday, April 01, 2015    IT_News , VB_Net    Comment   

Hey Kawan Relainc Andro, Kini sudah proses kedalam pembuatan Login Aplikasi Lohh... Ini kita Membuat Login untuk keamanan Aplikasi.

Pada Sebelumnya kita sudah membuat Module untuk Loading Form dengan Progress bar, maka selanjutnya adalah proses aunthetication masuk kedalam aplikasi atau login aplikasi.

Oke langsung ajah kita masuk ke topik pembahasan

1. Kita Klik kanan pada Project
2. Klik Add
3. Klik Windows Forms
4. Setelah itu berikan nama sesuai dengan nama form yang diiinginkan, (disini saya menamakan Login.frm)

Form Login Tutorial Aplikasi Penjualan -RELAINC ANDRO-

1. Setelah itu kita Ambil/Drag Textboxt, Label, Button ke dalam Form
2. Namakan Textboxt, Label, Button tersebut dengan nama yang mudah diingat (pada properties -> name Menjadi)
3. Masukan/Drag label dengan Nama LOGIN (Terserah kemauan Anda)
4. Masukan/Drag label dengan Nama Username (Terserah kemauan Anda)
5. Masukan/Drag label dengan Nama Password (Terserah kemauan Anda)
6. Masukan/Drag Textbox dengan Nama Tnamauser (Terserah kemauan Anda)
7. Masukan/Drag label dengan Nama tpassword (Terserah kemauan Anda)
8. Masukan/Drag Button dengan Nama BtnLogin (Terserah kemauan Anda)
9. Masukan/Drag Button dengan Nama BtnBatal (Terserah kemauan Anda)
10. Masukan/Drag Button dengan Nama BtnTutup (Terserah kemauan Anda)
11. Design Form Semenarik Mungkin Sesuai Jiwa Seni yang anda miliki.

Berikut Source Code yang harus di buat didalam Form Login.

Karena Menggunakan Koneksi dengan database Ms.Access maka harus diikut sertakan Koneksi dengan Oledb database
seperti berikut ini :

Imports System.Data.OleDb

Setelah itu Kita Akana Buat untuk mengosongkan data pada textbox Username dan Password

    Sub kosongkan()
        Tpassword.Text = ""
        Tnamauser.Text = ""
        Tpassword.Focus()
    End Sub

dan Coding Diatas tersebut dipakai di Event Button Batal seperti berikut :

Private Sub Btnbatal_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btnbatal.Click
        Call kosongkan()
End Sub

Setelah itu Jika Nama dan password di temukan maka ada di event Button Login dan berikut Code Programnya :

 Private Sub Btnlogin_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btnlogin.Click

        If Tpassword.Text = "" Or Tnamauser.Text = "" Then
            MessageBox.Show("Kode user dan nama user harus di isi")
            Tnamauser.Focus()
        Else
        End If

        Call koneksi()
        cmd = New OleDbCommand("select * from petugas where nama = '" & Tnamauser.Text & "'", conn)
        rd = cmd.ExecuteReader
        rd.Read()
        If rd.HasRows Then
            Menu_utama.Show()
            Menu_utama.kode.Text = rd.Item("id_petugas")
            Me.Visible = True
        Else
            MsgBox("data tidak ada")
        End If
    End Sub

Dan Untuk Validasi Textbox Bisa Menggunakan Code seperti dibawah ini :

Private Sub Tnama_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles Tnamauser.KeyPress       

  Tnamauser.MaxLength = 10
        If e.KeyChar = Chr(13) Then
            Tpassword.Focus()
        End If 

    End Sub

    Private Sub Tkode_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles Tpassword.KeyPress         

Tpassword.MaxLength = 30
        If e.KeyChar = Chr(13) Then
            Btnlogin.Focus()
        End If 

    End Sub

dan Jika ingin Keluar dari Program atau Aplikasi maka ada di event Button Exit/Keluar dengan Code dibawah ini :

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btntutup.Click
        Me.Close()
End Sub  

Terima Kasih untuk pembaca setia RELAINC ANDRO, Semoga Postingan ini sangat bermanfaat untuk temen - temen semua. Semoga bisa menjadi ILMU yang BERMANFAAT. Aamiin.. Kita baca Next Tutorial ya teman - teman RELAINC ANDRO.
jangan Lupa untuk di share ya kawan.. (^_^).

Salam RELAINC ANDRO.