Apr11th
利用封IP的方法来对付采集程序
如今这个问题，对低一度及其他一些坚持原创的博友来说，已经越来越严峻了。为了防止采集，我试了N种方法，绝大多数都无效，有的防止了采集，却同时也影响了SEO。那么，就这么束手无策了吗？这两天我思前想后，为何不利用封IP的办法来防止采集呢？说干就干——
<%
Dim IP,IPString,VisitIP
'要禁止的IP地址
IPString="|218.66.89.231|120.36.92.46|127.0.0.1|120.36.94.152|218.85.72.33|"
'获取IP地址
IP = Request.ServerVariables("HTTP_X_FORWARDED_FOR")
If IP = "" Then
IP = Request.ServerVariables("REMOTE_ADDR")
End If
VisitIP="|"&IP&"|"
If instr(1,IPString,VisitIP)>0 Then
response.write "对不起，你的IP已被禁止"
response.end
End If
%>
