限制ip访问网站

dim mIPAddr
mIPAddr = Request.ServerVariables("HTTP_X_FORWARDED_FOR")
If mIPAddr = "218.87.193.156" Then
Response.Write ("页面出错"<br>")
或
Response.redirect("www.baidu.com")
end if

 

 

 

用ASP实现：
在被访网页最上部加入
<%
yourip=Request.ServerVariables("REMOTE_ADDR")
if yourip="111.111.111.111" then
Response.Redirect ("http://www.baidu.com")
end if
%>