?? admin_user.asp
字號(hào):
<!--#include file="conn.asp"-->
<!--#include file="inc.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>無(wú)標(biāo)題文檔</title>
<link href="../style.css" rel="stylesheet" type="text/css">
<style type="text/css">
<!--
.style1 {
color: #FF0000;
font-size: 36px;
}
-->
</style>
</head>
<body>
<div align="center">
<%
sql="select * from user_data"
set objrs=red(sql)
if objrs.eof or objrs.bof then
response.Write("沒(méi)有用戶")
response.end()
end if
%>
<span class="style1">用戶列表
</span>
</div>
<table width="600" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#eaeaea">
<tr>
<td bgcolor="#eaeaea"><table width="100%" border="0" cellpadding="1" cellspacing="1">
<%
objrs.pagesize=15
if trim(request.querystring("page"))="" then
current_page=1
else
Current_Page= CLng(request.querystring("Page"))
end if
objrs.absolutepage=current_page
i=0
do while not objrs.eof and i<objrs.pagesize
if objrs("power_type")=1 then
power_id="<font color='red'>管理員</font>"
elseif objrs("power_type")=2 then
power_id="<font color='blue'><b>超級(jí)管理員</b></font>"
else
power_id="普通會(huì)員"
end if
%>
<tr bgcolor="#FFFFFF">
<td width="20%" bgcolor="#FFFFFF">用戶名:<%=objrs("user_name")%></td>
<td width="20%" bgcolor="#FFFFFF">身份:<%=power_id%></td>
<%if session("power_type")=2 then%>
<td width="20%" bgcolor="#FFFFFF">密碼:<%=objrs("user_pwd")%></td>
<%
if objrs("power_type")=0 then%>
<td width="20%" bgcolor="#FFFFFF"><div align="center"><a href="admin_inc.asp?method=gl&id=<%=objrs("user_id")%>">升級(jí)為管理員</a></div></td>
<td width="10%" bgcolor="#FFFFFF"><div align="center"><a href="admin_inc.asp?method=hy&id=<%=objrs("user_id")%>">刪除</a></div></td>
<%elseif objrs("power_type")=1 then%>
<td width="20%" bgcolor="#FFFFFF"><div align="center"><a href="admin_inc.asp?method=cs&id=<%=objrs("user_id")%>">撤銷(xiāo)此管理員</a></div></td>
<td width="10%" bgcolor="#FFFFFF"><div align="center"><a href="admin_inc.asp?method=hy&id=<%=objrs("user_id")%>">刪除</a></div></td>
<%elseif objrs("power_type")=2 then%>
<td width="20%" bgcolor="#FFFFFF"><div align="center"><a href="javascript:onclick=alert('不可修改')">超級(jí)管理員</a></div></td>
<td width="10%" bgcolor="#FFFFFF"><div align="center"><a href="javascript:onclick=alert('不可修改')">刪除</a></div></td>
<%end if
end if
%>
</tr>
<%
objrs.movenext
i=i+1
loop
%>
</table></td>
</tr>
</table>
<table width="600" border="0" align="center" cellpadding="0" cellspacing="1">
<tr>
<td><div align="center">共有會(huì)員<%=objrs.recordcount%> 個(gè) | 共<%=objrs.pagecount%> 頁(yè) | 第 <%=current_page%>頁(yè) |
<%
if current_page=1 then
response.write "首頁(yè) | 上一頁(yè)"
else
response.write"<a href='admin_user.asp?page=1'>首頁(yè) |</a>"
response.write"<a href='admin_user.asp?page="&cstr(current_page-1)&"'> 上一頁(yè)</a>"
end if
if current_page=objrs.pagecount then
response.write " | 下一頁(yè) | 尾頁(yè)"
else
response.write"<a href='admin_user.asp?page="&cstr(current_page+1)&"'>| 下一頁(yè)</a>"
response.write"<a href='admin_user.asp?page="&cstr(objrs.pagecount)&"'> | 尾頁(yè) </a>"
end if
objrs.close
set objrs=nothing
%></td>
</tr>
</table>
<p align="center" class="style1"> </p>
</body>
</html>
?? 快捷鍵說(shuō)明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -