Массив ip адресов на asp

[DRSTELS]

Ребята помогите создать скрипт на asp для определения массива ip адресов. На пример с 10.2.100.1 по 10.2.100.255 - отдел автоматизации! и т.д.
пример:
<%
dim ip
ip = Request.ServerVariables("REMOTE_ADDR")

if ip = "10.2.100.210" then (как указать диапазон ip адресов для определения отдела)
message = "Привет Андрухин"
End if

if ip = "10.2.100.154" then
message = "Привет Кирюха"
End if


Response.Write Message

%>

[Vlad Drakula]

DRSTELS
как сделать на аспе не скажу но как сделать скажу ;)

значит так:
1) ip адрес это 32битный инт
2) чтобы задать диапазон ip адресов нужно задать 2 чиста (два 32 битных инта)
3) чтобы проверить находится ли ip адрес в этом диапазоне нужно перевести его в 32битный инт и проверить пренадлежит ли получившееся число допустимому интервалу значений.

[DRSTELS]

Это понятно! :)
Но вот как в скрипт данное вписать! так чтоб при обработке страницы определялся не 1-н ip а массив и согласно ему выдавалось сообщение! ;)

[Vlad Drakula]

DRSTELS
Но вот как в скрипт данное вписать! так чтоб при обработке страницы определялся не 1-н ip а массив и согласно ему выдавалось сообщение!
открываем книгу по VB и читаем как там объявлять массивы.

[DRSTELS]

Спасибо мастер! ;)
Зачем тогда Форум?

[Sham]

DRSTELS, давно не писал на ASP+VB, уже устаревший и тухлый язык... но кое-что помню :)

dim Arr,Elem,i,ip,message2
ip=Request.ServerVariables("REMOTE_ADDR")
Arr=Array()
for i=1 to 255
Arr(i-1)="10.2.100." & i
next
for each Elem in Arr
if ip=Elem then
message2="здорово лопух, ты в отделе автоматизации..."
exit for
end if
next