如何在访问表单中检查正确的登录数据
How to check the right login data in access form
我在访问中创建了一个很好的登录表单。问题是我可以登录,尽管我使用大写或小写的用户名或密码...
如何检查 table 中的正确登录数据?
我现在使用这个代码:
If Nz(DLookup("Login", "Employee", _
"DBPass='" & Me!DBPass & "'"), "") = "'" & Me.User & "'" Then
MsgBox "The User doesn't exist!", vbOKOnly + vbInformation, "Check"
Me.User.SetFocus
End If
我建议您保留默认值,但是,您可以使用 StrComp
检查大小写
StrComp("Abc","Abc",vbBinaryCompare)
等于 0 但
StrComp("Abc","ABC",vbBinaryCompare)
等于1。
我在访问中创建了一个很好的登录表单。问题是我可以登录,尽管我使用大写或小写的用户名或密码...
如何检查 table 中的正确登录数据?
我现在使用这个代码:
If Nz(DLookup("Login", "Employee", _
"DBPass='" & Me!DBPass & "'"), "") = "'" & Me.User & "'" Then
MsgBox "The User doesn't exist!", vbOKOnly + vbInformation, "Check"
Me.User.SetFocus
End If
我建议您保留默认值,但是,您可以使用 StrComp
检查大小写 StrComp("Abc","Abc",vbBinaryCompare)
等于 0 但
StrComp("Abc","ABC",vbBinaryCompare)
等于1。