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

📄 getpassword.asp

📁 功能最强大的ASP网站
💻 ASP
字号:
<!--#include file="inc/conn.asp"-->
<!--#include file="inc/func.asp"-->
<%
FunCode="FFFF"
session("title")="忘记密码服务"
session("headline")="首页 -> 用户登陆 -> 忘记密码服务"
%>
<!--#include file="inc/head.asp"-->
<%

if request("act")="update" then
username=request("username")
on error resume next 
if username=""  then
			session("mesg")="用户名不能为空"
			Response.Redirect "result.asp"
end if

username = replace(username,"'","")
username = replace(username," ","")
username = replace(username,"&","")

set rs=server.createobject("adodb.recordset")
sql="select * from [user] where username='"&username&"'"
	rs.open sql,conn,1,1
	if rs.eof then
			session("mesg")="该用户不存在"
			Response.Redirect "result.asp"
	end if
pass=rs("userpass")
email=rs("email")
if email=""  then
			session("mesg")="对不起,你的资料里没有邮箱地址,无法将密码发给您!"
			Response.Redirect "result.asp"
end if

set rs=server.createobject("adodb.recordset")
sql="select * from config "
rs.open sql,conn,1,1

do while not rs.eof
	session(rs("name"))=rs("config")
rs.movenext
loop
rs.close
set rs=nothing


Body = session("GETPASSEMAIL")
Body = replace(Body,"[userpass]",pass)
Body = replace(Body,"[username]",username)
Body = replace(Body,"[comname]",session("COMNAME"))

session("mesg") = SendEMail(email,Body)
Response.Redirect "result.asp" 
end if

%>

<script language='JavaScript'>
<!--
function check_input()
{
	if (document.inputdata.username.value=="")
	{
		alert("会员名不能为空!");
		document.inputdata.username.focus();
		return false;
	}
	return true;
}
//-->
</script>
            <br>
            <br>        
             
            <form method="POST" name="inputdata" action="getpassword.asp?act=update" onsubmit="return check_input()">
              <div align="left"><br>
                <br>
              </div>
              <div align="left"></div>
              <table border=1 bordercolor=#3770A9 bordercolordark=#ffffff cellpadding=3 
      cellspacing=0 width=50% class="size09" align="center" bgcolor="#efefef">
                <tbody> 
                <tr valign="middle"> 
                  <td height="40" width="30%"> 
                    <div align="center">会员名:</div>
                  </td>
                  <td height="40"> 
                    <div align="center"> 
                      <input type="text" name="username" size="20" class="form">
                    </div>
                  </td>
                  <td 
            style="LINE-HEIGHT: 14pt" width="25%"> 
                    <div align="center"> 
                      <input type="submit" value="确  定" name="B1">
                    </div>
                  </td>
                </tr>
                </tbody> 
              </table>
              <p>&nbsp;&nbsp; 
              </p>
            </form>
            
<!--#include file="inc/bottom.asp"-->

⌨️ 快捷键说明

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