Массив ip адресов на asp - Компьютерный форум OSzone.net

Компьютерный форум OSzone.net (http://forum.oszone.net/index.php)

- Вебмастеру (http://forum.oszone.net/forumdisplay.php?f=22)

- - Массив ip адресов на asp (http://forum.oszone.net/showthread.php?t=69997)

DRSTELS

17-08-2006 17:53 473639

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

Ребята помогите создать скрипт на 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

17-08-2006 18:08 473643

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

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

DRSTELS

17-08-2006 18:27 473653

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

Vlad Drakula

17-08-2006 18:43 473663

DRSTELS

Цитата:

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

открываем книгу по VB и читаем как там объявлять массивы.

DRSTELS

17-08-2006 19:04 473674

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

Sham	18-08-2006 21:07 474218

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

Время: 00:12.