⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 tbmana.asp

📁 blog 程序 DIV BLOG 0.6 Readme [ http://www.IamTing.com ] DIV BLOG 0.6版更新说明 =====================
💻 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 + -