WEB开发网
开发学院WEB开发ASP ASP脚本限制某IP段对网页的访问 阅读

ASP脚本限制某IP段对网页的访问

 2012-09-14 15:12:08 来源:WEB开发网   
核心提示: 方法一:<html> <head> <title>www.7wy.net_限制IP段访问</title> </head><body> <% function IP2Num(sip) dim str1,str2,str3,

 方法一:
<html>
<head>
<title>www.7wy.net_限制IP段访问</title>
</head><body>
<%
function IP2Num(sip)
dim str1,str2,str3,str4
dim num
IP2Num=0
if isnumeric(left(sip,2)) then
str1=left(sip,instr(sip,".")-1)
sip=mid(sip,instr(sip,".")+1)
str2=left(sip,instr(sip,".")-1)
sip=mid(sip,instr(sip,".")+1)
str3=left(sip,instr(sip,".")-1)
str4=mid(sip,instr(sip,".")+1)
num=cint(str1)*256*256*256+cint(str2)*256*256+cint(str3)*256+cint(str4)
IP2Num = num
end if
end function

function Num2IP(nip)
iip1 = int(nip/256/256/256)
iip2 = int((nip-iip1*256*256*256)/256/256)
iip3 = int((nip-iip1*256*256*256-iip2*256*256)/256)
iip4 = int((nip-iip1*256*256*256-iip2*256*256-iip3*256) mod 256)
iip0 = iip1 &"."& iip2 & "." &iip3 &"."& iip4
Num2IP = iip0
end function

userIPnum = IP2Num(Request.ServerVariables("REMOTE_ADDR"))

if userIPnum > IP2Num("192.168.150.0") and userIPnum < IP2Num("192.168.150.138") then
response.write ("<center>您的IP被禁止</center>")
response.end
else response.write ("<center>您的IP被未被限制!</center>")
end if
%>
</body></html>


方法二:

<html>
<head>
<title>www.7wy.net_限制IP段访问——2</title>
</head><body>
<%
'限制192.168.150.130(3232274049)到192.168.150.140(3232274059)

ip=request.servervariables("remote_addr")
sip=split(ip,".")
num=cint(sip(0))*256*256*256+cint(sip(1))*256*256+cint(sip(2))*256+cint(sip(3))-1
response.write(ip)
response.write("<br>")
if (num >= 3232274049 and num <= 3232274059) then
response.write("您的ip被限制!")
response.End()
else
response.write("您的ip未被禁止")
end if
%>
</body></html>

Tags:ASP 脚本 限制

编辑录入:爽爽 [复制链接] [打 印]
赞助商链接