Fungsi form login ini digunakan untuk validasi suatu aplikasi dengan tujuan untuk keamanan aplikasi tersebut.
Pertama-tama bukalah program visual basic kalian :
- Start - All program - visual basic 6.0.
- Pilih yang standard.exe
- Buat Form baru dengan nama Form_Login dan Form_Utama seperti berikut ini :
- Sekarang isikan kode-kode program berikut ini di form_login :
- Penjelasan dari code tersebut adalah sebagai berikut :
Option Explicit
Private Sub Command1_Click()
If Text1.Text = "admin" And Text2.Text = "admin" Then
Unload Me
Form_Utama.Show
Form_Utama.mnfile.Enabled = True
Form_Utama.mninsert.Enabled = True
Form_Utama.mnformat.Enabled = True
ElseIf Text1.Text = "kasir" And Text2.Text = "kasir" Then
Unload Me
Form_Utama.Show
Form_Utama.mnfile.Enabled = False
Form_Utama.mninsert.Enabled = True
Form_Utama.mnformat.Enabled = True
Else
MsgBox "User name atau password salah"
Exit Sub
End If
End Sub
Private Sub Command2_Click()
End
End Sub
Logikanya seperti ini, Jika User Name di isi dengan nama "admin" dan password "admin" kemudian user menekan tombol "Login" maka Form_Login akan keluar dan Form_Utama akan tampil dan menu File, Insert, Format masing-masing akan aktif.
Akan tetapi jika username di isi "kasir" dan password "kasir" kemudian user menekan tombol "Login" maka Form_Login akan keluar dan Form_Utama akan tampil kemudian menu File akan tidak aktif dan insert, format akan aktif.
Dan jika username dan password di isi dengan nama lain, maka akan muncul pesan "User name dan password salah". Sedangkan Command2 berfungsi untuk membatalkan masuk aplikasi.
Demikian tutorial singkat ini dibuat, semoga bermanfaat.
0 Komentar:
Post a Comment