📄 admin.asp
字号:
<!--#include file="conn.asp"-->
<!--#include file="ubbcode.asp" -->
<% if session("user")="" then
response.redirect"login.asp"
end if %><html>
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>Welcome to 迷你留言本</title>
<STYLE type=text/css>TD {
FONT-SIZE: 9pt; LINE-HEIGHT: 12pt
}
A:link {
COLOR: #0080ff; TEXT-DECORATION: none
}
A:visited {
COLOR: #0080ff; TEXT-DECORATION: none
}
A:hover {
COLOR: #ee9c00; TEXT-DECORATION: underline
}
</STYLE>
<style>
table{table-layout:fixed;}
td{word-break:break-all;word-wrap:break-word;}
</style>
</head>
<body bgcolor="#FFFFFF">
<div align="center">
<center>
<table border="0" cellpadding="0" cellspacing="1" width="400" height="100">
<tr>
<td width="100%" height="1">
<p align="center"><img src="img/logo.jpg" width="320" height="100">
</td>
</tr>
</table>
<br>
<table width="481" border="0" style="border: 1pt dotted black" cellspacing="0" cellpadding="0" align="center">
<tr>
<td height="35" bgcolor="#E1EAE7" width="71"><font color="#000000">■全部留言]</font></td>
<td height="35" bgcolor="#E1EAE7" width="70"><font color="#000000">■<a href="modifypwd.asp">修改口令</a>]</font></td>
<td height="35" bgcolor="#E1EAE7" width="71">■<a href="out.asp">退出管理</a>]</td>
<td height="35" bgcolor="#E1EAE7" width="69">■<font color="#000000"><a href="skinmodify.asp">皮肤设置</a>]</font></td>
<td height="35" bgcolor="#E1EAE7" width="200">■<font color="#000000"><a href="http://my.phome.cn/knight999/index.asp">官方论坛</a>]<a href="/default.asp"></a></font></td>
</tr>
<tr>
<td height="18" colspan="5"><font color="#FF0000">请注意！留言属性："1"表示留言已隐藏，"0"表示留言正常显示</font></td>
</tr>
</table>
</center>
</div>
<br>
<div align="center">
<center>
</center>
</div>
<%
sql="select * from book order by id desc"
set rs=server.createobject("adodb.recordset")
On error resume next
rs.open sql,conn,1
rs.PageSize=5
pagecount=rs.PageCount
page=int(request.QueryString ("page"))
if page<=0 then page=1
if request.QueryString("page")="" then
page=1
end if
i=1
rs.AbsolutePage=page
if rs.eof then
response.write"<div align=center><font size=2 color=red>对不起，暂时没有留言！</font></div>"
else
do while not rs.eof
%><br>
<div align="center">
<table border="0" cellpadding="0" cellspacing="1" width="482" height="80" style="word-break: break-all; border: 1pt dotted black">
<tr>
<td width="24%" height="14" align="center" bgcolor="#FFFFFF"><font color="#000000">昵称：</font></td>
<td width="35%" height="14"><font color="#000000"><%=UBBCode(dvHTMLEncode(left(rs("name"),6)))%></font></td>
<td width="41%" height="14" bgcolor="#FFFFFF">
<p align="right"><font color="#000000"><%=rs("time")%></font>
</td>
</tr>
<tr>
<td width="24%" height="11" align="center" bgcolor="#FFFFFF"><font color="#000000">留言：</font></td>
<td height="15" colspan="2" rowspan="3">
<p align="left"><font color="#000000"><%=UBBCode(dvHTMLEncode(left(rs("body"),200)))%></font>
</td>
</tr>
<tr>
<td width="24%" height="18" align="left" bgcolor="#FFFFFF">
<div align="center">属性：<font color="#000000">[</font><font color="#FF0000"><%=rs("visible")%><font color="#000000">]</font></font></div>
</td>
</tr>
<tr>
<td width="24%" height="18" align="left" bgcolor="#FFFFFF">
<p align="center">[<a href="view.asp?id=<%=rs("id")%>">显示</a>][<a href="visible.asp?id=<%=rs("id")%>">隐藏</a>][<a href="delok.asp?id=<%=rs("id")%>">删除</a>]</p>
</td>
</tr>
</table>
</div>
<% i=i+1
if i>rs.PageSize then exit do
rs.movenext
loop
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
<table width="480" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td colspan=3 align=right width="478" bgcolor="#E1EAE7"> <font size="2">
<%if page=1 and not page=pagecount then%>
第<%=page%>页 | 共<%=pagecount%>页 | <a href="?page=<%=page+1%>"> 下一页</a> | <a href="?page=<%=pagecount%>">末一页</a>
<%elseif page=pagecount and not page=1 then%>
第<%=page%>页 | 共<%=pagecount%>页 | <a href="?page=<%=page-1%>">上一页</a> | <a href="?page=<%=1%>">第一页</a>
<%elseif page<1 then%>
没有任何记录
<%elseif page>pagecount then%>
没有任何记录！
<%elseif page=1 and page=pagecount then%>
<%else%>
第<%=page%>页 | 共<%=pagecount%>页 | <a href="?page=<%=1%>">第一页</a> | <a href="?page=<%=page-1%>">上一页 </a>
| <a href="?page=<%=page+1%>">下一页</a> | <a href="?page=<%=pagecount%>">末一页</a> </font>
<%end if%><% end if %>
</td>
</tr>
</table><p><b><font color="#FFFFFF" size="2">[程序设计：冷剑无情]
</font></b></p>
<div align="center">
<center>
<table border="0" cellpadding="0" cellspacing="0" width="300">
<tr>
<td width="298">copyright(C) 迷你留言本 2006.6 All Right Reserved</td>
</tr>
</table>
</center>
</div>
</body>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -