Asp中对ip进行过滤限制函数 <% ‘获取访问者的地址 ip=Request.ServerVariables(“REMOTE_ADDR”) ‘允许的IP地址段为10.0.0.0~10.68.63.255 allowip1=”10.0.0.0′′ allowip2=”10.68.10.71′′ response.write checkip(ip,allowip1,allowip2) function checkip(ip,allowip1,allowip2) dim check(4) checkip=false ipstr=split(ip,”.”) allow1=split(all