📄 user_info.asp
字号:
<!--#include file="../../inc/verify_user.inc" -->
<!--#include file="../../inc/conn.inc" -->
<html>
<head>
<title></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="../../css/ads.css" type="text/css">
</head>
<body bgcolor="#FFFFFF" text="#000000">
<!--#include file="../../inc/top.inc" -->
<p> </p>
<% if instr(session("global_access"),"D")<>0 then %>
<form name="" method="post" action="get_set_access.asp">
<%
Set rs = Server.CreateObject("ADODB.Recordset")
sql="select global_access from user_info where userid=" + request("userid")
rs.open sql,conn,0,1
%>
<p><b><img src="../../images/iico.gif" width="15" height="15" align="absmiddle">
<span class="px14">用户[<font color="#FF0000"><%=request("username")%></font>]的信息：</span></b></p>
<table width="569" border="1" cellspacing="1" cellpadding="4" bordercolor="#CCCCCC">
<tr>
<td bgcolor="#000099" height="24"><font color="#FFFFFF" class="px14"><img src="../../images/double_arrow.gif" width="12" height="11">
全 局 权 限</font></td>
</tr>
<tr>
<td height="177" class="pt9" bgcolor="#CCCCCC">
<p><b>广告组别操作权限：</b><br>
<img src="../../images/blank.gif" width="10" height="1">
<input type="checkbox" name="global_access" <% if instr(session("global_access"),"E")=0 then response.write "disabled=true" %> value="A" <% if instr(rs("global_access"),"A")<>0 then response.write "checked" %>>
允许添加组别
<input type="checkbox" name="global_access" <% if instr(session("global_access"),"E")=0 then response.write "disabled=true" %> value="B" <% if instr(rs("global_access"),"B")<>0 then response.write "checked" %>>
允许删除组别（所有组别有效）
<input type="checkbox" name="global_access" <% if instr(session("global_access"),"E")=0 then response.write "disabled=true" %> value="C" <% if instr(rs("global_access"),"C")<>0 then response.write "checked" %>>
允许修改组别信息（所有组别有效）</p>
<p><b>广告管理权限：</b><br>
<img src="../../images/blank.gif" width="10" height="1">
<input type="checkbox" name="global_access" <% if instr(session("global_access"),"E")=0 then response.write "disabled=true" %> value="F" <% if instr(rs("global_access"),"F")<>0 then response.write "checked" %>>
添加广告（对所有组别有效）
<input type="checkbox" name="global_access" <% if instr(session("global_access"),"E")=0 then response.write "disabled=true" %> value="G" <% if instr(rs("global_access"),"G")<>0 then response.write "checked" %>>
设置/修改广告参数属性（对所有组别有效）<br>
<img src="../../images/blank.gif" width="10" height="1">
<input type="checkbox" name="global_access" <% if instr(session("global_access"),"E")=0 then response.write "disabled=true" %> value="I" <% if instr(rs("global_access"),"I")<>0 then response.write "checked" %>>
删除广告（对所有组别有效） </p>
<p><b>用户管理权限：</b><br>
<img src="../../images/blank.gif" width="10" height="1">
<input type="checkbox" name="global_access" <% if instr(session("global_access"),"E")=0 then response.write "disabled=true" %> value="D" <% if instr(rs("global_access"),"D")<>0 then response.write "checked" %>>
允许查看用户信息
<input type="checkbox" name="global_access" <% if instr(session("global_access"),"E")=0 then response.write "disabled=true" %> value="E" <% if instr(rs("global_access"),"E")<>0 then response.write "checked" %>>
允许查看和修改用户权限
<input type="checkbox" name="global_access" <% if instr(session("global_access"),"E")=0 then response.write "disabled=true" %> value="J" <% if instr(rs("global_access"),"J")<>0 then response.write "checked" %>>
允许添加用户
<input type="checkbox" name="global_access" <% if instr(session("global_access"),"E")=0 then response.write "disabled=true" %> value="K" <% if instr(rs("global_access"),"K")<>0 then response.write "checked" %>>
允许删除用户</p>
<p><b>查看统计报表权限：</b><br>
<img src="../../images/blank.gif" width="10" height="1">
<input type="checkbox" name="global_access" <% if instr(session("global_access"),"E")=0 then response.write "disabled=true" %> value="H" <% if instr(rs("global_access"),"H")<>0 then response.write "checked" %>>
允许查看统计报表</p>
</td>
<% rs.close %>
</tr>
</table>
<br>
<table width="569" border="1" cellspacing="1" cellpadding="4" bordercolor="#CCCCCC">
<tr>
<%
Set cmd = Server.CreateObject("ADODB.Command")
Set cmd.ActiveConnection=conn
cmd.CommandText="get_user_access"
cmd.CommandType=&H0004
cmd.Parameters.Append cmd.CreateParameter("@userid",3)
cmd.Parameters.Append cmd.CreateParameter("@group_id",3)
cmd.Parameters.Append cmd.CreateParameter("@role_property",200,2,255)
cmd("@userid")=clng(request("userid"))
sql="select group_name,group_id from group_info order by group_id Desc"
rs.open sql,conn,0,1
%>
<td bgcolor="#000099"><font color="#FFFFFF" class="px14"><img src="../../images/double_arrow.gif" width="12" height="11">
广 告 组 权 限 （在各个广告组中拥有的权限）</font></td>
</tr>
<tr>
<td bgcolor="#CCCCCC" height="66">
<table width="405" border="0" cellspacing="1" cellpadding="2" bgcolor="#000000" class="pt9">
<tr bgcolor="#6699CC">
<td width="140">广告组别</td>
<td width="51">
<div align="center">添加广告</div>
</td>
<td width="54">
<div align="center">设置广告</div>
</td>
<td width="51">
<div align="center">删除广告</div>
</td>
<td width="83">
<div align="center">查看统计报表</div>
</td>
</tr>
<%
do while not rs.eof
cmd("@group_id")=rs("group_id")
cmd.execute
%>
<tr bgcolor="#E0E0E0">
<td width="140"><%=rs("group_name")%></td>
<td width="51">
<div align="center">
<input type="checkbox" <% if instr(session("global_access"),"E")=0 then response.write "disabled=true" %> name="role_property_<%=rs("group_id")%>" value="a" <% if instr(cmd("@role_property"),"a")<>0 then response.write "checked" %>>
</div>
</td>
<td width="54">
<div align="center">
<input type="checkbox" <% if instr(session("global_access"),"E")=0 then response.write "disabled=true" %> name="role_property_<%=rs("group_id")%>" value="b" <% if instr(cmd("@role_property"),"b")<>0 then response.write "checked" %>>
</div>
</td>
<td width="51">
<div align="center">
<input type="checkbox" <% if instr(session("global_access"),"E")=0 then response.write "disabled=true" %> name="role_property_<%=rs("group_id")%>" value="c" <% if instr(cmd("@role_property"),"c")<>0 then response.write "checked" %>>
</div>
</td>
<td width="83">
<div align="center">
<input type="checkbox" <% if instr(session("global_access"),"E")=0 then response.write "disabled=true" %> name="role_property_<%=rs("group_id")%>" value="d" <% if instr(cmd("@role_property"),"d")<>0 then response.write "checked" %>>
</div>
</td>
</tr>
<%
rs.movenext
loop
rs.close
set cmd=nothing
set rs=nothing
%>
</table>
</td>
</tr>
</table>
<% if instr(session("global_access"),"E")<>0 then %>
<p>
<input type="submit" name="Submit" value="确认为用户[<%=request("username")%>]设置权限">
<input type="hidden" name="userid" value="<%=request("userid")%>">
</p>
<% end if %>
</form>
<% else %>
<table width="321" border="0" cellspacing="1" cellpadding="2">
<tr>
<td class="px14"><b><font color="#FF0000">权限不足，无法进行此操作！</font></b></td>
</tr>
</table>
<% end if %>
<p> </p>
<p> </p>
<p> </p>
<!--#include file="../../inc/bottom.inc" -->
</body>
</html>
<%
conn.close
set conn=nothing
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -