Tùy chọn
Cho em hoi Form Login
- Cho em hoi Form Login
-
Cho em hoi Form Login
joannanguyen2508 > 03-08-11, 09:37 PM
E có làm form Login gồm 1 combo box chứa các ID, 1 text box để nhập password
1 button Login
Code Button Login thì nó chạy debug ra lỗi chỗ này
If Me.Text7.Value = DLookup("Password", "tblLogin", "[StudentID]=" & Me.Combo11.Value) ThenStudentID = Me.Combo11.Value
Đây là đoạn code đầy đủ của em :
Private Sub Command10_Click()
If IsNull(Me.Combo11) Or Me.Combo11 = "" Then
MsgBox "Nhap vao UserName.", vbOKOnly, "Required Data"
Me.Combo11.SetFocus
Exit Sub
End If
If IsNull(Me.Text7) Or Me.Text7 = "" Then
MsgBox "Nhap vao Password.", vbOKOnly, "Required Data"
Me.Text7.SetFocus
Exit Sub
End If
If Me.Text7.Value = DLookup("Password", "tblLogin", "[StudentID]=" & Me.Combo11.Value) Then
StudentID = Me.Combo11.Value
DoCmd.Close acForm, "Form2", acSaveNo
DoCmd.OpenForm "Form1"
Else
MsgBox "Password ko dung, thu lai", vbOKOnly, "Invalid entry!"
Me.Text7.SetFocus
End If
End Sub
Table cua e tên là tblLogin, co 2 fields là StudentID, Password.
Mong các anh chị chỉ giúp
-
RE: Cho em hoi Form Login
quanghoasla > 03-08-11, 10:09 PM
bạn tham khảo bài này nhé. http://thuthuataccess.com/forum/Thread-g...form-login. chúc bạn vui vẻ -
RE: Cho em hoi Form Login
joannanguyen2508 > 03-08-11, 11:38 PM
Minh cung lam nhu vay ban oi .... no bao loi
Runtime error '2471':
The expression you entered as a query parameter produced this error:'nam'
Mình không hiểu, làm đi làm lại nhiều lần lắm rồi... ai biết hay đã từng bị rồi giúp với
-
RE: Cho em hoi Form Login
mrchau911 > 04-08-11, 04:28 PM
bạn nên tạo đơn giản thôi .
cấu trúc như thế này
2 textbox (1text là ID , 1text là Pass), 2 command (1cmd là dangnhap , 1cmd là đóng)
dùng cấu trúc If thôi
gáng T1 = Teo
T2 = Kuteo
nhập sai Id + pass báo lỗi và suất msgbox " ID: Teo ; Pass: Kuteo"
nhập đúng thì suất msgbox " dang nhap thanh cong"
docmd.close
docmd.openform Formchinh
end if
đơn giản vậy thôi .