pjblog中清空引用的小程序

sake:
很有用的程序 呵呵 转的，虽然现在打了防垃圾引用的补丁了
转自这里http://bbs.pjhome.net/viewthread.php?tid=12833&extra=page%3D1%26amp%3Bfilter%3D0%26amp%3Borderby%3Ddateline

今天彻底把我若怒了
自己写了一个,先清一下再说

保存到一个asp文件中,放到你BLOG的根目录,运行就OK了，页面中出现的数字是被删除的引用
我今天删了5000……
复制代码 代码如下:


<%
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
%>