ACCESS登录问题分不多，大家帮个忙

来源：百度知道编辑：UC知道时间：2024/05/20 21:18:37

分不多，大家帮个忙

我做了个用ACCESS数据库设计管理软件，登录用户验证密码才能进入主界面。密码和账号，登录权限放在一张员工表里面。
这是登录界面确定的代码。
Private Sub M132_Click()
Dim rst As New ADODB.Recordset
Dim strsql As String
strsql = "select 登录帐号,密码,权限 from 密码"
rst.Open strsql, CurrentProject.Connection, adOpenKeyset, adLockOptimistic
If Trim(Me.Tx1) = Trim(rst.Fields(0)) And Trim(Me.Tx2) = Trim(rst.Fields(1)) Then
MsgBox "登陆成功！"
Else
MsgBox "登陆失败，请重新登陆"
Me.Tx1.SetFocus
End If
End Sub

代码是我在网上找的，有写该了下，
rst.Open strsql, CurrentProject.Connection, adOpenKeyset, adLockOptimistic
点确定后说找不到输入表或查询“密码”，
DGDJ们帮忙看看。

sql="select * from 用户表 where name='"&name&"' and password='password'"
set rs=server.CreateObject("Adodb.Recordset")
rs.open sql,conn,1,3
if rs.eof then
response.write("<script>alert('用户名或密码不正确！\n\n请重新输入！');history.go(-1);</script>")
response.end
else
response.write("<script>alert('登陆成功！');window.location.href='index.asp';</script>");
Session("name")=name '记录Session
end if

vb连接ACCESS登录问题 ACCESS转SQL后，后台无法登录的问题 ACCESS 实现用户登录 access登录背景用Access制作登录界面 ACCESS问题 Access问题。 access问题 access问题!!!! 登录问题

ACCESS登录问题 分不多 ，大家帮个忙

ACCESS登录问题分不多，大家帮个忙