Пинг диапазона IP адресов

[ArtemV]

Всем привет! Возник такой вопрос: делаю программу, которая пинговала бы диапазон ip-шников в сетке от 10.0.0.1 до 10.0.2.255 (необязательно такой, юзер может сам задать себе промежуток), посидел, придумал как сделать на vb. Получился такой вот код, но я не уверен, что он всегда будет рабочий (маска моей подсети - 255.255.255.0), БУДЕТ ЛИ ОН РАБОТАТЬ, ЕСЛИ МАСКА ПОДСЕТИ ДРУГАЯ???

'IP: 10.0.0.1 - 10.0.2.255
For a = 10 To 10 'первая цифра IP адреса
For b = 0 To 0 'вторая
For c = 0 To 2 'третья
For d = 1 To 255 'четвертая
Ping a & "." & b & "." & c & "." & d
Next d
Next c
Next b
Next a

[EvilCoder]

<DELETE>

[ArtemV]

Скинь пожалуйста

[EvilCoder]

<DELETE>

[ArtemV]

Большое спасибо!

[EvilCoder]

<DELETE>