插件下載┊垃圾引用防御補丁（每小時自動換KEY，支持靜態頁面
2024-05-04 11:02:01
供稿：網友
發 布 人: 向導
補 丁 名: 垃圾引用防御補丁
發布時間: 2007-1-4
版 本 號: 第3版
適用版本: PJblog 2.6
原 作 者: 向導
演示地址: http://www.hljsh.com/
下載地址: http://bbs.pjhome.net/attachment.php?aid=2143
插件簡介: 能有效防止垃圾引用。加密遞交地址，第2版增加KEY驗證，并每小時自動更換一次key。
本版本不修改數據庫，只修改了4個文件，并支持靜態頁模式！
效果
引用通告地址: trackback.asp?tbID=JNKRQOF8&key=JOKNPNKOQPMPPMC0
具體安裝方法如下:
===========================================================
文件trackback.asp
查找
tbID = CheckStr(Request.QueryString("tbID"))
替換成
tbID = Decrypt(CheckStr(Request.QueryString("tbID")))
查找
If Not (IsInteger(Request.QueryString("tbID")) AND IsInteger(Request.QueryString("logID"))) Then
替換成
If Not IsInteger(Decrypt(Request.QueryString("tbID"))) AND IsInteger(Request.QueryString("logID")) Then
查找
Where blog_ID="&logID&" AND tb_ID="&CheckStr(Request.QueryString("tbID"))
替換成
Where blog_ID="&logID&" AND tb_ID="&Decrypt(CheckStr(Request.QueryString("tbID")))
**有2處
查找
'==================================
' 引用通告處理頁面
' 更新時間: 2006-6-1
'==================================
在下面加入
dim keys,keys1
keys=Request.QueryString("key")
keys1=Encrypt((year(now))&(Month(now))&(day(now))&hour(now()))
if keys<>keys1 then
Response.c
Response.write "<?xml version=""1.0"" encoding=""UTF-8""?><?xml-stylesheet type=""text/xsl"" href=""tb.xsl""?>"
%>
<response><error>1</error><message>您遞交的信息已過期.請檢查...</message></response>
<%
else
dim strget
strget=trim(Request.QueryString("tbID"))
if len(strget) > 8 then
