ip.asp

一套现成的分类信息网站发布系统

<%
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)-1
		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("61.131.0.0") and userIPnum < IP2Num("61.131.127.255") then
	response.write ("<center>对不起,您非西安地区用户,您的IP被禁止了!<br><br>有什么疑问直接与本站联系 07555-83722157,谢谢合作!</center>")
	response.write "<meta http-equiv=refresh content=""2;URL=index.asp"">"
	response.end
end if

if userIPnum > IP2Num("61.154.0.0") and userIPnum < IP2Num("61.154.255.255") then
	response.write ("<center>对不起,您非西安地区用户,您的IP被禁止了!<br><br>有什么疑问直接与本站联系 07555-83722157,谢谢合作!</center>")
	response.write "<meta http-equiv=refresh content=""2;URL=index.asp"">"
	response.end
end if

if  userIPnum > IP2Num("202.101.97.0") and userIPnum < IP2Num("202.101.159.255") then
	response.write ("<center>对不起,您非西安地区用户,您的IP被禁止了!<br><br>有什么疑问直接与本站联系 07555-83722157,谢谢合作!</center>")
	response.write "<meta http-equiv=refresh content=""2;URL=index.asp"">"
	response.end
end if

if  userIPnum > IP2Num("202.109.192.0") and userIPnum < IP2Num("202.109.255.255") then
	response.write ("<center>对不起,您非西安地区用户,您的IP被禁止了!<br><br>有什么疑问直接与本站联系 07555-83722157,谢谢合作!</center>")
	response.write "<meta http-equiv=refresh content=""2;URL=index.asp"">"
	response.end
end if

if  userIPnum > IP2Num("61.241.195.0") and userIPnum < IP2Num("61.241.222.255") then
	response.write ("<center>对不起,您非西安地区用户,您的IP被禁止了!<br><br>有什么疑问直接与本站联系 07555-83722157,谢谢合作!</center>")
	response.write "<meta http-equiv=refresh content=""2;URL=index.asp"">"
	response.end
end if

if  userIPnum > IP2Num("211.97.104.0") and userIPnum < IP2Num("211.97.161.255") then
	response.write ("<center>对不起,您非西安地区用户,您的IP被禁止了!<br><br>有什么疑问直接与本站联系 07555-83722157,谢谢合作!</center>")
	response.write "<meta http-equiv=refresh content=""2;URL=index.asp"">"
	response.end
end if

if  userIPnum > IP2Num("218.5.0.0") and userIPnum < IP2Num("218.6.127.255") then
	response.write ("<center>对不起,您非西安地区用户,您的IP被禁止了!<br><br>有什么疑问直接与本站联系 07555-83722157,谢谢合作!</center>")
	response.write "<meta http-equiv=refresh content=""2;URL=index.asp"">"
	response.end
end if

if  userIPnum > IP2Num("218.66.0.0") and userIPnum < IP2Num("218.67.127.255") then
	response.write ("<center>对不起,您非西安地区用户,您的IP被禁止了!<br><br>有什么疑问直接与本站联系 07555-83722157,谢谢合作!</center>")
	response.write "<meta http-equiv=refresh content=""2;URL=index.asp"">"
	response.end
end if

if  userIPnum > IP2Num("211.138.128.0") and userIPnum < IP2Num("211.138.159.255") then
	response.write ("<center>对不起,您非西安地区用户,您的IP被禁止了!<br><br>有什么疑问直接与本站联系 07555-83722157,谢谢合作!</center>")
	response.write "<meta http-equiv=refresh content=""2;URL=index.asp"">"
	response.end
end if

if  userIPnum > IP2Num("220.207.56.0") and userIPnum < IP2Num("220.207.255.255") then
	response.write ("<center>对不起,您非西安地区用户,您的IP被禁止了!<br><br>有什么疑问直接与本站联系 07555-83722157,谢谢合作!</center>")
	response.write "<meta http-equiv=refresh content=""2;URL=index.asp"">"
	response.end
end if

if  userIPnum > IP2Num("127.0.0.0") and userIPnum < IP2Num("127.0.0.9") then
	response.write ("<center>对不起,您非西安地区用户,您的IP被禁止了!<br><br>有什么疑问直接与本站联系 07555-83722157,谢谢合作!</center>")
	response.write "<meta http-equiv=refresh content=""2;URL=index.asp"">"
	response.end
end if


if  userIPnum > IP2Num("220.192.64.0") and userIPnum < IP2Num("220.192.71.255") then
	response.write ("<center>对不起,您非西安地区用户,您的IP被禁止了!<br><br>有什么疑问直接与本站联系 07555-83722157,谢谢合作!</center>")
	response.write "<meta http-equiv=refresh content=""2;URL=index.asp"">"
	response.end
end if

if  userIPnum > IP2Num("222.76.0.0") and userIPnum < IP2Num("222.79.255.255") then
	response.write ("<center>对不起,您非西安地区用户,您的IP被禁止了!<br><br>有什么疑问直接与本站联系 07555-83722157,谢谢合作!</center>")
	response.write "<meta http-equiv=refresh content=""2;URL=index.asp"">"
	response.end
end if

if  userIPnum > IP2Num("218.85.0.0") and userIPnum < IP2Num("218.86.127.255") then
	response.write ("<center>对不起,您非西安地区用户,您的IP被禁止了!<br><br>有什么疑问直接与本站联系 07555-83722157,谢谢合作!</center>")
	response.write "<meta http-equiv=refresh content=""2;URL=index.asp"">"
	response.end
end if

if  userIPnum > IP2Num("220.160.0.0") and userIPnum < IP2Num("220.162.255.255") then
	response.write ("<center>对不起,您非西安地区用户,您的IP被禁止了!<br><br>有什么疑问直接与本站联系 07555-83722157,谢谢合作!</center>")
	response.write "<meta http-equiv=refresh content=""2;URL=index.asp"">"
	response.end
end if
%>