📄 getpassword.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>
</p>
</form>
<!--#include file="inc/bottom.asp"-->
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -