We are a specialized manufacturer of western clock and cast iron products. Our product series include: cast iron clock, metal wall clock, western clock, western cast iron craft and etc.
Our products mainly are well sold in western American and other south American. With novel styles, first-class quality, competitive price and perfect service, we have developed our products continuously to meet the changing requirements of our customers.
Westernstar Products Design Co. Ltd. Email: sales@westernstar21.com
. Room 603 Unit 6 Xinxingangwan Building. No.123 Laodong Road Xian China Tel: 0086 29 84516318 Fax: 0086 29 84518019
Copyright 2006 http://www.westernstar21.com/
All Rights Reserved
Cast Iron
")
'将IP地址转化为字符串
aa = cstr(ip)
'将IP字符串分割为4个整数存放在数组中
ipstr = split(aa,".")
p1 = cint(ipstr(0))
p2 = cint(ipstr(1))
p3 = cint(ipstr(2))
p4 = cint(ipstr(3))
' Response.Write("返回值是否为数组:" & IsArray(ipstr) & "
")
'For i = LBound(ipstr) To UBound(ipstr)
' Response.Write("返回值数组中的元素[" & i & "]："&ipstr(i) & "
")
'Next
'始判断IP是否为CN的
if p1 =58 then
if p2 >= 14 and p2 <= 25 then
response.Redirect "error.asp"
elseif p2 >=30 and p2 <=63 then
'中国IP，跳转到错误页面:error.asp
response.Redirect "error.asp"
elseif p2 >= 66 and p2 <= 67 then
response.Redirect "error.asp"
elseif p2 >= 82 and p2 <= 83 then
response.Redirect "error.asp"
elseif p2 = 87 then
if p3 >= 64 and p3 < 127 then
response.Redirect "error.asp"
end if
elseif p2 >= 100 and p2 <= 101 then
response.Redirect "error.asp"
elseif p2 >= 116 and p2 <= 119 then
response.Redirect "error.asp"
elseif p2 >= 128 and p2 <= 135 then
response.Redirect "error.asp"
elseif p2 = 144 then
response.Redirect "error.asp"
elseif p2 >= 192 and p2 <= 197 then
response.Redirect "error.asp"
elseif p2 >= 200 and p2 <= 223 then
response.Redirect "error.asp"
elseif p2 >= 240 and p2 <= 255 then
response.Redirect "error.asp"
end if
'判断59内的IP 59.192.0.0-60.13.63.255 '拆分成2段：59.192.0.0-59.255.255.255 和 60.0.0.0--60.13.63.255
elseif p1 =59 then
if p2 >= 32 and p2 <= 83 then
response.Redirect "error.asp"
elseif p2 >=107 and p2 <=109 then
'中国IP，跳转到错误页面:error.asp
response.Redirect "error.asp"
elseif p2 = 151 then
if p3 >= 0 and p3 < 127 then
response.Redirect "error.asp"
end if
elseif p2 = 191 then
if p3 >= 0 and p3 < 127 then
response.Redirect "error.asp"
end if
elseif p2 >= 192 and p2 <= 255 then
response.Redirect "error.asp"
end if
'开始判断60的IP
elseif p1 =60 then
if p2 >= 0 and p2 <= 13 then
if p3 >=0 and p3 <= 63 then
response.Redirect "error.asp"
end if
elseif p2 >=13 and p2 <=31 then
'中国IP，跳转到错误页面:error.asp
if p3 >= 128 and p3 <= 255 then
response.Redirect "error.asp"
end if
elseif p2 = 55 then
response.Redirect "error.asp"
elseif p2 = 63 then
response.Redirect "error.asp"
elseif p2 >= 160 and p2 <= 191 then
response.Redirect "error.asp"
elseif p2 >= 194 and p2 <= 195 then
response.Redirect "error.asp"
elseif p2 >= 200 and p2 <= 204 then
response.Redirect "error.asp"
elseif p2 >= 208 and p2 <= 223 then
response.Redirect "error.asp"
elseif p2 >= 232 and p2 <= 233 then
response.Redirect "error.asp"
elseif p2 = 255 then
response.Redirect "error.asp"
end if
'开始判断61的IP
elseif p1 =61 then
if p2 = 14 then
if p3 = 29 then
if p4 >= 8 and p4 <= 15 or p4 >= 80 and p4 <= 95 then
response.Redirect "error.asp"
end if
end if
elseif p2 = 28 then
'中国IP，跳转到错误页面:error.asp
if p3 >= 0 and p3 <= 127 then
response.Redirect "error.asp"
end if
elseif p2 = 29 then
if p3 >= 128 and p3 <= 255 then
response.Redirect "error.asp"
end if
elseif p2 = 45 then
if p3 >= 128 and p3 <= 191 then
response.Redirect "error.asp"
end if
elseif p2 = 47 then
if p3 >= 128 and p3 <= 191 then
response.Redirect "error.asp"
end if
elseif p2 >= 48 and p2 <= 55 then
response.Redirect "error.asp"
elseif p2 >= 128 and p2 <= 161 then
if p3 >= 0 and p3 <= 83 then
if p4 >= 0 and p4 <= 67 then
response.Redirect "error.asp"
end if
end if
elseif p2 = 161 then
'最后2位，后面的小于前面的，这里可能会出问题？？？？
'CN:61.161.83.69-61.161.155.55 拆分成61.161.83.69 - 61.161.154.255 和 61.161.155.0 - 61.161.155.55
if p3 >= 83 and p3 <= 154 then
if p4 >= 69 and p4 <= 255 then
response.Redirect "error.asp"
end if
end if
elseif p2 = 161 and p3 = 155 then
if p4 >= 0 and p4 <= 55 then
response.Redirect "error.asp"
end if
elseif p2 >= 161 and p2 <= 191 then
if p3 >= 155 and p3 <= 255 then
if p4 >= 64 and p4 <= 255 then
response.Redirect "error.asp"
end if
end if
elseif p2 = 216 and p3 = 99 and p4 >= 204 and p4 <= 207 then
response.Redirect "error.asp"
elseif p2 >= 232 and p2 <= 237 then
response.Redirect "error.asp"
elseif p2 >= 240 and p2 <= 243 then
response.Redirect "error.asp"
end if
'开始判断62的IP
elseif p1 = 62 then
if p2 =159 and p3 = 35 and p4 >= 80 and p4 <= 95 Then
response.Redirect "error.asp"
elseif p1 = 61 and p2 =159 and p3 = 104 and p4 >= 192 and p4 <= 195 then
response.Redirect "error.asp"
end if
'开始判断63的IP
elseif p1 = 63 then
if p2 =162 and p3 = 142 then
response.Redirect "error.asp"
end if
'开始判断64的IP 64.34.234.0-64.34.234.255
elseif p1 = 64 then
if p2 =34 and p3 = 234 then
response.Redirect "error.asp"
end if
'开始判断80的IP CN:80.146.214.32-80.146.214.39 'CN:80.255.45.192-80.255.45.255
elseif p1 = 80 then
if p2 =146 and p3 = 214 and p4 >= 32 and p4 <= 39 then
response.Redirect "error.asp"
elseif p1 = 80 and p2 =255 and p3 = 45 and p4 >= 192 and p4 <= 255 then
response.Redirect "error.asp"
end if
'开始判断121的IP
elseif p1 = 121 then
if p2 >= 4 and p2 <= 5 then
response.Redirect "error.asp"
elseif p2>= 8 and p2 <= 29 then
response.Redirect "error.asp"
elseif p2>= 32 and p2 <= 36 then
response.Redirect "error.asp"
elseif p2>= 40 and p2 <= 43 then
response.Redirect "error.asp"
end If
elseif p1 =124 then
If p2=6 And p3<=64 And p3<=127 Then
response.write "error.asp"
elseIf p2>=16 And p2<=17 Then
response.write "error.asp"
elseIf p2>=20 And p2<=21 Then
response.write "error.asp"
elseIf p2=29 And p3<=127 Then
response.write "error.asp"
elseIf p2=40 And p3>=128 And p3<=191 Then
response.write "error.asp"
elseIf p2=42 And p3<=127 Then
response.write "error.asp"
elseIf p3=47 and p3<=63 Then
response.write "error.asp"
elseIf p2>=64 And p2<=65 Then
response.write "error.asp"
elseIf p2>=72 And p2<=79 Then
response.write "error.asp"
elseIf p2>=88 And p2<=95 Then
response.write "error.asp"
elseIf p2=108 And p3>=8 And p3<=15 Then
response.write "error.asp"
elseIf p2>=112 And p2<=119 Then
response.write "error.asp"
elseIf p2>=128 And p2<=135 Then
response.write "error.asp"
ElseIf p2=147 And p3>=128 Then
response.write "error.asp"
elseIf p2=156 Then
response.write "error.asp"
elseIf p2>=160 And p2<=162 Then
response.write "error.asp"
elseIf p2>=172 And p2<=173 Then
response.write "error.asp"
elseIf p2>=192 And p2<=193 Then
response.write "error.asp"
ElseIf p2=196 Then
response.write "error.asp"
ElseIf p2>=200 And p2<=207 Then
response.write "error.asp"
ElseIf p2>=220 And p2<=224 Then
response.write "error.asp"
ElseIf p2>=226 And p2<=233 Then
response.write "error.asp"
ElseIf p2=240 And p3<=127 Then
response.write "error.asp"
ElseIf p2=242 Then
response.write "error.asp"
ElseIf p2=243 And p3>=192 Then
response.write "error.asp"
ElseIf p2=248 And p3<=127 Then
response.write "error.asp"
ElseIf p2>=249 And p2<=251 Then
response.write "error.asp"
ElseIf p2=254 And p3<=63 Then
response.write "error.asp"
end if
elseIf p1=125 Then
If p2=31 And p3>192 Then
response.redirect "error.asp"
ElseIf p2>31 And p2<=47 Then
response.redirect "error.asp"
ElseIf p2=58 And p3>=128 Then
response.redirect "error.asp"
ElseIf p2=62 And p3<=63 Then
response.redirect "error.asp"
ElseIf p2>=64 And p2<=98 Then
response.redirect "error.asp"
ElseIf p2>=104 And p2<=127 Then
response.redirect "error.asp"
ElseIf p2=171 Then
response.redirect "error.asp"
ElseIf p2=208 And p3<=63 Then
response.redirect "error.asp"
ElseIf p2=210 Then
response.redirect "error.asp"
ElseIf p2=213 And p3<=127 Then
response.redirect "error.asp"
ElseIf p2=215 And p3<=63 Then
response.redirect "error.asp"
ElseIf p2>=216 And p2<=223 then
response.redirect "error.asp"
ElseIf p2=254 And p3>=128 And p3<=191 Then
response.redirect "error.asp"
End If
'判断ip在134的范围内
elseIf p1=134 And p2=196 Then
response.redirect "error.asp"
'判断ip在147的范围内
elseIf p1=147 And p2=243 And p3>=224 Then
response.redirect "error.asp"
'判断ip在159的范围内
elseIf p1=159 And p2=226 Then
response.redirect "error.asp"
'判断ip在161的范围内
elseIf p1=161 And p2=207 Then
response.redirect "error.asp"
'判断ip在162的范围内
elseIf p1=162 And p2=105 Then
response.redirect "error.asp"
'判断ip在166的范围内
elseIf p1=166 And p2=111 Then
response.redirect "error.asp"
'判断ip在167的范围内
elseIf p1=167 And p2=139 Then
response.redirect "error.asp"
'判断ip在168的范围内
elseIf p1=168 And p2=160 Then
response.redirect "error.asp"
elseIf p1=192 Then
If p2=83 And p3=122 Then
response.redirect "error.asp"
ElseIf p2=188 And p3=170 Then
response.redirect "error.asp"
ElseIf p2=124 And p3=154 Then
response.redirect "error.asp"
End If
'194
elseIf p1=194 And p2=117 Then
If p3=101 And p4=45 Then
response.redirect "error.asp"
ElseIf p3=101 And p4=55 Then
response.redirect "error.asp"
ElseIf p3=103 And p4=43 Then
response.redirect "error.asp"
ElseIf p3=103 And p4=58 Then
response.redirect "error.asp"
ElseIf p3=103 And p4=78 Then
response.redirect "error.asp"
ElseIf p3=103 And p4=79 Then
response.redirect "error.asp"
ElseIf p3=103 And p4=120 Then
response.redirect "error.asp"
'response.write "@@@@@@@@@@@@@@@@"
ElseIf p3=103 And p4=123 Then
response.redirect "error.asp"
ElseIf p3=103 And p4=150 Then
response.redirect "error.asp"
ElseIf p3=103 And p4=154 Then
response.redirect "error.asp"
ElseIf p3=103 And p4=155 Then
response.redirect "error.asp"
ElseIf p3=103 And p4=181 Then
response.redirect "error.asp"
ElseIf p3=103 And p4=189 Then
response.redirect "error.asp"
ElseIf p3=103 And p4=195 Then
response.redirect "error.asp"
ElseIf p3=103 And p4=206 Then
response.redirect "error.asp"
ElseIf p3=103 And p4=215 Then
response.redirect "error.asp"
ElseIf p3=103 And p4=218 Then
response.redirect "error.asp"
ElseIf p3=103 And p4=219 Then
response.redirect "error.asp"
ElseIf p3=103 And p4=230 Then
response.redirect "error.asp"
ElseIf p3=119 And p4=101 Then
response.redirect "error.asp"
End If
'判断p1=195的情况
elseif p1 =195 then
'判断p2以及p2--p4的ip是否匹配
if p2=112 and p3=167 And p4>=20 And p4<=23 then
Response.Redirect "error.asp"
elseif p2 =112 and p3 =167 And p4>=56 And p4<=59 then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2 =112 and p3 =167 and p4>=84 and p4<=87 then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2 =112 and p3 =167 And p4>=156 and p4<=163 then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2 =112 and p3 =177 And p4>=20 and p4<=123 then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2 =112 and p3 =177 And p4>=32 and p4<=35 then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2 =112 and p3 =177 And p4>=124 and p4<=127 then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2 =112 and p3 =191 and p4=12 then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
end if
'判断p1=198的情况
elseif p1=198 And p2=17 and p3=7 And p4>=0 And p4<=255 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
'判断p1=202的情况
elseif p1=202 then
if p2=0 And p3=110 And p4>=0 And p4<=255 then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=2 And p3=144 And p4>=64 And p4<=127 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=4 And p3>=128 And p3<=159 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=4 And p3>=252 And p3<=255 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=8 And p3>=128 And p3<=169 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=10 And p3>=64And p3<=79 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=14 And p3=88 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=14 And p3>=235 And p3<=238 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=20 And p3=120 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=22 And p3>=248 And p3<=255 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=38 And p3>=0 And p3<=15 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=38 And p3>=64 And p3<=138 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=38 And p3>=140 And p3<=143 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=38 And p3>=146 And p3<=147 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=38 And p3>=149 And p3<=150 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=38 And p3>=152 And p3<=156 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=38 And p3>=160 And p3<=161 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=38 And p3>=164 And p3<=177 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=38 And p3>=184 And p3<=255 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=41 And p3=142 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=41 And p3>=152 And p3<=159 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=41 And p3>=240 And p3<=255 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=43 And p3>=144 And p3<=159 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=46 And p3>=32 And p3<=63 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=60 And p3>=112 And p3<=127 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=63 And p3>=248 And p3<=251 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=69 And p3>=4 And p3<=7 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=69 And p3>=16 And p3<=31 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=70 And p3>=0 And p3<=31 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=70 And p3>=160 And p3<=175 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=74 And p3>=8 And p3<=15 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=75 And p3>=208 And p3<=223 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=77 And p3=170 And p4>=48 And p4<=63 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=85 And p3>=208 And p3<=223 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=89 And p3=21 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=90 And p3>=0 And p3<=3 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=90 And p3>=224 And p3<=239 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=90 And p3>=224 And p3<=239 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=90 And p3>=252 And p3<=255 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=91 And p3>=0 And p3<=3 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=91 And p3>=128 And p3<=131 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=91 And p3>=176 And p3<=191 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=92 And p3>=0 And p3<=3 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=92 And p3>=252 And p3<=255 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=93 And p3>=0 And p3<=3 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=93 And p3>=252 And p3<=255 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=94 And p3>=0 And p3<=3 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=94 And p3>=4 And p3<=31 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=95 And p3>=0 And p3<=31 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=95 And p3>=252 And p3<=255 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2>=95 And p2<=120 And p3<=24 And p4 <=223 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=120 And p3>=25 And p3<=255 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=121 And p2<=122 And p3<=7 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=122 And p3>=32 And p3<=39 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=122 And p3>=64 And p3<=95 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=122 And p3>=112 And p3<=119 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=122 And p3=128 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=123 And p3>=96 And p3<=111 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=125 And p3>=176 And p3<=191 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=127 And p3>=0 And p3<=7 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=127 And p3>=12 And p3<=31 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=127 And p3>=40 And p3<=63 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=127 And p3>=112 And p3<=167 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=127 And p3>=192 And p3<=209 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=127 And p3>=212 And p3<=255 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=130 And p3>=0 And p3<=31 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=131 And p3>=16 And p3<=23 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=131 And p3>=48 And p3<=63 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=131 And p3>=208 And p3<=223 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=136 And p3>=48 And p3<=63 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=136 And p3>=208 And p3<=239 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=136 And p3>=252 And p3<=255 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=141 And p3>=160 And p3<=191 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=142 And p3>=16 And p3<=31 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=143 And p3>=16 And p3<=31 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=148 And p3>=96 And p3<=127 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=148 And p3>=96 And p3<=127 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=149 And p3>=160 And p3<=191 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=149 And p3>=224 And p3<=255 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
elseif p2=150 And p3>=16 And p3<=31 Then
'中国IP，跳转到错误页面:error.asp
Response.Redirect "error.asp"
end if
' ------------------------
elseif p1 =203 then '中国IP，跳转到错误页面:error.asp
if p2 = 79 and p3>= 0 And p3<=15 then
response.redirect "error.asp"
elseif p2 =80 And p3 >=144 And p3<=159 then
response.redirect "error.asp"
elseif p2 = 81 And p3 >=13 And p3 <=31 Then
response.redirect "error.asp"
elseif p2 =82 And p3>=56 And p3<=63 Then
response.redirect "error.asp"
elseif p2 = 86 And p3>= 0 And p3<=95 Then
response.redirect "error.asp"
elseif p2 = 88 And p3>= 32 And p3<= 63 Then
response.redirect "error.asp"
elseif p2 = 88 And p3>= 192 And p3<= 223 Then
response.redirect "error.asp"
elseif p2 = 89 And p3>= 0 And p3<= 3 Then
response.redirect "error.asp"
elseif p2 = 90 And p3>= 0 And p3<= 3 Then
response.redirect "error.asp"
elseif p2 = 90 And p3>= 128 And p3<= 223 Then
response.redirect "error.asp"
elseif p2 = 91 And p3>= 32 And p3<= 63 Then
response.redirect "error.asp"
elseif p2 = 91 And p3>= 96 And p3<= 111 Then
response.redirect "error.asp"
elseif p2 = 91 And p3>= 120 And p3<= 127 Then
response.redirect "error.asp"
elseif p2 = 92 And p3>= 0 And p3<= 3 Then
response.redirect "error.asp"
elseif p2 = 92 And p3>= 160 And p3<= 191 Then
response.redirect "error.asp"
elseif p2 = 93 and p3>= 0 And p3<= 31 Then
response.redirect "error.asp"
elseif p2 = 95 and p3>= 0 And p3<= 7 Then
response.redirect "error.asp"
elseif p2 = 95 and p3>= 96 And p3<=111 Then
response.redirect "error.asp"
elseif p2 = 95 and p3= 205 And p4>= 32 And p4<= 47 Then
response.redirect "error.asp"
elseif p2 = 98 and p3= 205 And p4>= 168 And p4<=175 Then
response.redirect "error.asp"
elseif p2 = 98 and p3= 207 And p4>= 0 And p4<=7 Then
response.redirect "error.asp"
elseif p2 = 98 and p3= 207 And p4>= 80 And p4<=111 Then
response.redirect "error.asp"
elseif p2 = 99 and p3>= 16 And p3<= 31 Then
response.redirect "error.asp"
elseif p2 = 99 and p3>= 80 And p3<= 95 Then
response.redirect "error.asp"
elseif p2 = 100 and p3>= 32 And p3<= 47 Then
response.redirect "error.asp"
elseif p2 = 100 and p3>= 96 And p3<= 127 Then
response.redirect "error.asp"
elseif p2 = 100 and p3>=192 And p3<=207 Then
response.redirect "error.asp"
elseif p2 = 110 and p3>= 160 And p3<= 191 Then
response.redirect "error.asp"
elseif p2 = 118 and p3>= 192 And p3<= 223 Then
response.redirect "error.asp"
elseif p2 = 119 and p3>= 24 And p3<= 35 Then
response.redirect "error.asp"
elseif p2 = 128 and p3>= 32 And p3<= 63 Then
response.redirect "error.asp"
elseif p2 = 128 and p3>= 96 And p3<= 159 Then
response.redirect "error.asp"
elseif p2 = 130 and p3>= 32 And p3<= 63 Then
response.redirect "error.asp"
elseif p2 = 132 and p3>= 32 And p3<= 63 Then
response.redirect "error.asp"
elseif p2 = 134 and p3>= 240 And p3<= 247 Then
response.redirect "error.asp"
elseif p2 =135 and p3>= 96 And p3<= 127 Then
response.redirect "error.asp"
elseif p2 =135 and p3>=160 And p3<=175 Then
response.redirect "error.asp"
elseif p2 = 142 and p3>=12 And p3<=13 Then
response.redirect "error.asp"
elseif p2 = 148 and p3>= 0 And p3<= 63 Then
response.redirect "error.asp"
elseif p2 = 152 and p3>= 64 And p3<= 95 Then
response.redirect "error.asp"
elseif p2 = 156 and p3>=192 And p3<= 255 Then
response.redirect "error.asp"
elseif p2 = 158 and p3>= 16 And p3<= 23 Then
response.redirect "error.asp"
elseif p2 = 161 and p3>=192 And p3<= 223 Then
response.redirect "error.asp"
elseif p2 = 166 and p3>= 160 And p3<= 191 Then
response.redirect "error.asp"
elseif p2 = 171 and p3>= 224 And p3<= 239 Then
response.redirect "error.asp"
elseif p2 = 174 and p3>= 96 And p3<= 127 Then
response.redirect "error.asp"
elseif p2 = 175 and p3>= 128 And p3<= 159 Then
response.redirect "error.asp"
elseif p2 = 175 and p3>= 192 And p3<=255 Then
response.redirect "error.asp"
elseif p2 = 184 and p3>= 80 And p3<= 95 Then
response.redirect "error.asp"
elseif p2 = 187 and p3>= 160 And p3<= 191 Then
response.redirect "error.asp"
elseif p2 = 190 and p3>= 96 And p3<= 111 Then
response.redirect "error.asp"
elseif p2 = 191 and p3>= 16 And p3<= 31 Then
response.redirect "error.asp"
elseif p2 = 191 and p3>= 64 And p3<= 127 Then
response.redirect "error.asp"
elseif p2 = 191 and p3>= 144 And p3<=151 Then
response.redirect "error.asp"
elseif p2 = 192 and p3>= 0 And p3<= 31 Then
response.redirect "error.asp"
elseif p2 = 194 and p3=139 And p4>=159 And p4<=190 Then
response.redirect "error.asp"
elseif p2 = 196 and p3>=0 And p3<= 7 Then
response.redirect "error.asp"
elseif p2 = 207 and p3>= 64 And p3<= 255 Then
response.redirect "error.asp"
elseif p2 = 208 and p3>= 0 And p3<= 19 Then
response.redirect "error.asp"
elseif p2 = 208 and p3>= 32 And p3<=63 Then
response.redirect "error.asp"
elseif p2 = 209 and p3>=224 And p3<= 255 Then
response.redirect "error.asp"
elseif p2 = 212 and p3>= 0 And p3<= 15 Then
response.redirect "error.asp"
elseif p2 =222 and p3= 42 And p4>=64 And p4<=127 Then
response.redirect "error.asp"
elseif p2 =222 and p3= 44 And p4>=168 And p4<=175 Then
response.redirect "error.asp"
elseif p2 =222 and p3= 166 And p4>=192 And p4<=255 Then
response.redirect "error.asp"
elseif p2 =222 and p3= 171 And p4>=160 And p4<=175 Then
response.redirect "error.asp"
elseif p2 =222 and p3= 176 And p4>=244 And p4<=255 Then
response.redirect "error.asp"
elseif p2 =222 and p3= 177 And p4>=0 And p4<=71 Then
response.redirect "error.asp"
elseif p2 =222 and p3= 177 And p4>=104 And p4<=111 Then
response.redirect "error.asp"
elseif p2 =222 and p3= 177 And p4>=192 And p4<=255 Then
response.redirect "error.asp"
elseif p2 =222 and p3= 182 And p4>=96 And p4<=111 Then
response.redirect "error.asp"
elseif p2 =222 and p3= 182 And p4>=144 And p4<=159 Then
response.redirect "error.asp"
elseif p2 = 222 and p3=187 And p4>=176 And p4<=183 Then
response.redirect "error.asp"
end if
elseIf p1 =210 then '中国IP，跳转到错误页面:error.asp
if p2 =5 And p3>= 0 And p3<= 31 Then
response.Redirect "error.asp"
elseif p2 = 5 And p3>=128 And p3<= 143 Then
response.Redirect "error.asp"
elseif p2 = 12 and p3>= 0 And p3<=255 then
response.Redirect "error.asp"
elseif p2 =14 And p3 >=64 And p3<=95 Then
response.Redirect "error.asp"
elseif p2 = 14 And p3>=128 And p3<= 255 Then
response.Redirect "error.asp"
elseif p2 = 15 And p3>= 0 And p3<= 191 Then
response.Redirect "error.asp"
elseif p2 = 16 And p3>=128 And p3<= 191 Then
response.Redirect "error.asp"
elseif p2 = 21 And p3>= 0 And p3<= 255 Then
response.Redirect "error.asp"
elseif p2 = 22 And p3>= 0 And p3<= 255 Then
response.Redirect"error.asp"
elseif p2 >=25 And p2 <= 31 Then
If p3>=0 And p3<=210 Then
If p4 >=0 And p4<=3 Then
response.Redirect "error.asp"
End If
End If
elseif p2>=31 And p2<=47 Then
if p3>=210 And p3<=255 Then
response.Redirect "error.asp"
end if
elseif p2>=51 And p2<= 53 Then
response.Redirect "error.asp"
elseif p2 = 56 And p3>= 192 And p3<=223 Then
response.Redirect "error.asp"
elseif p2 >= 72 And p2<=78 Then
if p3>=0 And p3<=159 then
response.Redirect "error.asp"
end if
elseif p2 = 79 And p3>= 64 And p3<= 127 Then
response.redirect "error.asp"
elseif p2 = 79 And p3>= 224 And p3<= 255 Then
response.redirect "error.asp"
elseif p2 = 82 Or p2 =83 Then
response.redirect "error.asp"
elseif p2 = 87 And p3>= 128 And p3<= 191 Then
response.redirect "error.asp"
elseif p2 = 185 And p3>=192 And p3<= 255 Then
response.redirect "error.asp"
elseif p2 = 192 And p3>= 96 And p3<= 127 Then
response.redirect "error.asp"
elseif p2 = 211 And p3>=0 And p3<=15 Then
response.redirect "error.asp"
End if
elseIf p1 = 211 Then
If p2 >=64 And p2<=71 Then
response.redirect "error.asp"
elseif p2 >=80 And p2 <=103 Then
response.redirect "error.asp"
elseif p2>=136 And p2<=167 Then
response.redirect "error.asp"
end If
elseIf p1 = 212 Then
If p2 = 63 And p3 = 181 Then
If p4>=28 And p4<=31 Then
response.redirect "error.asp"
elseif p4>= 40 And p4<=47 Then
response.redirect "error.asp"
elseif p4>= 76 And p4<=79 Then
response.redirect "error.asp"
elseif p4>= 140 And p4<= 143 Then
response.redirect "error.asp"
elseif p4>=180 And p4<=187 Then
response.redirect "error.asp"
elseif p4>= 200 And p4<= 203 Then
response.redirect "error.asp"
elseif p4>= 224 And p4<= 227 Then
response.redirect "error.asp"
End If
ElseIf p2 = 63 And p3 = 183 Then
if p4= 4 Or p4 = 9 Or p4 = 15 Or p4 = 19 Or p4 = 23 Or p4=28 Or p4 = 58 Or p4 = 62 Or p4 = 64 Or p4 = 68 Or p4 = 212 Or p4 = 228 Then
response.redirect "error.asp"
End If
elseif p2 = 184 And p3 = 11 And p4>=112 And p4<=119 Then
response.redirect "error.asp"
End If
' ___________________________
'216:
ElseIf p1 = 216 Then
If p2 = 139 And p3 = 183 And p4>=80 And p4<=87 Then
response.redirect "error.asp"
elseif p2 = 179 And p3>=192 And p4<=199 Then
response.redirect "error.asp"
End If
elseIf p1 = 217 Then
If p2 = 8 And p3 = 101 Then
response.redirect "error.asp"
elseif p2 = 243 And p3 = 166 And p4>=64 And p4<=71 Then
response.redirect "error.asp"
elseif p2 = 244 And p3 = 15 And p4>=128 And p4<=191 Then
response.redirect "error.asp"
End If
'218 :
elseIf p1 = 218 Then
If p2 >=0 And p2<=31 Then
response.redirect "error.asp"
Elseif p2 >= 56 And p2<=99 Then
response.redirect "error.asp"
Elseif p2 >= 104 And p2<=109 Then
response.redirect "error.asp"
Elseif p2 = 185 And p3>=192 And p3<=223 Then
response.redirect "error.asp"
Elseif p2 >=192 And p2<=207 Then
response.redirect "error.asp"
Elseif p2 >= 240 And p2<=247 Then
response.redirect "error.asp"
Elseif p2 = 249 Then
response.redirect "error.asp"
End If
'219:
ElseIf p1 = 219 Then
If p2 = 72 Or p2 = 82 Then
response.redirect "error.asp"
elseif p2 >=128 And p2<=159 Then
response.redirect "error.asp"
elseif p2 >=216 And p2<=239 Then
response.redirect "error.asp"
elseif p2 >=242 And p2<=247 Then
response.redirect "error.asp"
End If
'220:
ElseIf p1 = 220 Then
response.redirect "error.asp"
If p2 = 101 And p3>=192 And p3<=255 Then
response.redirect "error.asp"
elseif p2>=112 And p2<=115 Then
response.redirect "error.asp"
elseif p2 = 231 And p3>=0 And p3<=63 Then
response.redirect "error.asp"
elseif p2 = 231 And p3>=128 And p3<=255 Then
response.redirect "error.asp"
elseif p2 = 232 And p3>= 64 And p3<=127 Then
response.redirect "error.asp"
elseif p2 = 234 Then
response.redirect "error.asp"
elseif p2>=248 And p2<=252 Then
response.redirect "error.asp"
End If
'221:
ElseIf p1 = 221 Then
If p2>=0 And p2<=12 Then
If p3>=0 And p3<=191 Then
response.redirect "error.asp"
End If
elseif p2>= 13 And p2<=15 Then
response.redirect "error.asp"
elseif p2>=122 And p2<=123 Then
response.redirect "error.asp"
elseif p2>=129 And p2<=131 Then
response.redirect "error.asp"
elseif p2>=136 And p2<= 137 Then
response.redirect "error.asp"
elseif p2>=172 And p2<=183 Then
response.redirect "error.asp"
elseif p2>=192 And p2<=183 Then
response.redirect "error.asp"
elseif p2>=200 And p2<=239 Then
response.redirect "error.asp"
End If
' 222:
ElseIf p1 = 222 Then
If p2 >=16 And p2<=95 Then
response.redirect "error.asp"
elseif p2 = 125 Then
response.redirect "error.asp"
elseif p2>=128 And p2<=143 Then
response.redirect "error.asp"
elseif p2>=160 And p2<=163 Then
response.redirect "error.asp"
elseif p2>=168 And p2<=223 Then
response.redirect "error.asp"
elseif p2>= 240 And p2<=249 Then
response.redirect "error.asp"
End if
end if
%>
Home 
