📄 admin_set.asp
字号:
<!--#include file="../config/sys.asp"-->
<%
if session("user_name")="" then
response.Redirect url&"error.asp?msg=您这样的操作本系统令人感到耻辱!&logout=true"
end if
if not selectROLE1(session("user_name")) then
response.Redirect url&"error.asp?msg=您这样的操作本系统令人感到耻辱!&logout=true"
end if
if request("del")="yes" then
sqlqq = "update USER_INFO set USER_ROLE_id=0 where id ="&selectWord(request("id"))&""
conn.Execute(sqlqq)
end if
if request("flog")="add" then
sqlqq = "update USER_INFO set USER_ROLE_id='"&selectWord(request("USER_ROLE_id"))&"' where u_id ='"&selectWord(request("u_id"))&"'"
conn.Execute(sqlqq)
end if
%>
<html>
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="../style.css" rel="stylesheet" type="text/css" />
</head>
<body>
<div align="center">
<TABLE style="TABLE-LAYOUT: fixed" height=100% cellSpacing=0 cellPadding=0 width="98%" border=0>
<TBODY>
<TR height=3 width="100%">
<TD> <TABLE style="TABLE-LAYOUT: fixed" height=3 cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR height=1>
<TD width=1></TD>
<TD width=1></TD>
<TD width=1></TD>
<TD bgColor=#DCDCDC></TD>
<TD width=1></TD>
<TD width=1></TD>
<TD width=1></TD>
</TR>
<TR height=1>
<TD></TD>
<TD bgColor=#DCDCDC colSpan=2></TD>
<TD bgColor=#f7f8f9></TD>
<TD bgColor=#DCDCDC colSpan=2></TD>
<TD></TD>
</TR>
<TR height=1>
<TD></TD>
<TD bgColor=#DCDCDC></TD>
<TD bgColor=#f7f8f9 colSpan=3></TD>
<TD bgColor=#DCDCDC></TD>
<TD></TD>
</TR>
</TBODY>
</TABLE></TD>
</TR>
<TR>
<TD> <TABLE style="TABLE-LAYOUT: fixed" height="100%" cellSpacing=0 cellPadding=0 border=0>
<TBODY>
<TR>
<TD width=1 bgColor=#DCDCDC></TD>
<TD id=oINNER bgColor=#FFFFFF>
<table border="0" width="100%" id="table1" cellspacing="0" cellpadding="0" height="100%">
<tr>
<td height="24" style="border-left-width: 1px; border-right-width: 1px; border-top-width: 1px; border-bottom-style: dotted; border-bottom-width: 1px" colspan="3">
<font color="#999999"><b> 管理员设置</b></font></td>
</tr> <tr>
<td bgcolor="#FFFFFF" valign="top">
<table border="0" width="100%" id="table2" height="100%" cellspacing="0" cellpadding="0">
<tr>
<td valign="top">
<div align="center">
<table border="0" width="100%" id="table4">
<tr>
<td> </td>
</tr>
</table>
<table border="0" width="300" id="table3" height="60" cellspacing="0" cellpadding="0">
<tr>
<td height="25" width="130" align="center" style="border-left-width: 1px; border-right-width: 1px; border-top-width: 1px; border-bottom-style: solid; border-bottom-width: 1px">用户名</td>
<td width="130" align="center" style="border-left-width: 1px; border-right-width: 1px; border-top-width: 1px; border-bottom-style: solid; border-bottom-width: 1px">等级</td>
<td > </td>
</tr>
<%s =cint( request.querystring("s"))
if len(s)<1 then s = 0
s=s*13
a="0"
sql = "select u_id,id,USER_ROLE_id from USER_INFO where USER_ROLE_id=1 or USER_ROLE_id=2 or USER_ROLE_id=3 order by id desc"
set rs = conn.Execute(sql)
while not rs.eof
count = count +1
if count>s and count<=(s+13) then
if count mod 2 = 0 then
bgcolor = "a3"
else
bgcolor = "a4"
end if%>
<tr>
<td height="25" style="border-left-width: 1px; border-right-width: 1px; border-top-width: 1px; border-bottom-style: dotted; border-bottom-width: 1px" align="center"><%=rs("u_id")%></td>
<td height="25" style="border-left-width: 1px; border-right-width: 1px; border-top-width: 1px; border-bottom-style: dotted; border-bottom-width: 1px" align="center"><%=selectROLE5(rs("USER_ROLE_id"))%></td>
<td height="25" style="border-left-width: 1px; border-right-width: 1px; border-top-width: 1px; border-bottom-style: dotted; border-bottom-width: 1px"><a href="?del=yes&id=<%=rs("id")%>">
<img border="0" src="../images/pic/delete.gif" width="18" height="18"></a></td>
</tr>
<%end if
rs.movenext
wend
%>
<tr>
<td colspan="3" height="25" style="border-left-width: 1px; border-right-width: 1px; border-top-width: 1px; border-bottom-style: dotted; border-bottom-width: 1px" align="center">
<form method="POST" action="?flog=add">
<p>
<input type="text" name="u_id" size="19" class="InputText" onFocus="this.value='';" value="输入要增加的用户名" >
<select size="1" name="USER_ROLE_id" class="InputText">
<option selected value="1">管理员</option>
<option value="3">文员</option>
<option value="2">老师</option>
<option value="0">普通</option>
</select>
<input type="submit" value="增加" name="B1" class="button1"><br>
<font color="#FF0000">如果要修改,则直接增加数据就可!</font></p>
</form>
</td>
</tr>
</table>
</div>
</td>
</tr>
</table>
</td>
</tr>
</table>
</TD>
<TD width=1 bgColor=#DCDCDC></TD>
</TR>
</TBODY>
</TABLE></TD>
</TR>
<TR height=3 width="100%">
<TD> <TABLE style="TABLE-LAYOUT: fixed" height=3 cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR height=1>
<TD width=1></TD>
<TD width=1 bgColor=#DCDCDC></TD>
<TD width=1 bgColor=#f7f8f9></TD>
<TD bgColor=#f7f8f9></TD>
<TD width=1 bgColor=#f7f8f9></TD>
<TD width=1 bgColor=#DCDCDC></TD>
<TD width=1></TD>
</TR>
<TR height=1>
<TD></TD>
<TD bgColor=#DCDCDC colSpan=2></TD>
<TD bgColor=#f7f8f9></TD>
<TD bgColor=#DCDCDC colSpan=2></TD>
<TD></TD>
</TR>
<TR height=1>
<TD colSpan=3></TD>
<TD bgColor=#DCDCDC></TD>
<TD colSpan=3></TD>
</TR>
</TBODY>
</TABLE></TD>
</TR>
</TBODY>
</TABLE>
</div>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -