Public Function adlogin() As Boolean
Dim str As Database
Dim rs
Set str = CurrentDb
Set rs = str.OpenRecordset("select管理用户,登录密码 from 管理员信息where 管理用户 ='" & Me.管理用户 & "'and 登录密码='" & Me.登录密码 & "'")
If Not rs.EOF Then
If rs.Fields("登录密码") = Me.登录密码 Then adlogin = True
End If
End Function
这个里面
Set rs = str.OpenRecordset("select管理用户,登录密码 from 管理员信息where 管理用户 ='" & Me.管理用户 & "'and 登录密码='" & Me.登录密码 & "'")
这个一直说是错误的 我应该怎么改呢？？？在线等