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

📄 forgetpassword.asp

📁 ASP程序实现的科技期刊系统
💻 ASP
字号:
<html>
<head>
<title>查询密码</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<style>
td{font-size:9pt}
.button
{
    BACKGROUND-COLOR: #e6f4ff;
    BORDER-BOTTOM: #0099ff 1px solid;
    BORDER-LEFT: #0099ff 1px solid;
    BORDER-RIGHT: #0099ff 1px solid;
    BORDER-TOP: #0099ff 1px solid;
    COLOR: #336699;
    HEIGHT: 18px;
    TEXT-ALIGN: center
}

</style>
</head>
<body bgcolor="#FFFFFF" text="#000000">
<%
UserCode=trim(Request("UserCode"))
if userCode="" then
%>
<table style="font-size:9pt" width="400" border="0" align="center" bordercolor="#FF0000" cellpadding="0" cellspacing="1" bgcolor="#3399FF">
  <form name="form1" method="post" action="../user/forgetPassword.asp">
    <tr align="center" bgcolor="#3C9DCC"> 
      <td colspan="2" height="18"> <font color="#FFFFFF">=======  忘 记 密 码  =======</font></td>
    </tr>
    <tr bgcolor="#FFFFFF"> 
      <td width="125" height="18" align="center">请输入您的用户编码:</td>
      <td width="266" height="18">
        <input type="text" name="UserCode" maxlength="6">
      </td>
    </tr>
    <tr bgcolor="#FFFFFF"> 
      <td colspan="2" height="18" align=center> 
        <input type="submit" name="Submit3" value="提交" onClick="return checkfun1()" class="button">
        <input type="reset" name="Submit22" value="重置" class="button">
        <input type="button" name="Submit4" value="返回" class="button" onclick="back()">
      </td>
    </tr>
    <tr bgcolor="#3C9DCC"> 
      <td colspan="2" height="2"></td>
    </tr>
  </form>
</table>
<%else%>
<!--#include file="../Include/AdoConn.asp"-->
<%set rst=server.CreateObject ("ADODB.recordset")
StrSQL="select * from XT_VC_User where 用户编码='"+UserCode+"'"
	rst.CursorType =3
	rst.CursorLocation =3
	rst.LockType =2
rst.Open StrSQL,strconn
if not rst.EOF then
%>
<table style="font-size:9pt" width="400" border="0" align="center" bordercolor="#FF0000" cellpadding="0" cellspacing="1" bgcolor="#3399FF">
  <form name="form1" method="post" action="../user/forgetPassword.asp">
    <tr align="center" bgcolor="#3C9DCC"> 
      <td colspan="2" height="18"> <font color="#FFFFFF">=======  忘 记 密 码  =======</font></td>
    </tr>
    <tr bgcolor="#FFFFFF"> 
      <td width="125" height="18">您的查询密码问题是:</td>
      <td width="266" height="18"><%=rst("查询密码问题")%></td>
    </tr>
    <tr bgcolor="#FFFFFF"> 
      <td width="125" height="18">请输入查询答案:</td>
      <td width="266" height="18"> 
        <input type="text" name="answer" maxlength="200">
        <input type="hidden" name="usercode" value="<%=rst("用户编码")%>" maxlength="200">
      </td>
    </tr>
    <tr bgcolor="#FFFFFF"> 
      <td colspan="2" height="18" align=center> 
        <input type="submit" name="Submit" value="提交" class="button" onclick="return checkfun2()">
        <input type="reset" name="Submit2" value="重置" class="button">
        <input type="button" name="Submit42" value="返回" class="button" onClick="back()">
      </td>
    </tr>
    <tr bgcolor="#3C9DCC"> 
      <td colspan="2" height="2"></td>
    </tr>
  </form>
</table>
<%else%>
<table style="font-size:9pt" width="400" border="0" cellspacing="0" cellpadding="0" align="center">
  <tr> 
    <td width="42" height="20">&nbsp;</td>
    <td width="358" height="20">无此用户名!!</td>
  </tr>
  <tr> 
    <td width="42" height="20">&nbsp;</td>
    <td width="358" height="20">请<a href="forgetPassword.asp"><font color="#000000">重新输入</font></a>用户编码,</td>
  </tr>
  <tr>
    <td width="42" height="20">&nbsp;</td>
    <td width="358" height="20">或<a href="UserCode_Edit.asp"><font color="#000000">注册</font></a>新用户。</td>
  </tr>
</table>

<%Response.End 
end if
%>
<%
answer=trim(request("answer"))
if rst("查询密码问题答案")=answer then %>
<br>
<table style="font-size:9pt" width="400" border="0" cellspacing="0" cellpadding="0" align="center">
  <tr> 
    <td width="82"><img src="../public/images/happy.gif" width="50" height="60"></td>
    <td width="318"> 
      <p>恭喜:您的密码找到了。记住了!!<br>
        <br>
        <%="您的密码是:"+rst("密码")%><br>
        <br>
        <a href="../index.asp">重新登录</a> </p>
    </td>
  </tr>
</table>
<%else%>
<%if answer<>"" then%>
<br>
<table width="300" border="0" cellspacing="0" cellpadding="0" align="center">
  <tr>
    <td width="55"><img src="/Messagebox/Images/041gaofe.gif" width="50" height="40"></td>
    <td width="245">  对不起,您输入的查询密码答案不正确,请重新输入!</td>
  </tr>
</table>
<%end if%>
<%end if%>
<%end if%>

<script language="vbscript">
	function checkfun1()   '校验输入用户编码表单
		checkfun1=true
		if not form1.UserCode.value<>""  then 
			checkfun1=false
			window.alert "请输入用户编码!"
			exit function
		end if
	end function

	function checkfun2()   '校验查询密码提示问题
		checkfun=true
		if not form1.Answer.value<>""  then 
			checkfun=false
			window.alert "请输入查询密码问题答案!"
			exit function
		end if
	end function
	function back()
	history.back 
	end function
</script>
</body>
</html>

⌨️ 快捷键说明

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