梦幻西游2绿色通道仙玉:asp密码找回代码

来源:百度文库 编辑:神马品牌网 时间:2024/04/30 16:31:30
user=request.form("user")

set conn=server.CreateObject("ADODB.Connection")
conn.open "Driver={Microsoft Access Driver (*.mdb)};DBQ="&_
server.MapPath("bata/db3.mdb")
set rs=server.createobject("ADODB.Recordset")
sql="select * from consumer where username=''"&user&""
rs.open sql,conn,3,3
if rs.eof=true then
a="该用户名不存在。"
%>
<tr><td height="30"></td></tr>
<tr>
<td ><%=a%></td>

</tr>
<%else if rs("qu")="" then
a="你没有设置密码提示问题,无所找回密码。"
%>
<tr><td height="30"></td></tr>
<tr>
<td ><%=a%></td>

</tr>
<%else
a=rs("qu")

%>
<tr><td height="30"></td></tr>
<tr>
<td><form name="form1" method="get" action="user_getpass2.asp">
<table width="100%" border="0" cellspacing="0" cellpadding="1">

<tr>
<td height="30" colspan="2"><font size="4"> </font></td>
</tr>
<tr>
<td ><%=a%></td>
</tr>
<tr>
<td width="20%"><div align="right">请输入您的答案:</div></td>
<td width="80%"><div align="left">
<input name="key" type="text" size="20">
</div></td>
</tr>
<tr>
<td height="30"> </td>
<td> </td>
</tr>
<tr>
<td><div align="right"></div></td>
<td><div align="left">
<input type="submit" name="Submit" value="确定">
</div></td>
</tr></table>
</form></td>
</tr>
<%
end if
end if
rs.close
set rs=nothing
conn.close
set conn=nothing
%>

为什么执行的会部显示该用户名不存在。
我想实在的功能是,先检测该用户是否存在,然后再检测是否有密码提示问题。如果先两条都退过,则要求输入密码提示问题答案。
我不知道代码这么写是不是可以。如果不可以,什么样的代码能够实现我想要的功能。
我将前面的代码改成
<%
user=request.form("user")
set conn=server.CreateObject("ADODB.Connection")
conn.open "Driver={Microsoft Access Driver (*.mdb)};DBQ="&_
server.MapPath("bata/db3.mdb")
set rs=server.createobject("ADODB.Recordset")
sql="select * from consumer where username='"&user&"' "
rs.open sql,conn,1,3
if rs.eof and rs.bof then
a="该用户名不存在。"
elseif rs("qu")="" or rs("qu")=null then
a="你没有设置密码提示问题,无所找回密码。"
%>
<tr><td height="30"></td></tr>
<tr>
<td ><%=a%></td>
</tr>
之后,运行只显示空白页,输入未注册的用户名,这次也不提示没有该用户了。。:(

sql="select * from consumer where username='"&user&"'"
rs.open sql,conn,3,3
if rs.eof then
a="该用户名不存在。"
%>

username='"&user&"'"

if not rs.eof then

你把FORM提交方式改成POST,不要用GET,你试试看.

把这段修改为
sql="select * from consumer where username='"&user&"'"
rs.open sql,conn,1,3
if rs.eof and rs.bof then
a="该用户名不存在。"