⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 findid.asp

📁 进入后台
💻 ASP
字号:
<!--#include file="config.asp"-->
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
"http://www.w3.org/TR/html4/loose.dtd">
<!--#include file="head.asp"-->
<!--#include file="md5.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title><%=Sitename%>-找回密码</title>
<LINK href="css.css" type=text/css rel=stylesheet>
</head>
<body>
<%sitehead%>
<table width="760"  border="0" align="center" cellpadding="0" cellspacing="0" class="border">
        <tr>
          <td height="291" valign="top">
            <table width="100%"  border="0" align="center" cellpadding="0" cellspacing="0" class="border">
        <tr>
          <td height="25">  <img src="skins/1/xb3.gif">&nbsp;当前位置:<a href="index.asp">首页</a> &gt;&gt; 找回密码</td>
          </tr>
      </table>
            <br>
		<%select case request("type2")
			case "b"
			call b
			case "c"
			call c
			case else
			call aa
			end select
			sub aa%>
			<table width="90%"  border="0" align="center" cellpadding="0" bordercolor="#CCCCCC" class="border">
               <form name="userreg" method="post" action="?type2=b"><tr bgcolor="#F7F7F7">
                <td height="20" colspan="2"><div align="center">第一步:输入用户名</div></td>
                </tr><tr>
                <td width="27%" height="20"><div align="right"> 用户名:</div></td>
                <td width="73%"><div align="left">
                  <input name="yvsyname" type="text" class="formtext" id="yvsyname" maxlength="15">
                <font color=red>* 请输入要取回密码的用户名</font></div></td>
              </tr>
              <tr>
                <td>&nbsp;</td>
                <td><div align="left">
                    <input name="Submit" type="submit" class="button3" value="下一步">
                </div></td>
              </tr> </form>
            </table>
			<%end sub
			
			Function b
			yvsyname=obj.regstr(request.form("yvsyname"))
if yvsyname="" then ShowError("请输入用户名")
	rs.open "select question from [user] where username='"&yvsyname&"'",conn,1,1
			if rs.eof then 
			ShowError("用户名不存在")
			exit Function
			end if%>
			<table width="90%"  border="0" align="center" cellpadding="0" bordercolor="#CCCCCC" class="border">
               <form name="userreg" method="post" action="?type2=c"><tr>
                <td height="20" colspan="2"><div align="center">第二步:输入问题答案</div></td>
                </tr><tr>
                <td width="27%" height="20"><div align="right"> 提示问题:</div></td>
                <td width="73%"><div align="left"><%=rs(0)%>
                  <input name="users" type="hidden" id="users" value="<%=yvsyname%>">
                </div></td>
              </tr>
			  <tr>
                <td width="27%" height="20"><div align="right"> 问题答案:</div></td>
                <td width="73%"><div align="left">
                  <input name="wtda" type="text" class="formtext" id="wtda" maxlength="20">
                <font color=red>* 请输入问题的答案</font></div></td>
              </tr>
              <tr>
                <td>&nbsp;</td>
                <td><div align="left">
                    <input name="Submit" type="submit" class="button3" value="下一步">
                </div></td>
              </tr> </form>
            </table>
<%rs.Close:Set rs = Nothing
		end Function
Function c
			users=obj.regstr(request.form("users"))
			wtda=obj.regstr(request.form("wtda"))
if users="" then ShowError("请输入用户名")
if wtda="" then ShowError("请输入问题答案")
		rs.open "select password,answer from [user] where username='"&users&"'",conn,1,3
			if rs.eof then 
			ShowError("用户名不存在")
			exit Function
			end if
			if md5(wtda)=rs(1) then
			rs("password")=md5("yvsy.com")
			rs.update			
		response.write("密码取回成功!<br><br>你的新密码为:yvsy.com<br><br>请立即登录帐号,并修改密码。<br><br>谢谢您对"&Sitename&"的支持")
	else
			ShowError("问题答案错误")
			end if
			rs.Close:Set rs = Nothing
end Function
CloseConn%>
</td></tr>
</table>
<%sitebottom%>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -