find.asp

来自「国内第一数字点卡销售程序。功能强大。完整无错！数据文件经MD5加密！经严格测」· ASP 代码 · 共 83 行

ASP

83 行

<!--#include file="top.asp"-->

<body topmargin="0" bgcolor="#FFFFFF">
<%
if request("action")="del" then
strTemp=trim(request("user_name"))
user_name=srequest(strTemp,0)
sql="select top 1 * from sys"
rs.open sql,conn,3,3
sys_mailserver=rs("sys_mailserver")
sys_mailuser=rs("sys_mailuser")
sys_mailpass=rs("sys_mailpass")
sys_mailtitle=rs("sys_mailtitle")
sys_name=rs("sys_name")
sys_qq=rs("sys_qq")
sys_tel=rs("sys_tel")
sys_mail=rs("sys_mail")
rs.close

    sql="select * from [user] where user_name='"&user_name&"'"
    rs.open sql,conn,3,3
    if rs.eof then
       response.write "<script language=javascript>alert('报歉！没有此会员！请检查输入！');</script>"
    else
    
set jmail=server.CreateObject ("jmail.message")
jmail.Silent=true
jmail.Charset="gb2312"
jmail.logging=true
jmail.from=sys_mailuser
jmail.FromName=sys_mailuser
JMail.Subject ="找回密码"
jmail.MailServerUserName =sys_mailuser
jmail.MailServerPassWord =sys_mailpass
emailto = rs("user_mail")
JMail.AddRecipient emailto
        content=content&CHR(10)&"------------------------------------------"&CHR(10)&CHR(10)
        content=content&sys_name&CHR(10)&CHR(10)&CHR(10)
        content=content+"找回密码"&CHR(10)&CHR(10)&CHR(10)
        content=content+ "您的密码："&rs("user_pass")&CHR(10)&CHR(10)&CHR(10)
        content=content+"谢谢您的支持！"&CHR(10)&CHR(10)&CHR(10)
        content=content&CHR(10)&"------------------------------------------"&CHR(10)&CHR(10)
JMail.Body = content
jmail.Send(sys_mailserver)
set JMail = nothing        
    response.write "<script language=javascript>alert('密码已发送到此会员的信箱里了！谢谢您的支持！');</script>"
    end if
    rs.close

end if
%>
<div align="center">
	<table border="1" width="775" id="table1" height="158" bgcolor="#FFFFFF" cellspacing="0" cellpadding="0" bordercolorlight="#C0C0C0" bordercolordark="#FFFFFF">
		<tr>
            <td >
             <div align="center">
				<table border="0" width="98%" cellspacing="0" cellpadding="0" id="table3" height="133">
					<tr>
						<td valign="top">
						<form method="POST" action="find.asp?action=del" name="form">
							<div align="center">
										<p align="center">
										<b><font color="#008000">
										<br>
																				</font>输入用户名，密码将会发到会员的信箱!</b><br>
　<table border="1" width="64%" bordercolorlight="#C0C0C0" cellspacing="0" cellpadding="0" bordercolordark="#FFFFFF" id="table4" height="43">
									<tr>
										<td width="145" align="right" style="padding: 5px">
										会员用户名:</td>
										<td style="padding: 5px"><input type="text" name="user_name" size="20"> <input type="submit" value="提交" name="B1">&nbsp;
										<input type="reset" value="重置" name="B2"></td>
									</tr>
									</table>
							</div>
						</form></td>
		</tr>
	</table>

</div>
</body>
</html>
<!--#include file="copy.asp"-->

find.asp - 源码说明

本页面展示了「国内第一数字点卡销售程序。功能强大。完整无错！数据文件经MD5加密！经严格测试」中的 find.asp 源码文件，采用 ASP 编程语言编写，共 83 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫下载站收录了大量与MD5相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

复制代码Ctrl + C

搜索代码Ctrl + F

全屏模式F11

增大字号Ctrl + =

减小字号Ctrl + -

显示快捷键?