pjblog中清空引用的小程序
编程学习 2021-07-05 10:58www.dzhlxh.cn编程入门
sake:
很有用的程序 呵呵 转的，虽然现在打了防垃圾引用的补丁了
转自这里http://bbs.pjhome.net/viewthread.php?tid=12833&extra=page%3D1%26amp%3Bfilter%3D0%26amp%3Borderby%3Ddateline
今天彻底把我若怒了
自己写了一个,先清一下再说
保存到一个asp文件中,放到你BLOG的根目录,运行就OK了，页面中出现的数字是被删除的引用
我今天删了5000……
<!--#include file="const.asp" -->
<!--#include file="common/function.asp" -->
<%
dim connstr,conn123,rsabc
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&server.mappath(AccessFile)
SET Conn123=Server.CreateObject("ADODB.Connection")
Conn123.Open connstr
set rsabc=server.createobject("adodb.recordset")
rsabc.open "select * from blog_Trackback",conn123,1,3
response.write rsabc.recordcount
rsabc.close
rsabc.open "delete * from blog_Trackback",conn123,1,3
set rsabc=nothing
conn123.close
set conn123=nothing
%>
很有用的程序 呵呵 转的，虽然现在打了防垃圾引用的补丁了
转自这里http://bbs.pjhome.net/viewthread.php?tid=12833&extra=page%3D1%26amp%3Bfilter%3D0%26amp%3Borderby%3Ddateline
今天彻底把我若怒了
自己写了一个,先清一下再说
保存到一个asp文件中,放到你BLOG的根目录,运行就OK了，页面中出现的数字是被删除的引用
我今天删了5000……
代码如下:
<!--#include file="const.asp" -->
<!--#include file="common/function.asp" -->
<%
dim connstr,conn123,rsabc
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&server.mappath(AccessFile)
SET Conn123=Server.CreateObject("ADODB.Connection")
Conn123.Open connstr
set rsabc=server.createobject("adodb.recordset")
rsabc.open "select * from blog_Trackback",conn123,1,3
response.write rsabc.recordcount
rsabc.close
rsabc.open "delete * from blog_Trackback",conn123,1,3
set rsabc=nothing
conn123.close
set conn123=nothing
%>