关闭或者屏蔽引用通告功能以防垃圾引用

作者:小柳日期:2006-11-10

字体大小: 小中大

删不完的垃圾引用通告，如何解决？
一、是无限期关闭，直到有更好的解决办法。
      在trackback.asp里，注释掉以下代码

程序代码： [ 复制代码到剪贴板 ]

Conn.Execute("Insert INTO blog_TrackBack (blog_ID, tb_URL, tb_Title, tb_Intro, tb_Site, tb_PostTime) VALUES ("&tbID&",'"&tbURL&"','"&tbTitle&"','"&tbExcerpt&"','"&tbBlog&"',Now())")
        Conn.Execute("Update blog_Content SET log_QuoteNums=log_QuoteNums+1 Where log_ID="&tbID)
        Conn.Execute("Update blog_Info Set blog_tbNums=blog_tbNums+1")
        Smilies(1)
        Keywords(1)
        getInfo(2)
        PostArticle tbID
        SQLQueryNums=SQLQueryNums+3
        tbResponseXML 0,"Trackback成功"

二、把垃圾引用地址加入黑名单，不过麻烦一些
手动修改funtion.asp,trackback.asp和commond.asp三个文件.现把该方法转载过来,希望对大家有用处.
1、在include/funtion.asp中加入下面代码：

程序代码： [ 复制代码到剪贴板 ]
Function ChkTbUrl(TbUrlstr)
    Dim r,RejTburl
    RejTburl=split(RejectTbUrl,",")
    ChkTbUrl = True
    For r = 0 To ubound(RejTburl)
        IF instr(lcase(TbUrlstr),lcase(RejTburl(r)))>0 Then
            ChkTbUrl = False
            Exit Function
        End IF
    Next
End Function

2、在trackback.asp中找到下面这段代码：

程序代码： [ 复制代码到剪贴板 ]
If Conn.Execute("SELECT count(log_ID) FROM blog_Content WHERE log_IsShow=True And log_DisComment=False AND log_ID="&tbID)(0)>0 AND Conn.Execute("SELECT count(tb_ID) FROM blog_Trackback WHERE blog_ID="&tbID&" AND tb_URL='"&tbURL&"' AND tb_Title='"&tbTitle&"' AND tb_Intro='"&tbExcerpt&"' AND tb_Site='"&tbBlog&"'")(0)<1 Then

修改为

程序代码： [ 复制代码到剪贴板 ]
If Conn.Execute("SELECT count(log_ID) FROM blog_Content WHERE log_IsShow=True And log_DisComment=False AND log_ID="&tbID)(0)>0 AND Conn.Execute("SELECT count(tb_ID) FROM blog_Trackback WHERE blog_ID="&tbID&" AND tb_URL='"&tbURL&"' AND tb_Title='"&tbTitle&"' AND tb_Intro='"&tbExcerpt&"' AND tb_Site='"&tbBlog&"'")(0)<1 AND ChkTbUrl(tbURL)=True Then

3、在commond.asp中加入以下代码：其中abc.com是要过滤掉的恶意引用通告的网址，多个网址用英文逗号隔开。
程序代码： [ 复制代码到剪贴板 ]
dim RejectTbUrl
RejectTbUrl="abc.com,abc.net"

该方法可用于L-BLOG核心的程序.其他的就不清楚了.呵呵.

三、批量删除垃圾引用通告

在数据管理中执行一句SQL来批量删除引用广告：
  DELETE * FROM blog_Trackback
执行后在一般设置中点击一下“统计日志评论数”重新统计一下评论数即可。

[本日志由小柳于 2006-11-10 03:44 PM 编辑]