📄 tbmana.asp
字号:
<!--#INCLUDE FILE="../conn.asp" -->
<!--#include file="../log_lib.asp" -->
<%
checkuser()
if not isad=-1 then
response.redirect ("index.asp")
response.end
end if
%>
<html>
<head>
<title>TrackBack管理</title>
<meta http-equiv="Content-Type" content="text/html; chatopet=gb2312">
<link rel="stylesheet" type="text/css" href="../styles.css">
</head>
<body bgcolor="#f0f0f0" text="#000000" leftmargin="0" topmargin="5">
<%
dim top
dim SQL
set top = Server.CreateObject("ADODB.Recordset")
SQL = "Select * from trackback order by id desc"
top.open SQL,conn,1,1
if top.eof and top.bof then
response.write "还没有任何TrackBack记录"
response.end
else
dim pagesize,page
dim i,go
pagesize=10
i=0
top.pagesize=pagesize
page=Request("page")
if (page-top.pagecount) > 0 then
page=top.pagecount
elseif page = "" or page < 1 then
page = 1
end if
top.absolutepage=page
%>
<table width="728" border="0" cellspacing="2" cellpadding="2">
<tr>
<td colspan=2><h3>TrackBack管理</h3></td>
</tr>
<tr>
<td colspan=2>共有Trackback<%=top.recordcount%>条 共<%=top.pagecount%>页 你正在浏览第<%=page%>页 跳到第<%for go=1 to top.pagecount%> <a href="tbmana.asp?page=<%=go%>"><%=go%></a> <%next%>页<% if page<>1 then %> <a href="tbmana.asp?page=<%=page-1%>">上一页</a><%end if%><% if top.pagecount-page <> 0 then %> <a href="tbmana.asp?page=<%=page+1%>">下一页</a><%end if%>
<hr size="1"></td>
</tr>
<%
do while not top.eof
i = i + 1
if i > top.pagesize then
exit do
end if
%>
<tr bgcolor="#F5F5F5">
<td><b><%=i%></b></td>
<td align="right">
<% if isad=-1 then %>
<a href="deltb.asp?id=<%=top("id")%>"><img src=../images/icon_edit.GIF alt=删除该引用 border=0></a>
<%end if%></td>
</tr>
<tr>
<td align="center" width="12%"><b>标 题</b></td>
<td width="88%"><%=top("title")%></td>
</tr>
<tr>
<td align="center" width="12%"><b>摘 要</b></td>
<td width="88%"><%=top("excerpt")%></td>
</tr>
<tr>
<td align="center" width="12%"><b>Blog名称</b></td>
<td valign="top" width="88%"><%=top("blog_name")%></td>
</tr>
<tr>
<td align="center" width="12%"><b>链接地址</b></td>
<td width="88%"><a href="<%=top("url")%>" target="_blank"><%=top("url")%></a></td>
</tr>
<tr>
<td align="center" width="12%"><b>引用时间</b></td>
<td width="88%"><%=top("trackTime")%></td>
</tr>
<%
top.movenext
loop
%>
<tr>
<td colspan=2>
<hr size="1">共查找到<%=top.recordcount%>条记录 共有<%=top.pagecount%>页 你正在浏览第<%=page%>页 跳到第<%for go=1 to top.pagecount%> <a href="tbmana.asp?page=<%=go%>"><%=go%></a> <%next%>页<% if page<>1 then %> <a href="tbmana.asp?page=<%=page-1%>">上一页</a><%end if%><% if top.pagecount-page <> 0 then %> <a href="tbmana.asp?page=<%=page+1%>">下一页</a><%end if%>
<%
end if
set top=nothing
%>
</td>
</tr>
</table>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -