Cara membuat login pada VB.net
dengan database mysql server
Cara membuat login pada VB.net
dengan database mysql server
Pada pertemuan kemarin saya sudah membahas tentang cara membuat module koneksi dengan database menggunakan mysql server. Kali ini akan saya lanjutkan dengan cara membuat login pada VB net. Oke langdung saja ikuti langkah-langkah berikut.
- Sebelumnya baca dulu : Cara membuat module koneksi pada vb net.
3. Buat lagi form baru untuk tampilan pertama setelah login => desain seperti gambar di bawah => buat posisi awal tampilan berada di tengah layar (perhatikan bagian kanan bawah yang di lingkari) => WindowsDefaultLocation ganti dengan CenterScreen.
4. Klik 2x pada form login => isi koding seperti berikut.
Imports System.Data.MysqlClient
Public Class login
Sub login()
cmd = New MysqlCommand("select * from tbl_login where username='" & TextBox1.Text & "' and password='" & TextBox2.Text & "'", conn)
dr = cmd.ExecuteReader
dr.Read()
End Sub
Sub kosong()
TextBox1.Text = ""
TextBox2.Text = ""
TextBox1.Focus()
End Sub
Private Sub login_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Call koneksi()
TextBox1.Focus()
End Sub
5. Klik 2x pada button login => isikan koding sebagai berikut.
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Call login()
If dr.HasRows Then
Me.Hide()
Form1.Show()
Else
MsgBox("Username/password yang anda masukan salah")
End If
End Sub
6. Klik 2x pada button batal => isikan koding sebagai berikut.
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
Call kosong()
End Sub
End Class
Untuk lebih jelasnya lihat gambar di bawah.
7. Setelah itu jalankan program/start => isikan username dan password => maka akan tampil tampilan utama seperti yang kita buat di langkah 3 tadi. Jika anda melakukan cara di atas dengan benar, pasti akan sukses.
Selanjutnya akan saya teruskan dengan pembuatan SIMPAN, EDIT, DELETE, PENCARIAN. Sekian dan semoga bermanfaat. Terimakasih.
No comments:
Post a Comment