Tutorial
Membuat Program Login & Password
assalamualikum wr.wb
Masih tentang KKPI. Bersangkutan dengan postingan yang sebelumnya Cara Membuat Form dan Memodifkasi Form maka saya akan melanjutkannya dengan posting tentang cara membuat program login dan password pada microsoft access. memang tidak banyak tapi dengan postingan ini somoga yang melihatnya dapat mengetahui sedikit lagi tengtang/ materi KKPI. ok langsung di pelajari saja!!
Tutorial Membuat Program Login & Password
Untuk membuat form
login, langkah – langkahnya sebagai berikut :
a) Buat tabel baru dgn nama Tuser dan definisikan field dgn
nama Userid dan Pword, keduanya bertipe text.
b) Buat form baru dan tempatkan 2 buah textbox. Namakan
textbox dengan User ID dan Password, keduanya bertipe text.
c) Untuk textbox, txtpword ubah pada properties untuk
input mask menjadi
d)
Lalu tambahakan script untuk event click button cmdlogin :
Dim db As
Database
Dim rs As
recordiset
Set db =
currentDb()
Set rs =
db.OpenRecordiset("select * form Tuser where UserId='" & txtuser
& "' and password ='" & txtpword & "'",
dbOpenDynaset)
If
rs.RecordCount > 0 Then
pesan =
MsgBox("login Sukses", vbOKOnly, "sukses")
Else
pesan =
MsgBox("Login Gagal, masukan userid dan password", vbOKOnly,
"Gagal")
End If
e)
Dan ini lah hasilnya
SELESAI
Sekian yang dapat saya berika, mohon maaf jika kurang memadai. dan terima kasih atas
kunjungannya, Hatur thank you!!
Created by : alrasidaldi
0 comments: