www.gusucode.com > ASP+ACCESS在线人才招聘网(源代码+论文) > ASP+ACCESS在线人才招聘网(源代码+论文)\admin\system_user_update.asp
<!--#include file="session.asp"-->
<!--#include file="../inc/conn.asp"-->
<html><!-- #BeginTemplate "/Templates/admin.dwt" -->
<head>
<!-- #TemplateBeginEditable name="doctitle" -->
<!-- #BeginEditable "doctitle" -->
<title>在线人才网</title>
<!-- #EndEditable -->
<!-- #TemplateEndEditable -->
<meta content="text/html; charset=gb2312" http-equiv=content-type>
<link href="../inc/default.css" rel=stylesheet type=text/css>
<!-- #TemplateBeginEditable name="head" -->
<!-- #TemplateEndEditable -->
</head>
<body bgcolor=#FFFFFF topmargin=0 marginheight="5" leftmargin="0">
<center><!--#include file="../inc/head.asp"--><table width=770 border=0 align=center cellpadding=0 cellspacing=0>
<tbody>
<tr>
<td valign=top width=160 align="center" background="../images/11.gif">
<script language=JavaScript>
<!--
var enabled = 0; today = new Date();
var day; var date;
if(today.getDay()==0) day = "星期日"
if(today.getDay()==1) day = "星期一"
if(today.getDay()==2) day = "星期二"
if(today.getDay()==3) day = "星期三"
if(today.getDay()==4) day = "星期四"
if(today.getDay()==5) day = "星期五"
if(today.getDay()==6) day = "星期六"
date = "<font color='##FF0000' > " + (today.getYear()) + "年" + (today.getMonth() + 1 ) + "月" + today.getDate() + "日 " + " " + day + "</font>";
document.write(date);
//----->
</script>
<script language=javascript src="../Templates/inc/common.js"></script>
<script language=javascript>
function showpersondetail(id)
{
window.open("person_detail.asp?per_id="+id,"_blank","height=350,width=790,top=0,left=0,menubar=yes,location=yes,scrollbars=yes,resizeble=yes,toolbar=yes")
}
</script>
<font color="#FF0000"><br>
管理专区<br>
</font>
<%if session("admin")<>"" then%>
<table class=a10px height=114 cellspacing=2 cellpadding=0 width="88%"
background=../images/11.gif border=0>
<tbody>
<tr bgcolor=#ffffff background="../images/11.gif">
<td colspan=2 height=21><img height=16 src="../images/gongneng.gif"
width=169></td>
</tr>
<tr>
<td valign=bottom align=right width=160 background=../images/11.gif
height=5></td>
<td height=5></td>
</tr>
<tr>
<td valign=top align=center width=160 background=../images/11.gif
height=120>
<table width="87%" border="0" cellspacing="1" cellpadding="0">
<tr>
<td height="21"><b><font color="#FF0000"><img src="../images/dot6.gif" width="10" height="10">
</font></b><a href="info_manage.asp">招聘单位管理</a></td>
</tr>
<tr>
<td height="21"><img src="../images/dot6.gif" width="10" height="10">
<a href="person_manage.asp">人才信息管理</a></td>
</tr>
<tr>
<td height="21"><img src="../images/dot6.gif" width="10" height="10">
<a href="news_manage.asp">职场资讯管理</a></td>
</tr>
<tr>
<td height="21"><img src="../images/dot6.gif" width="10" height="10">
<a href="news_add.asp">添加职场资讯</a></td>
</tr>
<tr>
<td height="21"><img src="../images/dot6.gif" width="10" height="10">
<a href="zhaopinhui_manage.asp">招聘会信息管理 </a></td>
</tr>
<tr>
<td height="21"><img src="../images/dot6.gif" width="10" height="10">
<a href="zhaopinhui_add.asp">添加招聘会信息</a></td>
</tr>
<tr>
<td height="21"><img src="../images/dot6.gif" width="10" height="10">
<a href="mail_all.asp">群发邮件管理</a></td>
</tr>
<tr>
<td height="21"><img src="../images/dot6.gif" width="10" height="10">
<a href="system_user_manage.asp">管理员帐号管理</a> </td>
</tr>
<tr>
<td height="21"><img src="../images/dot6.gif" width="10" height="10">
<a href="adver_manage.asp">广告投放管理</a></td>
</tr>
<tr>
<td height="21"><img src="../images/dot6.gif" width="10" height="10">
<a href="system_link_manage.asp?posi=1">广告logo管理</a></td>
</tr>
</table>
</td>
<td height=120></td>
</tr>
</tbody>
</table>
<%end if%>
</td>
<td valign=top align="center" width=1 bgcolor="#99CCFF"></td>
<td align=center valign=top height="369" width="602"><!-- #BeginEditable "a1" --><img src="../images/system_manage.gif" width="320" height="50"><br>
<%if session("ad_level")=0 then%>
<%
user_id=Request("user_id")
if user_id="" then
result=Server.urlEncode("对不起，找不到该用户，请返回")
Response.Redirect"result.asp?result="&result
end if
sql="select * from admin where id="&user_id
Set Rs=Server.CreateObject("Adodb.RecordSet")
Rs.Open sql,conn,1,1
if rs.eof then
result=Server.urlEncode("对不起，找不到该用户，请返回")
Response.Redirect"result.asp?result="&result
else
user_name=Rs("login")
end if
rs.close
sql="select * from admin_power order by power_id"
Rs.Open sql,conn,1,1
%>
<form name="form1" method="post" action="system_user_changepwd.asp">
<table width="82%" border="0" cellspacing="0" cellpadding="0">
<tr bgcolor="#999999">
<td colspan="2" height="1"></td>
</tr>
<tr bgcolor="#F6F6F6">
<td colspan="2" height="30"> 更改 <%=user_name%> 密码
<input type="hidden" name="login" value="<%=user_name%>">
</td>
</tr>
<tr bgcolor="#999999">
<td colspan="2" height="1"></td>
</tr>
<tr>
<td width="20%" align="center" height="30">密码：</td>
<td width="80%" height="30">
<input type="password" name="passwd" size="15">
</td>
</tr>
<tr>
<td width="20%" align="center" height="30">确认：</td>
<td width="80%" height="30">
<input type="password" name="repasswd" size="15">
</td>
</tr>
<tr bgcolor="#999999">
<td colspan="2" height="1"></td>
</tr>
<tr bgcolor="#F6F6F6" align="center">
<td colspan="2" height="30">
<input type="submit" name="Submit" value="修改密码">
</td>
</tr>
<tr bgcolor="#999999">
<td colspan="2" height="1"></td>
</tr>
</table>
</form>
<form name="form1" method="post" action="system_user_update_todata.asp">
<br>
<table width="81%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="59%" align="center">管理员 <font color="#0066CC"><b><%=user_name%></b></font>
权限分配表
<input type="hidden" name="rowcount" value="<%=Rs.RecordCount%>">
<input type="hidden" name="user_id" value="<%=user_id%>">
<hr size="1">
</td>
<td width="41%"> </td>
</tr>
</table>
<br>
<table width="66%" border="0" cellspacing="0" cellpadding="0">
<%
i=1
Set prs=Server.CreateObject("Adodb.RecordSet")
while not Rs.Eof%>
<tr>
<td>
<%psql="select * from admin_detail where user_id="&user_id&" and power_id="&Rs("power_id")
prs.open psql,conn,1,1
if not prs.eof then
power="checked"
else
power=""
end if
prs.Close%>
<input type="checkbox" name="checkbox<%=i%>" value="<%=Rs("power_id")%>" <%=power%>>
<%=Rs("power_name")%> </td>
<%Rs.Movenext
i=i+1
if not Rs.Eof then%>
<td>
<%psql="select * from admin_detail where user_id="&user_id&" and power_id="&Rs("power_id")
prs.open psql,conn,1,1
if not prs.eof then
power="checked"
else
power=""
end if
prs.Close%>
<input type="checkbox" name="checkbox<%=i%>" value="<%=Rs("power_id")%>" <%=power%>>
<%=Rs("power_name")%> </td>
<%
Rs.MoveNext
i=i+1
else%>
<td></td>
<%end if%>
</tr>
<%Wend
Rs.Close%>
</table>
<br>
<br>
<a href="javascript:history.go(-1)"><img src="../images/back.gif" width="96" height="30" border="0"></a>
<input type="image" border="0" name="imageField" src="../images/submit.gif" width="96" height="30">
</form>
<%
else
result=Server.urlEncode("对不起，你不是超级管理员，你没有权限")
Response.Redirect"result.asp?result="&result&"&gopage=default.asp"
end if%>
<br>
<br>
<!-- #EndEditable -->
</td>
</tr>
</table>
<!--#include file="../inc/bottom.asp"-->
</center>
</body>
<!-- #EndTemplate --></html>