如何用asp判断访问者IP是否在某几段IP范围内?

来源:百度知道 编辑:UC知道 时间:2024/09/28 09:31:22
请教如何用asp或者asp.net实现:访问者IP是否在预先设定的一个或者几个IP段内...比如:预先设定了121.8.1.*和 59.41.100.* IP段,判断访问者IP是否在这两段内...

'---把已知的IP转换为12位数字
Function GetIpNum(Ip)
dim StartTemp,pi
StartTemp=Ip
StartTemp=split(StartTemp,".",-1,1)
for pi=0 to 3
StartTemp(pi)=cStr(StartTemp(pi))
if len(StartTemp(pi))<3 then StartTemp(pi)=string(3-len(StartTemp(pi)),"0")&StartTemp(pi)
next
GetIpNum=""
for pi=0 to 3
GetIpNum=GetIpNum&StartTemp(pi)
next
End Function

if GetIpNum(UserIp)>=GetIpNum(rsconn("IpStart")) and GetIpNum(UserIp)<=GetIpNum(rsconn// 判断ip("IpEnd")) then
response.write 'ok'