% Dim IP,IPString,VisitIP '要禁止的IP地 IPString="|127.0.0.1|61.151.252.248|220.170.156.136|222.76.210.13|222.215.152.26|211.157.101.133|211.100.21.244|"" '获取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 %>
![]() |
|
|
|
|
|
|
|
|||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
| 公司简介 - 联系方法 - 合作伙伴 - 招聘信息 - 意见反馈 - 隐私保护 - 版权声明 |
| @ 2006 财星 版权所有. ALL RIGHTS RESERVED. 京ICP备05046515号 |