Question

如何在页面中代码设置禁止某个ip访问网站？重谢啊.....

最近网站遭恶意刷网站流量，导致网站经常打不开 ，苦不堪言。首先对这种恶意刷别人网站的人的这种不道德行为表示强烈的谴责 ，没有能力就不要做seo这行 ，也不要搞这种没水平的行为 。
实在没有办法， 在此求各位大侠 ， 谁有能在网站中屏蔽ip访问网站的代码？最好是能符合下面功能的：
1. 判断访问网站的这个ip是否在短时间内多次访问网站。
2. 对与在短时间内多次访问网站的ip 禁止访问站点 。
3. 能够设置ip 禁止访问的时间。 求赐教 ！！！

• 你的回答被采纳后将获得：
• 系统奖励15（财富值+成长值）+难题奖励10（财富值+成长值）+提问者悬赏100（财富值+成长值）

Answer 1

一个简单的封少量IP的ASP代码：

<%
Dim IP,IPString,VisitIP
'要禁止的IP地址
IPString="|219.142.118.71|127.0.0.1|"
'获取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
response.Write("你的IP:"&IP&"可以访问本站")
%>

禁止某个IP段访问：

<%
function IP2Num(sip)
dim str1,str2,str3,str4
dim num
IP2Num=0
if isnumeric(left(sip,2)) then
str1=left(sip,instr(sip,".")-1)
sip=mid(sip,instr(sip,".")+1)
str2=left(sip,instr(sip,".")-1)
sip=mid(sip,instr(sip,".")+1)
str3=left(sip,instr(sip,".")-1)
str4=mid(sip,instr(sip,".")+1)
num=cint(str1)*256*256*256+cint(str2)*256*256+cint(str3)*256+cint(str4)-1
IP2Num = num
end if
end function
function Num2IP(nip)
iip1 = int(nip/256/256/256)
iip2 = int((nip-iip1*256*256*256)/256/256)
iip3 = int((nip-iip1*256*256*256-iip2*256*256)/256)
iip4 = int((nip-iip1*256*256*256-iip2*256*256-iip3*256) mod 256)
iip0 = iip1 &"."& iip2 & "." &iip3 &"."& iip4
Num2IP = iip0
end function
userIPnum = IP2Num(Request.ServerVariables("REMOTE_ADDR"))
if userIPnum > IP2Num("192.168.3.0") and userIPnum < IP2Num("192.168.3.255") then
response.write ("<center>此IP被禁止</center>")
response.end
'页面ASP解释结束
end if
%>
显示内容

上例是禁止192.168.3.0——192.168.3.255之内的所有IP看到下面的显示内容。如果是要禁止访问整个页面，那只需要把这段代码放到开头就可以限制访问页面了。

追问

我的网站php的!

追答

$ban_range_low && $ip

追问

代码加在什么位置？新手不懂，见笑了....

追答

在需要禁止访问或提交表单的页面添加下面的代码进行判断就可以了