www.gusucode.com > 枫的记忆个人主页程序源码程序 > downcode.com\fengdejiyizh\admin\manager_change_pw.asp

    <!--#INCLUDE FILE="conn_pw.asp"-->
<!--#INCLUDE FILE="md5.asp"-->
<link href="admin.css" rel="stylesheet" type="text/css">
<%
	if session("level")<>"1" then
		Response.Write("你无权访问此页面!")
		Response.End
	end if	%>
<html>
<head>
<title>更改密码</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<script language="javascript">
<!--
    function check(){
        if(document.change_pw.old_password.value.length<=0){
            alert("系统提示\n请输入旧密码!");
            document.change_pw.old_password.focus();
            return false;
        }
        if(document.change_pw.new_password.value.length<=0){
            alert("系统提示\n请输入新密码!");
            document.change_pw.new_password.focus();
            return false;
        }
        if(document.change_pw.re_password.value.length<=0){
            alert("系统提示\n请再输入一次新密码!");
            document.change_pw.re_password.focus();
            return false;
        }
        if(document.change_pw.new_password.value!=document.change_pw.re_password.value){
            alert("系统提示\n新密码没有被确认,请重新输入一次新密码!");
            document.change_pw.re_password.focus();
            return false;
        }       
        if(document.change_pw.new_password.value==document.change_pw.old_password.value){
            alert("系统提示\n新密码与旧密码相同,不需更改。\n若要更改,请输入新的密码!");
            document.change_pw.new_password.focus();
            return false;
        }
    }
//-->
</script>
</head>
<body bgcolor="#CDD5DE">
<%
	hidden=trim(request("hidden"))
	if hidden="ok" then
		old_password=md5(trim(request("old_password")))
		new_password=md5(trim(request("new_password")))
		if session("login_name")="" or isnull(session("login_name")) or session("logined")="" or isnull(session("logined")) then
			Response.Write("连接已经超时,请重新登录后再更改!")
			Response.End
		end if
		
		err.clear
		set rs=server.createobject("adodb.recordset")
		sql_str="select * from admin where login_name='"&session("login_name")&"' and password='"&old_password&"'"
		rs.Open sql_str,Conn,1,3
		
		if rs.EOF then
			Response.Write("旧密码有误,请返回重试!<br><input type='button' value='返回重试' onclick='javascript:window.history.back()'>")
			Response.End		
		else
			set Rs_update=server.createobject("adodb.recordset")
			sql_str="update admin set password='"&new_password&"' where login_name='"&session("login_name")&"'"
			Rs_update.Open sql_str,Conn,1,3
			if err.number=0 then
				Response.Write("密码更改成功,请退出后重新登录!")
				Response.End
			else
				Response.Write("系统出错,请返回重试!<br><input type='button' value='返回重试' onclick='javascript:window.history.back()'>")
				Response.End				
			end if
		end if		
	end if
%>
<br>
<br>
<br>
<br>
<br>
<br>
  <table width="400" border="0" cellpadding="0" cellspacing="1" class="tablebody" align=center>
    <tr>
      <th>管 理 员 修 改 密 码</th>
    </tr>
          <form action="#" method="post" name="change_pw" language="javascript" onsubmit="return check()">
            <input type="hidden" name="hidden" value="ok">
            <tr height="40">
              <td width="33%" align="center" bgcolor="#FFFFFF">旧 密 码:&nbsp;
              <input type="password" size="15" name="old_password"></td>
            </tr>
            <tr height="40">
              <td align="center" bgcolor="#FFFFFF">新 密 码:&nbsp;
              <input type="password" size="15" name="new_password"></td>
            </tr>
            <tr height="40">
              <td align="center" bgcolor="#FFFFFF">再输一次:&nbsp;
              <input type="password" size="15" name="re_password"></td>
            </tr>
            <tr height="40">
              <td align="center" bgcolor="#FFFFFF"><input type="submit" value="提 交" style="FONT-SIZE: 12px;">
                   <input type="reset" value="重 置" style="FONT-SIZE: 12px;"></td>
            </tr>
          </form>
  </table>