|
||||||||||||
<%
Dim IP,IPString,VisitIP
'要禁止的IP地址
IPString="|127.0.0.1|218.85.132.8|"
'获取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 "非常感谢您访问平利信息港"
response.end
End If
%>
|
||||||||||||
|
| 设为首页 | |
|
Copyright·2007 126pl.com Inc.All rights reserved.平利信息港版权所有陕ICP备07012756号 建议用非FIREFOX、OPERA等浏览器访问本站! |