📄 adminreg.asp
字号:
<!--#include file=function.asp-->
<%CheckAdmin3%>
<!--#include file="conn.asp"-->
<html>
<head>
<LINK href="../style.css" rel=stylesheet type=text/css>
<title>OWEN 活动管理系统</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>
<body topmargin="0" leftmargin="0" bgcolor="#9999CC">
<table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="15%" valign="top" bgcolor="#9999CC" style="border-right: 1 solid #000000">
<!--#include file="left.asp"--></td>
<td width="85%" valign="top" bgcolor="#D8D8EB"><br>
<table width="90%" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#000000">
<tr align="center" bgcolor="#FFFFFF">
<td height="24" colspan="6">活动参加情况一览表</td>
</tr>
<tr align="center" bgcolor="#BDBDDD">
<td width="4%" height="24">ID</td>
<td width="13%">活动ID</td>
<td width="20%">参加人员</td>
<td width="27%">参加日期</td>
<td width="22%">电话</td>
<td width="14%">管理</td>
</tr>
<%
sql="select * from review order by rtime desc"
Set rs=Server.CreateObject("ADODB.RecordSet")
rs.Open sql,conn,1,1
if not isempty(request("page")) then
pagecount=cint(request("page"))
else
pagecount=1
end if
rs.pagesize=10
rs.AbsolutePage=pagecount
do while not rs.eof
%>
<tr align="center" bgcolor="#FFFFFF">
<td height="22"><%=rs("reviewid") %></td>
<td><a href="../shownews.asp?o_id=<%=rs("o_id")%>" target="_blank"><%=rs("o_id") %></a></td>
<td><font color="#FF0000"><%=rs("reviewer") %></font></td>
<td><%=rs("rtime") %></td>
<td><%=rs("tel") %></td>
<td bgcolor="#FFFFFF"><a href="reviewdel.asp?id=<%=rs("reviewid")%>">删除</a></td>
</tr>
<%
rs.movenext
i=i+1
if i>=rs.pagesize then exit do
loop
%>
<tr align="center" bgcolor="#FFFFFF">
<td height="24" colspan="6" bgcolor="#FFFFFF">
<table border="0" cellspacing="0" cellpadding="2" width="90%" align="center">
<tr>
<td height="24">
<div align="center">页次: <b><font color=red><%=pagecount%></font>/<%=rs.pagecount%></b>
<% if pagecount=1 and rs.pagecount<>pagecount and rs.pagecount<>0 then%>
<a href="adminreg.asp?page=<%=cstr(pagecount+1)%>"> <font color="#000000">下一页</font></a>
<% end if %>
<% if rs.pagecount>1 and rs.pagecount=pagecount then %>
<a href="adminreg.asp?page=<%=cstr(pagecount-1)%>"> <font color="#000000">上一页</font></a>
<%end if%>
<% if pagecount<>1 and rs.pagecount<>pagecount then%>
<a href="adminreg.asp?page=<%=cstr(pagecount-1)%>"> <font color="#000000">上一页</font></a>
<a href="adminreg.asp?page=<%=cstr(pagecount+1)%>"> <font color="#000000">下一页</font></a>
<% end if
%>
</div>
</td>
</tr>
</table>
</td>
</tr><%rs.close
set rs=nothing%>
</table></td>
</tr>
</table>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -