www.gusucode.com > cso中国seo优化html整站源码程序 > manage/admin_mpass.asp

    <!--#include file="include/head.asp"-->
<%
flagstr = "admin_mpass"
session("curpage") = flagstr&".asp"

select case request.querystring("act")
	case "save"
		call admin_save(request.querystring("nid"))
	case else
		call admin_mpass()
end select

sub admin_save(nid)
password = trim(request.form("password"))
password1 = trim(request.form("password1"))
password2 = trim(request.form("password2"))
if password1 <> password2 then
	call alert("密码确认错误!","?")
	response.end()
end if
sql = "select * from so_admin where id = "&nid
rs.open sql,conn,2,2
if rs("password") = md5(password) then
	rs("password") = md5(password1)
	rs.update
	call alert("密码修改成功!","?")
else
	call alert("密码错误!","?")
end if
rs.close
end sub

sub admin_mpass()
	only = "readonly=""enabled"""
	sql = "select * from so_admin where id = "&request.cookies(config_cname)("id")
	rs.open sql,conn,1,1
	username = rs("username")
	password = ""
	nid = rs("id")
	rs.close
%>
<table cellspacing="1">
	<thead><tr><th colspan="2">高级用户修改密码</th></tr></thead>
	<form method="post" name="add" action="?act=save&nid=<%=nid%>">
	<tr>
		<td><b>用户名:</b></td>
		<td><input type="text" name="username" size="24" value="<%=username%>" <%=only%> /></td>
	</tr>
	<tr>
		<td><b>旧密码:</b></td>
		<td><input type="password" name="password" size="24" value="" /></td>
	</tr>
	<tr>
		<td><b>新密码:</b></td>
		<td><input type="password" name="password1" size="24" value="" /></td>
	</tr>
	<tr>
		<td><b>确认密码:</b></td>
		<td><input type="password" name="password2" size="24" value="" /></td>
	</tr>
	<tr>
		<td width="20%"></td>
		<td width="80%"><input type="submit" name="submit" value="确认提交" /></td>
	</tr>
	</form>
</table>
<%
end sub
%>
<!--#include file="include/foot.asp"-->