📄 userlist.asp
字号:
<!--#include file="check.asp"-->
<!--#include file="checkpower.asp"-->
<!--#INCLUDE FILE="connect.asp" -->
<html>
<head>
<title>用户管理</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<script language="JavaScript" src="apply.js"></script>
<link rel="stylesheet" href="apply.css" type="text/css">
</head>
<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0" oncontextmenu="return false">
<%set rs=server.createobject("adodb.recordset")
sql="select * from userdep order by type desc,power desc"
rs.open sql,conn,1,1
%>
<table width="100%" cellpadding="0" cellspacing="0" align="center">
<tr>
<td valign="top" height="477" width="940">
<form name="form" method="post" action="">
<table width="100%" border="0" cellspacing="0" cellpadding="0" height="50">
<tr>
<td align="center" class="title"><img src="images/systemuser.gif"> </td>
</tr>
</table>
<table width="90%" border="0" cellspacing="0" cellpadding="0" align="center" height="26">
<tr height=1>
<td bgcolor="#A7BAE4" height="1" colspan="4"></td>
</tr>
<tr>
<td bgcolor="#D4DEF4" valign="top">
<table width="100%" border="0" cellspacing="0" cellpadding="0" height="26">
<tr>
<td width="30"> </td>
<td width="130">目前共有<font class="picknum"><b><%=rs.recordcount %></b></font>个用户</td>
<td>
<a href="adduser.asp" onClick="return OpenWindows(this.href)" class="aapply">添加用户</a>
<a href="javascript:gosystem()" class="aapply"> 返 回</a>
</td>
</tr>
</table>
</td>
</tr>
<tr height=1>
<td bgcolor="#A7BAE4" height="1" colspan="4"></td>
</tr>
</table>
<table width="90%" border="0" cellspacing="0" align="center" cellpadding="0">
<tr align="center" bgcolor="#E7ECF7">
<td height="26" width="25%">帐 号：</td>
<td height="26" width="25%">姓 名：</td>
<td height="26" width="20%">部 门：</td>
<td height="26" width="15%">公文权限：</td>
<td height="26" width="15%">用户类型：</td>
</tr>
<%if rs.eof then %>
<tr height="1">
<td bgcolor="#ffffff" colspan="5"><img src="images/spacer.gif" width="1" height="1"></td>
</tr>
<tr bgcolor="#F5FAFD" align="center">
<td height="26" colspan="5" class="f6wait">没有找到相应记录</td>
</tr>
<tr height="1">
<td bgColor="#D6E1F8" colspan="5"><img src="images/spacer.gif" width="1" height="1"></td>
</tr>
<%
else
while not rs.eof
%>
<tr height="1">
<td bgcolor="#ffffff" colspan="10"><img src="images/spacer.gif" width="1" height="1"></td>
</tr>
<tr align="center" bgcolor="#F5FAFD">
<td height="26" width="25%">
<a href="modifyuser.asp?id=<%=rs("id")%>" onClick="return OpenWindows(this.href)" class=aapply>
<%=rs("uid")%></a></td>
<td height="26" width="25%">
<a href="modifyuser.asp?id=<%=rs("id")%>" onClick="return OpenWindows(this.href)" class=aapply>
<%=rs("name")%></a></td>
<td height="26" width="20%" class="aapply"> <%=rs("depname")%></td>
<td height="26" width="15%" class="aapply">
<%
if rs("power")=3 then
response.write("绝 密")
end if
if rs("power")=2 then
response.write("秘 密")
end if
if rs("power")=1 then
response.write("普 通")
end if
%>
</td>
<td height="26" width="15%" class="aapply">
<%
if rs("type")=1 then
response.write("普通用户")
end if
if rs("type")=2 then
response.write("<font class='f6wait'>管 理 员</font>")
end if
%>
</td>
</tr>
<tr height="1">
<td bgColor="#D6E1F8" colspan="3"><img src="images/spacer.gif" width="1" height="1"></td>
</tr>
<%rs.movenext
wend
end if
%>
</table>
<table width="90%" border="0" cellspacing="0" cellpadding="0" align="center" height="26">
<tr height=1>
<td bgcolor="#A7BAE4" height="1" colspan="4"></td>
</tr>
<tr>
<td bgcolor="#D4DEF4" align="center"> </td>
</tr>
<tr height=1>
<td bgcolor="#A7BAE4" height="1" colspan="4"></td>
</tr>
</table>
</form>
</td>
</tr>
</table>
<!--#include file="close.asp"-->
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -