user_manager.asp

来自「是个不错的文件代码,希望大家好好用,」· ASP 代码 · 共 42 行

<!--#include file="conn.asp"-->

<%
if Session("isAdmin")<>true Then
Response.Write "非法闯入！"
Response.End
End if
currentadmin=Session("Admin")
pw1=request("pw1")
pw2=request("pw2")
action=request("action")
if action="doit" then
if pw1="" or pw2="" or currentadmin="" then
	Response.Write "无法完成请求！"
	Response.End
end if
if pw1<>pw2 then
	Response.Write "两次输入的密码不一样！"
	Response.End
end if
set r=server.createobject("adodb.recordset")
r.open "select * from admin",conn,1,3
if not r.eof then
	r("password")=pw1
	r.update
	Response.Write "管理员密码已成功更改！"
	Response.End
else
	Response.Write "无法完成请求！"
	Response.End
end if
end if
%>


<form action="user_manager.asp" method="post">
<big><big>更改当前管理员密码：</big></big><br>
请输入新密码：<input type="password" name="pw1"><br>
请确认新密码：<input type="password" name="pw2"><br>
<input type="hidden" value="doit" name="action">
<input type="submit">
</form>