百度空间 | 百度首页 
 
查看文章
  
禁止某IP访问的ASP代码
2008年03月19日 星期三 下午 04:35
程序代码

<%
Dim IP,IPString,VisitIP
'要禁止的IP地址
IPString="|218.58.194.90|218.58.194.218|218.58.194.222|"
'获取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 "<Script Language=JavaScript>alert('本站禁止您的访问!');</Script>"
response.end
End If
%>



把上面代码另存为ip.asp
调用方法:把下面这句代码加到你的网页最开始即可

程序代码
<!--#include file="ip.asp"-->

类别：建站学习 | 添加到搜藏 | 浏览() | 评论 (2)
 
最近读者：
 
网友评论：
1
2008年06月19日 星期四 下午 02:08 | 回复
不错,学习中 如何让搜索引擎快速收录方法http://www.58la.net/thread-205-1-1.html
 
4
2009年03月05日 星期四 下午 08:26 | 回复
我试过了,好象可惜不支持IP段,要单个的添加太麻烦了.
 
发表评论：
姓　名：
网址或邮箱： (选填)
内　容：
验证码： 请点击后输入四位验证码，字母不区分大小写
      

     

©2009 Baidu