Question

ASP的问题......在线等 急！！！！！！

己学习ASP 我的ASP文件代码如下：

<!--#include file="inc/config.asp"-->
<!--#include file="inc/conn.asp"-->
<!--#include file="inc/code.asp"-->
<!--#include file="inc/SqlIn.Asp"-->
<%
'=====================================================================
'=====================================================================
user=request("user")
pass=request("pass")
id=request("id")

dim xianzai,daoqi

if user<>"" and pass<>"" and id<>"" then
set rs=server.createobject("adodb.recordset")
sql="select * from userdate where user1='" & user & "'"
rs.open sql,conn,1,1
if rs("End_Time")<>"" then
daoqi=rs("End_Time")
xianzai=Now()
end if
if md5(pass)<>rs("pwss1") then
rs.close
response.write "Error,用户名或密码不正确"
response.end
end if
if xianzai > daoqi then
rs.close
response.write "Error,帐户已经过期，请充值"
response.end
end if
if rs("Lock1")=true then
rs.close
response.write "Error,你的帐户已被管理理锁定"
response.end
end if
response.write rs("games1")
response.write (",")
response.write id
response.write (",")
response.write daoqi
Else
response.write "Error,参数无效"
response.end
end if
%>

api.asp 我调用 http://127.0.0.1/api.asp?user=帐号&pass=密码&id=随机数
帐户 密码都是对的情况下 还是不能登陆。。提示：用户名或密码不正确

不知道是哪的问题 请ASP高手帮忙解决下。。

Answer 1

肯定是两者之间存在不相同，使用trim去掉左右空格试试
if md5(pass)<>trim(rs("pwss1") then
如果还是不行
set rs=server.createobject("adodb.recordset")
sql="select * from userdate where user1='" & user & "'"
'rs.open sql,conn,1,1
'临时调用更新新的密码到数据库中
rs.open sql,conn,2,3
rs("pwss1") = md5(pass)
rs.update
response.end
'更新完成，把上面的代码注释掉，把更新之前的代码去掉注释
if rs("End_Time")<>"" then
daoqi=rs("End_Time")
xianzai=Now()
end if
if md5(pass)<>rs("pwss1") then
rs.close
response.write "Error,用户名或密码不正确"
response.end
end if

Answer 2

if md5(pass)<>rs("pwss1") then
rs.close
response.write "Error,用户名或密码不正确"

最后一句改一下， Response.Write "Error,用户名或密码不正确" & "<br/>用户输入密码加密后的密文=“ & md5(pass) & "<br/>数据库中读出的加密后密码密文=” & rs("pwss1")

你看看，你输入的密码是否是正确的。

追问

我确定我输入的帐户和密码是正确的。。。不知道到底那错了啊。。

追答

你可以运行我修改后的代码，如果发现两个密文不一样，那复制前一个密文，替换数据库里的那个密文，再来登录试试。

现在基本可以确定，你的密码是错的。

追问

好象还是不对啊。。。 你有没有QQ啊 我加你 我把文件发你你详细帮我看看。。。搞定的话送你点QB啊

追答

替换了还不行？那你要确认一下，数据库是不是在它后面自动加空格补足了？
如果这样，判断改成：
if md5(pass)trim(rs("pwss1")) then

追问

你有QQ吗 我把文件发你 你帮我改下吧 我是菜鸟 才开始学ASP的。。

追答

对不起，公开场合不留QQ。

Answer 3

按lingsmm说的，不行替换一下数据库中的pwss1值就好了嘛

追问

能给一段代码吗？ 我是新手。。还不是很懂