pjblog中清空引用的小程序

2006年11月30日

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