📄 fetchpsw.asp
字号:
<%@ LANGUAGE="VBSCRIPT" %>
<!--#include file="conn.asp"-->
<%
'##############################################################
'##【深圳 超市网网站系统 v2.0】 ##
'##程序语言：ASP、SQL、VBScript、JavaScript、HTML。 ##
'##数 据 库：Microsoft Access2000。 ##
'##运行环境：WIN98+PWS、WIN2000/XP+IIS等支持ASP+ACCESS空间。 ##
'##1、本程序所有版权归深圳市玉龙网络技术有限公司所有。 ##
'##2、任何人未经本公司同意与书面授权不得使用本程序或将本程 ##
'## 序复制、发送给他人或提供下载。
'##3、经本公司书面授权后您可以拥有本套系统的二次开发权利 ##
'## 但不可以把本系统来进行二次转让、出售或以任何方式在网上 ##
'## 传播。必须保证本系统源码不能泄露给第三方或任何变相盗用 ##
'##4、如果你未遵守上述事项，由此带来的后果和损失自负同时本公 ##
'## 司将依法追究相关的法律责任。 ##
'##5、请保留以上的版权信息，此项不会对本站程序有任何影响。 ##
'##############################################################
if request.form("email")<>"" then
set rs=server.createobject("adodb.recordset")
sqltext="select * from RegUser where email='" & request.form("email") & "'"
rs.open sqltext,conn,1,1
if rs.bof and rs.eof then
%>
<SCRIPT language=JavaScript>
<!--
alert(" 对不起！没有此Emaili资料或您的Email有误！");
window.close();
//-->
</SCRIPT>
<%
else
user_email=rs("email")
UserId=rs("UserId")
PassWD=rs("PassWD")
on error resume next '忽略邮址错误
set M_rs=server.createobject("adodb.recordset")
mysql="select Email,copyright from Manager"
M_rs.open mysql,conn,1,1
Set JMail = Server.CreateObject("JMail.SMTPMail")
JMail.Charset = "gb2312"
JMail.ServerAddress =""
JMail.Priority = 3
JMail.contenttype ="text/html"
JMail.Sender = M_rs("Email")
JMail.Subject ="您的会员密码"
JMail.SenderName = M_rs("copyright")
JMail.AddRecipient( user_email )
mess = "<body bgcolor=""#FFFFE8"">"
mess = mess & "尊敬的会员：您好!" & "<br>"
mess = mess & "<br>"
mess = mess & "您的会员帐号是：" & UserId & "<br>"
mess = mess & "您的密码是：" & PassWD & "<br>"
mess = mess & "<br>"
mess = mess &"</body>"
JMail.Body = mess '信件体正文为变量mess
if err then
err.clear
end if
JMail.Execute()
JMail.Close()
set jMail=nothing
M_rs.close
%>
<SCRIPT language=JavaScript>
<!--
alert(" 您的帐号与密码已发送到您的信箱中，请返回！");
window.close();
//-->
</SCRIPT>
<%
end if
end if
%>
<html>
<head>
<title>商品详细信息</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<STYLE>BODY {
FONT-SIZE: 10pt
}
td { font-size: 10pt; line-height: 150% }
A {
TEXT-DECORATION: none
}
A:hover {
TEXT-DECORATION: underline
}
</STYLE>
<script language="javascript">
<!--
function isok(theform)
{
if (theform.email.value.length<5|theform.email.value.indexOf("@")==-1|theform.email.value.indexOf(".")==-1)
{alert("请输入正确的Eail地址！");
theform.email.focus( );
return(false);}
return (true);
}
-->
</script>
</head>
<body bgcolor="#FFFFFF" text="#000000" background="pic/bg.jpg">
<div align="center">
<table width="196" border="1" cellpadding="4" cellspacing="0" bordercolor="#FFFFFF" bordercolordark="#666666">
<form method="POST" action="" onsubmit="return isok(this)" >
<tr>
<td width="184">请输入的注册时的Email:</td>
</tr>
<tr>
<td><input name="email" type="text" size="25"></td>
</tr>
<tr>
<td><div align="center">
<input type="submit" name="Submit" value="Submit">
</div></td>
</tr>
</form>
</table>
</div>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -