📄 change_password.asp
字号:
<%if session("password")<>"" then%>
<HTML>
<HEAD>
<title>25175</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="25175_1.css" rel="stylesheet" type="text/css">
<style type="text/css">
<!--
body {
margin-top: 0px;
}
-->
</style></HEAD>
<BODY>
<!--#include file="conn.asp" -->
<table width="768" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="754" valign="top" bgcolor="#A0A4AC" style="line-height:140%;"> 网站名称：<font color="#0000FF"><a href="http://www.25175.com">SP.25175</a></font><br>
网站LOGO：<a href="http://www.25175.com/logo1.GIF">http://www.25175.com/logo1.GIF</a><br>
演示地址：<font color="#0000FF"><a href="http://www.25175.com/asp/test_20050825_v161/">http://www.25175.com/asp/test_20050825_v161/</a><br>
</font>下载地址：<font color="#0000FF"><a href="http://www.25175.com/asp/test_20050825_v161/test_20050825_v161.rar">http://www.25175.com/asp/test_20050825_v161/test_20050825_v161.rar</a><br>
</font> 在线聊天：<a href="http://wpa.qq.com/msgrd?V=1&Uin=29752345&Site=www.25175.com&Menu=yes">29752345</a></td>
</tr>
</table>
<table width="768" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="1"><div align="center"></div></td>
</tr>
</table>
<table width="768" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="25" bgcolor="#A0A4AC"><a href="index.asp">首页</a> <a href="add.asp">添加试题</a> <a href="delete_all.asp">删除试题</a> <a href="SEARCH.ASP">列出试题答案</a> <a href="change_password.asp">修改密码</a> <a href="login.asp">登入</a> <a href="20050130_logout.asp">退出</a></td>
</tr>
</table>
<%
if request.QueryString("gn")="pass" then
user=Replace(Trim(Request.Form("user")),"'","''")
pass=Replace(Trim(Request.Form("pass")),"'","''")
new_pass=Replace(Trim(Request.Form("new_pass")),"'","''")
set rs2=server.CreateObject("adodb.recordset")
sql2="select * from administrator where password='"& pass &"'"
rs2.open sql2,conn,1,3
if rs2.bof then
Response.Write("<script language=javascript>alert('原密码输入错误！！！');history.back();</script>")
else
rs2("password")=new_pass
rs2("username")=user
rs2.update
Response.Write("<script language=javascript>alert('用户名密码更改成功！！！');location.replace('change_password.asp')</script>")
end if
end if
%>
<SCRIPT language="javascript">
<!--
function del_space(s)
{
for(i=0;i<s.length;++i)
{
if(s.charAt(i)!=" ")
break;
}
for(j=s.length-1;j>=0;--j)
{
if(s.charAt(j)!=" ")
break;
}
return s.substring(i,++j);
}
function VerifySubmit()
{
user = del_space(document.all("user").value);
if (user.length == 0)
{
alert("您忘了填写管理员名称!");
return false;
}
pass = del_space(document.all("pass").value);
if (pass.length == 0)
{
alert("管理员密码不能为空！");
return false;
}
new_pass = del_space(document.all("new_pass").value);
if (new_pass.length == 0)
{
alert("新管理员密码不能为空！");
return false;
}
new_pass = del_space(document.all("new_pass").value);
if (new_pass.length < 5)
{
alert("新管理员密码不能小于5位字符！");
return false;
}
new_pass2 = del_space(document.all("new_pass2").value);
if (new_pass2!=new_pass)
{
alert("两次输入的口令不相同,请重新填写!");
return false;
}
return true;
}
//-->
</SCRIPT>
<%
sql3="select * from administrator"
set rs3=conn.execute(sql3)
%>
<FORM action="change_password.asp?gn=pass" method="post" name="regform" onSubmit="return VerifySubmit()">
<table width="768" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td>
<table width="768" border="0" cellspacing="0" cellpadding="5">
<tr>
<td width="95" height="25">新管理员名称：</td>
<td colspan="2"><input name="user" type="text" id="user" value="<% =rs3("username") %>">
</td>
</tr>
<tr>
<td height="25">原管理员密码：</td>
<td colspan="2"><input name="pass" type="password" id="pass"></td>
</tr>
<tr>
<td height="25">新管理员密码：</td>
<td colspan="2"><input name="new_pass" type="password" id="new_pass"></td>
</tr>
<tr>
<td height="25">重复输入密码：</td>
<td colspan="2"><input name="new_pass2" type="password" id="new_pass2"></td>
</tr>
<tr>
<td height="25"><div align="right"> </div></td>
<td width="120">
<input type="Submit" name="Submit" value="修改">
<input type="reset" name="Submit2" value="重置">
</td>
<td>
</td>
</tr>
</table>
</td>
</tr>
</table>
<table width="768" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="20" bgcolor="#A0A4AC"><div align="center" class="style1">
<div align="center"><a href="http://www.25175.com">powered by 25175</a></div>
</div></td>
</tr>
</table>
</form>
</BODY>
</HTML>
<%
else
Response.Redirect "20050130_loginagine.asp"
end if
%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -