<%
'declare variables
Dim sIP
Dim sIParray(2)
'assign our blocked IP addresses to our array
sIParray(0) = "69.49.96.8"
sIParray(1) = "66.94.237.70"
sIParray(2) = "72.51.27.51"
slParray(3) = "38.113.1.97"
slParray(4) = "82.79.25.81"
slParray(5) = "24.110.72.220"
slParray(6) = "82.79.25.81"
slParray(7) = "207.155 252.134"
slParray(8) = "64.14.72.102"
slParray(9) = "206.125.211.133"
slParray(10) = "75.44.46.19"
slParray(11) = "205.178.145.65"
slParray(12) = "208.109.193.212"
slParray(13) = "69.10.135.149"
slParray(14) = "70.47.34.32"
slParray(15) = "64.202.189.170"
SlParray(16) = "207.217.125.50"
slParray(17) = "205.178.145.65"
slParray(18) = "204.14.84.156"
slParray(19) = "65.254.231.111"
slParray(20) = "209.50.181.119"
slParray(21) = "208.109.193.212"
slParray(22) = "205.178.145.65"
slParray(23) = "68.178.221.75"
slParray(24) = "66.138.166.30"
slParray(25) = "66.138.166.19"
slParray(26) = "216.105.58.119"
slParray(27) = "70.48.32.211"
slParray(28) = "72.22.69.46"
slParray(29) = "206.125.211.133"
slParray(30) = "66.39.98.224"
slParray(31) = "64.82.100.242"
slParray(32) = "80.67.224.27"
slParray(33) = "72.22.71.24"
slParray(34) = "66.109.139.206"
slParray(35) = "66.246.222.130"
slParray(36) = "64.65.60.28"
slParray(37) = "209.235.236.195"
slParray(38) = "76.169.162.197"
slParray(39) = "64.12.116.209"
slParray(40) = "70.245.252.131"
slParray(41) = "81.21.75.16"
slParray(42) = "205.158.155.24"
slParray(43) = "128.121.30.238"
slParray(44) = "205.178.189.131"
slParray(45) = "209.97.212.253"
slParray(46) = "66.7.194.95"
slParray(47) = "69.94.33.93"
slParray(48) = "66.109.139.206"
slParray(49) = "209.50.181.100"
slParray(50) = "64.202.163.78"
slParray(51) = "66.98.190.91"
slParray(52) = "24.97.253.54"
slParray(55) = "54.202.163.185"
slParray(56) = "209.59.142.167"
slParray(57) = "66.245.185.224"
slParray(58) = "207.217.96.42"
slParray(59) = "63.247.135.176"
slParray(60) = "207.217.96.44"
slParray(61) = "207.217.96.35"
slParray(62) = "72.29.74.211"
slParray(63) = "209.50.18.246"
slParray(64) = "64.202.163.213"
slParray(65) = "38.113.1.97"
slParray(66) = "69.49.96.8"
slParray(67) = "66.94.237.70"
slParray(68) = "72.51.27.51"
slParray(69) = "68.19.29.41"
slParray(70) = "72.177.77.69"
slParray(71) = "70.242.4.18"
slParray(72) = "24.60.45.3"
slParray(73) = "24.0.245.52"
slParray(74) = "68.53.119.112"
slParray(75) = "64.91.247.112"
slParray(76) = "64.202.189.170"
slParray(77) = "70.36.254.231"
slParray(78) = "65.38.168.180"
slParray(79) = "66.70.38.23"
slParray(80) = "208.109.4.251"
slParray(81) = "80.67.224.27"
slParray(82) = "209.50.181.100"
slParray(83) = "72.22.69.46"
slParray(84) = "64.202.163.78"
slParray(85) = "64.202.163.213"
slParray(86) = "216.14.214.2"
slParray(87) = "68.178.233.209"
slParray(88) = "64.20.33.131"
slParray(89) = "68.142.212.43"
slParray(90) = "208.254.3.166"
slParray(91) = "70.166.61.170"
slParray(92) = "216.120.231.253"
slParray(93) = "67.941.16"
slParray(94) = "216.219.94.122"
slParray(95) = "64.202.166.207"
slParray(96) = "207.36.3.75"
slParray(97) = "207.194.37.78"
slParray(98) = "71.185.37.44"
slParray(99) = "76.169.238.199"
slParray(100) = "216.120.252.191"
slParray(101) = "205.178.152.17"
slParray(102) = "38.102.33.24"
slParray(103) = "70.15.82.163"
slParray(104) = "71.172.23.35"
slParray(105) = "64.12.116.119"
slParray(106) = "71.71.88.49"
slParray(107) = "75.43.193.89"
slParray(108) = "65.110.70.76"
slParray(109) = "66.39.118.208"
slParray(110) = "68.142.212.129"
slParray(111) = "71.18.40.96"
slParray(112) = "208.1.62.200"
slParray(113) = "68.142.212.118"
slParray(114) = "70.47.34.244"
slParray(115) = "24.21.29.173"
slParray(116) = "59.551.2.10"
slParray(117) = "24.126.0.0"
slparray(118) = "24.127.127.255"
slParray(119) = "199.173.224.32"
slParray(120) = "208.109.193.212"
slParray(121) = "72.161.3.200"
slParray(122) = "65.4.212.39"
slParray123) = "75.43.206.6"
slParray(124) = "70.245.252.131"
slParray(125) = "64.12.117.5"
slParray(126) = "64.12.0.0"
slParray(127) = "64.12.255.255"
slParay(128) = "207.69.139.145"
slParay(129) = "68.51.37.167"
slParray(130) = "68.142.212.118"
slParray(131) = "68.108.51.142"
slParray(132) = "24.253.67.31"
slParray(133) = "222.253.67.31
slParray(134) = "66.94.237.78"
slParray(135) = "69.25.142.57"
slParray(136) = "74.202.196.132"
slParray(137) = "209.59.136.18"
slParray(138) = "59.176.117.19"
slParray(139) = "69.242.229.163"
slParray(140) = "69.240.0.0"
slParray(141) = "69.255.255.255"
slParray(142) = "99.141.252.153"
slParray(143) = "69.242.229.163"
slParray(144) = "69.5.15.100"
slParray(145) = "69.217.40.200"
slParray(146) = "208.109.78.99"
slParray(147) = "66.96.134.32"
slParray(148) = "82.165.207.119"
slParray(149) = "208.42.96.200"
'retrieve the visitors IP address
sIP = Request.ServerVariables("REMOTE_ADDR")
'loop through the banned IPs using the UBound function
For i = 0 to UBound(sIParray)
'check if IP address matches any of the blocked IPs
If sIP = sIParray(i) Then
Response.Redirect "no_access.asp"
End If
Next
%>
All web content, art, photos and text contained within these webpages are the sole intellectual property of Victoria's Natural Soap(TM) Copyright© 1997-2007, and Victoria Sharpe, owner and webmistress.
None of the above may be removed from this website at any time
without express permission from the webmistress. Removal of text, photos, trademark & copyrighted material is a serious violation of federal law and is subject to fines, lawsuits and prosecution.
Original proprietary product names with a TM (trademark) are being used in trade by Victoria's Natural Soap, and are the sole intellectual property of Victoria Sharpe.