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

📄 getpwd.asp

📁 网吧影印系统!很详细!可直接使用!请大家指点!
💻 ASP
字号:
<!--#include file="CONN.ASP"-->
<!--#include file="../MD5/md5.asp"-->
<!--#include file="../checkpost.asp"-->
<%step=request("step")
if step="" then
step=1
elseif step>3 then
response.write "<script language=JavaScript>" & chr(13) & "alert('系统出现错误.请输入正确信息!');" & "history.back()" & "</script>"
Response.End
end if
if step=1 then%>
<html>
<head>
<title>七彩影院-密码找回系统</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">

<link href="../images/style.css" rel="stylesheet" type="text/css">
</head>
<center>

<table width="525" border="0" cellpadding="0" cellspacing="0" height="1">
  <tr> 
    <td width="726" height="1" bgcolor="#FFFFFF">
	
	<table width="521" border="0" cellspacing="0" cellpadding="0" height="95">
  <tr>
    <td width="521" bgcolor="#FFFFFF" height="95" valign="top"><br>

<table width="90%" border="1" cellspacing="0" cellpadding="6" bordercolorlight="#999999" bordercolordark="#ffffff" align="center" height="119">
<tr><td height="16" width="498" ><div align="center" class="title">用 户 取 回 密 码</div></td></tr><tr> 
          <td height="39"> <div align="center">
<TABLE width="45%" border="0" cellspacing="1" cellpadding="0" align="center"
      bordercolordark="#ecf5ff" bordercolorlight="#c0c0c0" height="57">
							<FORM method="post" action="getpwd.asp?step=2"><TR>
          <TD height="31">
									<TABLE width="496" border="0" cellspacing="1" cellpadding="0">
										<TR> 
											<TD width="213" align="right" height="30" >用户名:</TD>
              
											<TD width="280" > 
												<!--webbot bot="Validation" b-value-required="TRUE" i-maximum-length="12" --><INPUT name="user" maxlength="12" class="button1" size="20"> </TD>
            </TR>
           								</TABLE>
          </TD>
        </TR>
        <TR align="center">
          
								<TD height="24" > 
									<INPUT  type="submit" name="Submit" value="下一步" class="button1">&nbsp;&nbsp; </TD>
        </TR>
      </FORM></TABLE></div></td>
</tr></table>
<br>
</td>
  </tr>
</table>
</center></body>
</html>
  <%
  elseif step=2 then
   set rs_1=server.createobject("adodb.recordset")
    sql="select * from users where userid='"&replace(trim(request("user")),"'","")&"'"
    rs_1.open sql,conn,1,1
    if ( rs_1.bof and rs_1.eof) then
    response.write "<script language=JavaScript>" & chr(13) & "alert('系统出现错误.请输入正确信息!');" & "history.back()" & "</script>"
    Response.End
    else
    session("user")=rs_1("userid")
    end if
    rs_1.close
    set rs_1=nothing
  %>
  <html>
<head>
<title>七彩影院-密码找回系统</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">

<link href="../images/style.css" rel="stylesheet" type="text/css">
</head>
<body text="#333333" link="#333333" vlink="#CC0000" leftmargin="0" topmargin="0" >
<center>
<table width="514" border="0" cellpadding="0" cellspacing="0" height="1">
  <tr> 
    <td width="544" height="1" bgcolor="#FFFFFF">
	
	<table width="522" border="0" cellspacing="0" cellpadding="0" height="95">
  <tr>
    <td width="525" bgcolor="#FFFFFF" height="95" valign="top"><br>

<table width="90%" border="1" cellspacing="0" cellpadding="6" bordercolorlight="#999999" bordercolordark="#ffffff" align="center" height="119">
<tr><td height="16"><div align="center" class="title">用 户 取 回 密 码</div></td></tr><tr> 
          <td height="39"> <div align="center">
  <%set rs_2=server.createobject("adodb.recordset")
  sql="select * from users where userid='"&request("user")&"'"
  rs_2.open sql,conn,1,1%>
      <TABLE width="498" border="0" cellspacing="1" cellpadding="0" align="center"
      bordercolordark="#ecf5ff" bordercolorlight="#c0c0c0" height="57">
							<FORM method="post" action="getpwd.asp?step=3"><TR>
          <TD height="31" width="496">
									<TABLE width="408" border="0" cellspacing="1" cellpadding="0">
										<TR> 
											<TD width="213" align="right" height="30" >
                                            密码提示问题:</TD>
              
											<TD width="192" > 
											<%=rs_2("city")%></TD>
            </TR>
<TR> 
											<TD width="213" align="right" height="30" >
                                            密码提示答案:</TD>
              
											<TD width="192" > 
												<INPUT name="adress" maxlength="20" class="button1" size="20"> </TD>
            </TR> 
										</TABLE>
          </TD>
        </TR>
        <TR align="center">
          
								<TD height="24" width="496" > 
									<INPUT type="submit" name="Submit" value="下一步" class="button1">&nbsp;&nbsp; </TD>
        </TR></FORM>
      </TABLE><%rs_2.close
    set rs_2=nothing%>
    </div></td>
</tr></table>
<br>
</td>
  </tr>
</table>
</center></body>
</html>
 <%
  elseif step=3 then
   set rs_3=server.createobject("adodb.recordset")
    sql="select * from users where userid='"&session("user")&"'"
    rs_3.open sql,conn,1,1
    if request("adress")<>rs_3("adress") then
    response.write "<script language=JavaScript>" & chr(13) & "alert('系统出现错误.请输入正确信息!');" & "history.back()" & "</script>"
    Response.End
    else
    end if
    rs_3.close
    set rs_3=nothing
  %>
    <html>
<head>
<head>
<title>七彩影院-密码找回系统</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">

<link href="../images/style.css" rel="stylesheet" type="text/css">
</head>
<body text="#333333" link="#333333" vlink="#CC0000" leftmargin="0" topmargin="0" >
<center>
<table width="514" border="0" cellpadding="0" cellspacing="0" height="1">
  <tr> 
    <td width="544" height="1" bgcolor="#FFFFFF">
	
	<table width="522" border="0" cellspacing="0" cellpadding="0" height="95">
  <tr>
    <td width="525" bgcolor="#FFFFFF" height="95" valign="top"><br>

<table width="90%" border="1" cellspacing="0" cellpadding="6" bordercolorlight="#999999" bordercolordark="#ffffff" align="center" height="119">
<tr><td height="16"><div align="center" class="title">用 户 取 回 密 码</div></td></tr><tr> 
          <td height="39"><div align="center"> 
                    <%set rs_4=server.createobject("adodb.recordset")
  sql="select * from users where userid='"&session("user")&"'"
  rs_4.open sql,conn,1,3

function makePassword(byVal maxLen)

Dim strNewPass
Dim whatsNext, upper, lower, intCounter
Randomize

For intCounter = 1 To maxLen
whatsNext = Int((1 - 0 + 1) * Rnd + 0)
If whatsNext = 0 Then
'“character
upper = 90
lower = 65
Else
upper = 57
lower = 48
End If
strNewPass = strNewPass & Chr(Int((upper - lower + 1) * Rnd + lower))
Next
makePassword = strNewPass

end function
dim  radpass
radpass=makePassword(6)
%> 
      <TABLE width="45%" border="0" cellspacing="1" cellpadding="0" align="center"
      bordercolordark="#ecf5ff" bordercolorlight="#c0c0c0" height="57">
							<FORM method="post" action="getpwd.asp?step=2"><TR>
          <TD height="31">
									<TABLE width="496" border="0" cellspacing="1" cellpadding="0">
									<%rs_4("PassWord")=md5(radpass)
rs_4.update
%> 
										<TR> 
											<TD width="213" align="right" height="30" >密码为:</TD>
											<TD width="280"><span style="background-color: #ffffff"><%=radpass%></span>&nbsp;<font color="#FF0000">请牵记</font></TD>
            </TR>
           								</TABLE>
          </TD>
        </TR>
        <TR align="center">
          
								<TD height="24" > 
									<input type="reset" name="Submit2" value="登 陆" class="button1" onclick="window.open('../index/login.asp','','');self.close();">&nbsp;&nbsp; </TD>
        </TR></FORM>
      </TABLE><%rs_4.close
    set rs_4=nothing
    end if%></div></td>
</tr></table>
<br>
</td>
  </tr>
</table>
	
	</td>
  </tr>
  </table>
</center></body>
</html>

⌨️ 快捷键说明

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