📄 chgpwd.asp

📁 后台管理 /login.asp 帐号:admin 密码：123456 后台程序作者：风清云淡注意空数据库帐号密码都是空的注意歌词必须是.txt 文件
💻 ASP
字号:

<!--#include file="conn.asp"-->
<!--#include file="md5.asp"-->
<%
if Session("admin_name")="" Then
Response.Write "<script>location.href='login.asp';</script>"
Response.End
End if
%>
<%
if request("action")="save" then
admin=request("admin_name")
oldpwd=md5(trim(request("oldpwd")))
newpwd=md5(trim(request("newpwd")))
newpwd1=md5(trim(request("newpwd1")))

if oldpwd<>session("admin_password") then
	response.write "<script>alert('旧密码错误,请重新输入!');history.go(-1);</Script>"
	Response.End 
end if

if Len(trim(request("newpwd"))) =0 then
	response.write "<script>alert('新密码为空，请重新输入');history.go(-1);</Script>"
	Response.End 
end if

if newpwd<>newpwd1 then
	response.write "<script>alert('新密码与确认密码不正确，请重新输入');history.go(-1);</Script>"
	Response.End 
end if


set rs=server.createobject("adodb.recordset")
sql="select * from admin where username='"&admin&"' and password='"&oldpwd&"'"
	rs.open sql,conn,1,3
 	if not(rs.bof and rs.eof) then
			rs("password")=newpwd
			rs.update
			rs.close
			set rs=nothing
	session("admin_password")=newpwd
	response.write "<script>alert('密码修改成功');window.close();</Script>"
	Response.End 
	else
	response.write "<script>alert('此管理员不存在，请重新输入');history.go(-1);</Script>"
	Response.End 
	end if



end if%>
<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 6.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<link rel="stylesheet" href="style0930.css" type="text/css" />
<SCRIPT language=javascript>
function hideLeftFrame(){
 if(parent.forum_win.cols!="0,13,*")
 {
  parent.forum_win.cols="0,13,*";
  separatorSwitch.src="images/ding.gif";
 } else {
  parent.forum_win.cols="135,13,*";
  separatorSwitch.src="images/ding.gif";
 }
}
</SCRIPT>
</head>
<body>
<p>&nbsp;</p>
<p>&nbsp;</p>
<table width="300" height="0" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#cccccc">
  <form name="form1" method="post" action="chgpwd.asp?action=save">
    <tr bgcolor="#efefef"> 
      <td height="30" colspan=2 align="center">　<strong>管理员用户密码设置</strong></td>
    </tr>
    <tr bgcolor="#ffffff"> 
      <td width="27%" height="30" align="center">用 户 名</td>
      <td width="73%">　
      <input name="admin_name" type="text" id="admin_name" style="width:150" value="<%=session("admin_name")%>" size=20 readonly></td>
    </tr>
    <tr bgcolor="#ffffff"> 
      <td width="27%" height="30" align="center">原始密码</td>
      <td width="73%">　
      <input name="oldpwd" type="password" id="oldpwd" style="width:150" size=20></td>
    </tr>
    <tr bgcolor="#ffffff"> 
      <td width="27%" height="30" align="center">新 密 码</td>
      <td width="73%">　
      <input name="newpwd" type="password" id="newpwd" style="width:150" size=20></td>
    </tr>
    <tr bgcolor="#ffffff"> 
      <td width="27%" height="30" align="center">确认密码</td>
      <td width="73%">　
      <input name="newpwd1" type="password" id="newpwd1" style="width:150" size=20></td>
    </tr>
    <tr bgcolor="#ffffff" align="center"> 
      <td height="30" colspan=2><input type="submit" name="Submit" value="提 交" class=input1></td>
    </tr>
  </form>
</table>
</body>
</html>
⌨️ 快捷键说明

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