急！急！这样的验证错在哪里了？

pdysuny 2003-11-19 04:35:21

我登录的时候，随便用个用户名和密码都能进去，下面这个验证难道不起作用？？
<%
Name=Request.form("uid")
Pwd=Request.form("pwd")
set Rs=Server.CreateObject("ADODB.recordset")
sql="select * from Reg where Id='"&Name&"'and Password='"&Pwd&"'"
rs.open sql,conn1,1,1
IF rs.RecordCount >=1 then
Session("UserName")=rs("testT")
Session("Id")=rs("Id")
response.redirect "goin.asp"
else
response.redirect "messagebox.asp?msg=会员登录失败，请您输入正确帐号和密码后再重新登录！"
End if
rs.close
conn1.close
%>

...全文

35 6 打赏收藏转发到动态举报

写回复

用AI写文章

6 条回复

切换为时间正序

请发表友善的回复…

发表回复

DeltaCat 2003-11-19

打赏
举报

<%
Name=Request.form("uid")
Pwd=Request.form("pwd")
set Rs=Server.CreateObject("ADODB.recordset")
sql="select * from Reg where Id='" & Name & "' and Password='" & Pwd & "'"
rs.open sql,conn1,1,1
IF rs.RecordCount>0 then
Session("UserName")=rs("testT")
Session("Id")=rs("Id")
response.redirect "goin.asp"
else
response.redirect "messagebox.asp?msg=会员登录失败，请您输入正确帐号和密码后再重新登录！"
End if
rs.close
conn1.close
%>

zzzzzzzzzzzzz 2003-11-19

打赏
举报

我估计你的错误不是在这段程序中，
好好检查以下其它的代码，是不是边的地方错了。

pdysuny 2003-11-19

打赏
举报

当然是验证用户名与密码是否正确了。

oliver007 2003-11-19

打赏
举报

看不懂你的意思了，
是想验证用户，还是想查询用户资料？

howmily 2003-11-19

打赏
举报

改成这样试试：
<%
dim Name,Pwd,sql,rs
Name=trim(request.form("uid"))
Pwd=trim(Request.form("pwd"))
set Rs=Server.CreateObject("ADODB.recordset")
sql="select * from Reg where Id='"&Name&"' and Password='"&Pwd&"'"
rs.open sql,conn1,1,1
IF rs.RecordCount>0 then
Session("UserName")=rs("testT")
Session("Id")=rs("Id")
response.redirect "goin.asp"
else
response.redirect "messagebox.asp?msg=会员登录失败，请您输入正确帐号和密码后再重新登录！"
End if
rs.close
conn1.close
%>

pdysuny 2003-11-19