mungkin... If Me![TxtID] = id And Me![Password] = pw Then menjadi :
If Me![TxtID] = id And Me![txtPassword] = pw Then ----- Original Message ---- From: Asep <[EMAIL PROTECTED]> To: [email protected] Sent: Tuesday, September 18, 2007 1:06:31 AM Subject: [belajar-access] Login Menu Assalamu’alaikum Wr. Wb., Dear para suhu Access, Saat ini saya sedang ingin belajar membuat form untuk login user ke database. Dalam form design saya membuat 2 textbox dengan nama TxtID dan TxtPassword, kemudian dalam form tersebut saya buat command Button dengan even On Click dengan coding sbb: Private Sub CmdLogin_Click() Dim id As String, pw As String Dim pesan As String id = DLookup("[Nama]", "[t_password]") pw = DLookup("[Pass]", "[t_password]") If Me![TxtID] = id And Me![Password] = pw Then DoCmd.OpenForm "Form utama" Else pesan = MsgBox("User ID dan Password Salah...", vbYesNo, "Password Salah….") If pesan = vbYes Then Me![TxtID].SetFocus End If If pesan = vbNo Then DoCmd.Quit End If End If End Sub Dan dalam database juga saya membuat table T_Password yang berisi Field Nama dan Pass, masalahnya ketika saya masukan ID dan Password hanya satu ID dan satu password saja yang bisa dikenal lainnya tidak bisa dipakai login. Mohon pencerahannya dari para Master Access, sebelumnya saya ucapkan terima kasih. Wassalamu’alaikum Wr. Wb., Asep “Selamat Menunaikan Ibadah Puasa 1428H, semoga amal ibadah kita diterima Allah SWT. Amiiiin….” v ____________________________________________________________________________________ Luggage? GPS? Comic books? Check out fitting gifts for grads at Yahoo! Search http://search.yahoo.com/search?fr=oni_on_mail&p=graduation+gifts&cs=bz
