📄 admin.asp
字号:
<!--#include file="cfg.asp"-->
<!--#include file="usercheck.asp"-->
<%if userlevel<>"站长" then response.redirect "msg.asp?msg=权限不够，请退出！"
set rs=server.createobject("adodb.recordset")
rs.open "select * from room order by room_id desc",conn,1,1
direction=request("direction")
go=request("go")
if isempty(go) then go=0
select case direction
case "up"
go=go-10
if go<=0 then go=0
case "down"
go=go+10
if go>=rs.recordcount then go=go-10
end select
if not rs.eof then rs.move(go)
%>
<html>
<head>
<title><%=application("ChatInfo")%>-管理中心</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<LINK href="style.css" rel=stylesheet>
</head>
<body bgcolor="#8EB4D9" text="#000000">
<table width="400" border="1" cellpadding="10" cellspacing="13" background="../images/b2.gif" height="275">
<tr bgcolor="#FFFFFF">
<td bgcolor="#8EB4D9" valign="top" height="284">
<table width="350" cellpadding="2" bordercolor="#333333" align="center" cellspacing="0" border="1" bordercolordark="#FFFFFF" height="81">
<tr>
<td height="25" colspan="6">
<div align="center"><a href="admin.asp">房间列表</a> <a href="admin1.asp">增加房间</a></div>
</td>
</tr>
<tr>
<td height="27" width="58">
<div align="center">房间名</div>
</td>
<td height="27" width="47">
<div align="center">人数</div>
</td>
<td height="27" width="47">
<div align="center">类型</div>
</td>
<td height="27" width="62">
<div align="center">屋主</div>
</td>
<td height="27" width="48">
<div align="center">修改</div>
</td>
<td height="27" width="50">
<div align="center">删除</div>
</td>
</tr>
<%do while not rs.eof and i<10
i=i+1%>
<tr>
<td height="19" width="58"><%=rs("room_name")%></td>
<td height="19" width="47"><%=rs("max_num")%></td>
<td height="19" width="47"><%=rs("room_type")%></td>
<td height="19" width="62"><%=rs("room_master")%></td>
<td height="19" width="48">
<div align="center"><a href="editroom.asp?id=<%=rs("room_id")%>">修改</a></div>
</td>
<td height="19" width="50">
<div align="center"><a href="delroom.asp?id=<%=rs("room_id")%>">删除</a></div>
</td>
</tr>
<%rs.movenext
loop%>
<tr>
<td height="19" colspan="6">
<div align="right"><a href=admin.asp?direction=up&go=<%=go%>>上一页</a> <a href=admin.asp?direction=down&go=<%=go%>>下一页</a></div>
</td>
</tr>
</table>
<p align=center> </p>
</td>
</tr>
</table>
</body>
</html>
<%call db_close()%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -