📄 getpass.asp
字号:
<!--#include file="../cc/conn.asp"-->
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<title><%=mc%></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="../cc/css/STYLE.CSS" rel="stylesheet" type="text/css">
<style type="text/css">
<!--
.style1 {color: #000000}
-->
</style>
</head>
<body>
<!--#include file="top.asp"-->
<br>
<br>
<%
if request("get")<>"yes" then%>
<table width="300" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="122" valign="top"> <form name="form1" method="post" action="getpass.asp?get=yes">
<div align="center">
<table width="100%" border="0" cellpadding="0" cellspacing="1" bordercolor="#F7F3F7" bgcolor="#F7F3F7">
<tr bgcolor="#FF9933">
<td width="100%" colspan="2" bgcolor="#F7F3F7"><div align="center"><%=mc%></div></td>
</tr>
<tr>
<td colspan="2" bgcolor="#FFFFFF"><div align="center" class="style1"><strong>找回忘记的密码</strong></div></td>
</tr>
<tr>
<td height="57" colspan="2" bgcolor="#FFFFFF"><div align="left">请输入你的用户名，系统会自动发送密码到你的管理资料中的E-Mail地址内,如果还没有收到请和超级管理员联系!
</div></td>
</tr>
<tr>
<td colspan="2" bgcolor="#FFFFFF"> <div align="left">你的用户名:
<input name="name" type="text" id="name" size="15">
<input type="submit" name="Submit" value="取回密码">
</div></td>
</tr>
</table>
</div>
</form></td>
</tr>
</table>
<div align="center">
<%else
name=request("name")
Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from user where name='"&name&"'"
rs.open sql,conn,1,1
if rs.eof and rs.bof then
response.write "<script language='javascript'>" & VbCRlf
response.write "alert('没有这个注册用户名!');" & VbCrlf
response.write "history.go(-1);" & vbCrlf
response.write "</script>" & VbCRLF
response.end
end if
if rs("email")="请输入你的E-Mail" then
response.write "<script language='javascript'>" & VbCRlf
response.write "alert('你在系统中没有填写E-Mail,密码无法发送，请联系我们解决!');" & VbCrlf
response.write "history.go(-1);" & vbCrlf
response.write "</script>" & VbCRLF
response.end
end if
msgto=rs("email")
msgfrom="no-reply@126.com"
msgsubj="乘风多用户免费计数器发送的密码!"
msgbody1="乘风多用户免费计数器发送的用户和密码"
msgbody2="，用户名："&rs("name")
msgbody3="，会员密码："&rs("password")
msgbody4="。,请不要回复此信，技术支持http://www.showme99.com/service/"
msgbody=msgbody1+msgbody2+msgbody3+msgbody4
Set objMail = Server.CreateObject("CDONTS.Newmail")
objMail.To = msgto
objMail.From = msgfrom
objMail.Subject = msgsubj
objMail.Body = msgbody
objMail.Send
Set objMail = Nothing%>
<table width="300" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="64" valign="top"> <form name="form1" method="post" action="getpass.asp?get=yes">
<div align="center">
<table width="100%" border="0" cellpadding="0" cellspacing="1" bordercolor="#00CCFF" bgcolor="#00CCFF">
<tr bgcolor="#FF9933">
<td width="100%" colspan="2" bgcolor="#F7F3F7"><div align="center"><%=mc%></div></td>
</tr>
<tr>
<td colspan="2" bgcolor="#FFFFFF"><div align="center"><strong><font color="#33CC00">密码已经成功发送到你的<font color="#ff0000"><%=rs("email")%></font>,请查收</font></strong></div></td>
</tr>
<tr>
<td colspan="2" bgcolor="#FFFFFF"> <div align="center">
<input type="submit" name="Submit523" value="返回" onClick="javascript:history.go(-2)">
</div></td>
</tr>
</table>
</div>
</form></td>
</tr>
</table>
<%end if%>
<br>
<br>
<!--#include file="bottom.asp"-->
</div>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -