Berikut ini akan saya berikan tutorial bagaimana cara membuat form login
sederhana dan juga file mdb form login yang bisa anda download gratis..
1. Pertama-tama silahkan anda buka program Microsoft access terlebih dahulu.
Pilih yang Blank Document, dan anda akan mendapati tampilan dasar ms.access.
Table-table yang anda perlu buat cuma 1 tabel dengan nama TUser dengan field UserID, UserName, dan UserPassword.
2. Setelah itu buat form dengan FORM DESIGN
Buat: 1 combo box dgn name: cboNama, caption: User name
relasikan combo dengan tabel TUser , pilih UserID dan UserName dengan UserName sebagai Pengatur relasinya.
1 textbox dengan name: txtPword dan caption : password
2 buah Command: 1 command login dengan name: cmdLogin
1 buah command exit dengan name :cmdExit
Atur posisi seperti gambar diatas, bisa dimodofikasi sesuai keinginan anda sendiri.
3. klik kanan di cmdLogin, pilih Build Event..
masukkan kode VBA dibawah ini:
If IsNull(Me.cboNama) Or Me.cboNama = "" Then
MsgBox "Pilih Username anda terlebih dahulu", vbOKOnly, "Masukkan Username"
Me.cboNama.SetFocus
Exit Sub
End If
If IsNull(Me.txtPword) Or Me.txtPword = "" Then
MsgBox "Passwordnya jangan lupa dimasukkan", vbOKOnly, "Masukkan Password"
Me.txtPword.SetFocus
Exit Sub
End If
If Me.txtPword.Value = DLookup("UserPassword", "TUser", "[UserID]=" & Me.cboNama.Value) Then
MyUserID = Me.cboNama.Value
MsgBox "Login anda berhasil", vbOKOnly, "Message Hellion"
DoCmd.Close acForm, "LOGIN2", acSaveNo
DoCmd.OpenForm "Switchboard"
Else
MsgBox "Password yang anda masukkan salah boss, harap perhatikan caps lock anda", vbCritical, "Hellion Message"
Me.txtPword.SetFocus
End If
Untuk msgbox diatas bisa diganti sesuai keinginan anda.. dan yang berwarna merah muda diganti sesuai tujuan form selanjutnya..
mungkin sekian tutorial singkat untuk membuat form LOGIN dari saya..
silahkan men-COPAS postingan ini tp jangan lupa sertakan sumbernya yaa..
Dibawah ini cuplikan Form LOGIN yang saya bagikan tersebut:
Untuk yang mau download filenya, silahkan klik tautan dibawah ini..
User ID Password
admin admin
arief hellion
manarap city
semoga bermanfaat.. Download File LOGIN.mdb
1 komentar:
debug di MyUserID mas....mohon pencerahannya
Posting Komentar