?? user.asp
字號:
<!--#include file="md5.asp" -->
<!--#include file="conn.asp" -->
<!--#include file="sub.asp" -->
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title><%=webname%></title>
</head>
<body>
<style type="text/css">
<!--
.STYLE1 {color: #00000}
-->
</style>
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
<!--頁面頭部-->
<tr>
<td height="30">
<!--#include file="top.asp" --> </td>
</tr>
</table>
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
<!--公告內容-->
<tr>
<td width="100%" height="20" valign="middle"></td>
</tr>
</table>
<table width="100%" border="0" align="center" cellpadding="4" cellspacing="0">
<!--簽寫留言，分類-->
<tr valign="middle">
<td width="10%" bgcolor="#FFCC99"><a href="index.asp">·返回首頁</a></td>
<td width="76%" bgcolor="#FFCC99"> </td>
<td width="14%" bgcolor="#FFCC99" class="putongziti"><b><a href="add.asp"><font color="#FF0000">·簽寫留言</font></a></b></td>
</tr>
</table>
<table width="100%" align="center" cellpadding="0" cellspacing="1">
<!--循環留言-->
<tr>
<td width="100%" align="center"><br />
<table width="100%" border="0">
<tr bgcolor="#0099CC">
<td width="100%" height="20" align="center"class="dhzi">查看用戶</td>
</tr>
<tr valign="top">
<td height="103" align="left"class="dhzi">
<form action="admin_deluser.asp" method="post">
<table width="100%" border="0">
<tr bgcolor="#FFCC99" >
<td width="31%" height="21"><span class="STYLE1"> 用戶名</span></td>
<td width="29%" bgcolor="#FFCC99"><span class="STYLE1"> E-MAIL</span></td>
<td width="16%"><span class="STYLE1"> QQ</span></td>
<td width="24%"><span class="STYLE1"> 個人主頁</span></td>
</tr>
<%set rsu=server.createobject("adodb.recordset")
rsu.open "select * from zdu ",conn,1,1
if not rsi.bof and not rsi.eof then
dim page
if request("page")="" then
page=1
else
page=cint(request("page"))
end if
rsu.pagesize=25 '每頁顯示N條記錄
rsu.absolutepage=page
dim i
i=rsu.pagesize
end if%>
<% do while not rsu.eof%>
<tr>
<td height="21">
<%if session("zdqx")="alladmin" then%>
<input name="del" type="checkbox" id="del" value="<%=rsu("u_id")%>" />
<%end if%>
<%=rsu("u_name")%>(<font color="#FF0000"><%select case rsu("u_qx")
case "user"
response.Write("普通會員")
case "admin"
response.Write("管理員")
case "alladmin"
response.Write("超級管理員")
end select%></font>)</td>
<td><%=rsu("u_mail")%></td>
<td><a href="http://wpa.qq.com/msgrd?V=1&Uin=<%=rsu("u_qq")%>&Site=紫蝶軒留言本&Menu=yes" target="_blank" title="點擊與作者交談"><%=rsu("u_qq")%></a></td>
<td><a href="<%=rsu("u_home")%>" target="_blank"><%=rsu("u_home")%></a></td>
</tr>
<% rsu.movenext
loop%>
<tr>
<td height="21" colspan="4" bgcolor="#FFCC99"><span class="putongziti"> <a href="user.asp?page=1<%if request.QueryString("id")<>"" then response.Write("&id="&request.QueryString("id"))%>">首頁</a>
<%if not page="1" then%>
<a href="user.asp?page=<%=page-1%><%if request.QueryString("id")<>"" then response.Write("&id="&request.QueryString("id"))%>">上一頁</a>
<%else response.Write("上一頁") end if%>
<%if not page=rsu.pagecount then%>
<a href="user.asp?page=<%=page+1%><%if request.QueryString("id")<>"" then response.Write("&id="&request.QueryString("id"))%>">下一頁</a>
<% else response.Write("下一頁") end if%>
<a href="user.asp?page=<%=rsu.pagecount%><%if request.QueryString("id")<>"" then response.Write("&id="&request.QueryString("id"))%>">末頁</a> <font color="#FF0000"><%=page%></font>/<%=rsu.pagecount%>
<%if session("zdqx")="alladmin" then%>
<input type="submit" name="Submit" style="BACKGROUND-COLOR: #2071a0; BORDER-BOTTOM: 1px double; BORDER-LEFT: 1px double; BORDER-RIGHT: 1px double; BORDER-TOP: 1px double; COLOR: #eeeeee; TEXT-ALIGN: center" onMouseOver="this.style.color='#ffff00'"onmouseout="this.style.color='#eeeeee'" value="批量刪除">
<%end if%>
</span></td>
</tr>
</table></form></td></tr>
</table>
</td></tr>
</table>
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
<!--版權-->
<tr>
<td width="100%" height="20" > <%call ksmyboot%> </td>
</tr>
</table>
</body>
</html>?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -