Вверх ↑
Этот топик читают: Гость
Ответов: 1926
Рейтинг: 172
#1: 2010-08-17 09:20:50 ЛС | профиль | цитата
В HiAsm теперь нет компонента для такой проверки (в палитре, по крайней мере), так что можно попробовать вот это. У меня ADSL, при подключенном Интернете и локальной сети возвращает 81; если Инет отключен, а подключена только локалка, выдаёт 18, если всё отключено - 16.

code_20038.txt

Пишите, у кого что. При необходимости сделаю компонент или просто доработаю IC.
карма: 9
1
файлы: 1code_20038.txt [731B] [266]
Голосовали:Ivann
Ответов: 3349
Рейтинг: 233
#2: 2010-08-17 09:32:19 ЛС | профиль | цитата
3042 писал(а):
сделаю компонент

Делай, только проверь где работать будет.
карма: 1

0
Ответов: 1926
Рейтинг: 172
#3: 2010-08-17 09:43:27 ЛС | профиль | цитата
Выдать сами значения просто. Гораздо важнее правильно понять, что они означают. И написать это в справке к компоненту. Подожду, пока кто-нибудь испытает мой код и напишет, какие значения получились. Компонент оформлю к вечеру.
карма: 9
0
Ответов: 3349
Рейтинг: 233
#4: 2010-08-17 10:07:04 ЛС | профиль | цитата
3042 писал(а):
Интернете и локальной сети возвращает 81; если Инет отключен, а подключена только локалка, выдаёт 18, если всё отключено - 16.

Все же есть, у меня такие же значения.
3042 писал(а):
Выдать сами значения просто.

Поставь
case здесь переменная of
81:_hi_onEvent(Здесь событие', 0);
18:_hi_onEvent(Здесь событие', 1);
16:_hi_onEvent(Здесь событие', 2);
end;
------------ Дoбавленo в 10.07:
Или сделать три отдельных событиев.
а лучше точку типа var
карма: 1

0
Ответов: 582
Рейтинг: 3
#5: 2010-08-17 10:14:45 ЛС | профиль | цитата
3042, да все правильно работает
карма: 0

0
Разработчик
Ответов: 26151
Рейтинг: 2127
#6: 2010-08-17 10:20:56 ЛС | профиль | цитата
ruzik писал(а):
да все правильно работает

А если отвалится на стороне провайдера, те, шлюз будет доступен (похоже, она этот шлюз и тестирует), а дальше -- фиг Не думаю, что эта функция тестирует доступность внешних адресов.
карма: 22

0
Ответов: 758
Рейтинг: 112
#7: 2010-08-17 11:04:34 ЛС | профиль | цитата
у меня выдало 86 интернет и локалка присутствуют
карма: 1

0
Ответов: 200
Рейтинг: 5
#8: 2010-08-17 11:50:12 ЛС | профиль | цитата
miver, писал(а):
у меня выдало 86 интернет и локалка присутствуют

То же самое
карма: 0

0
Ответов: 1379
Рейтинг: 86
#9: 2010-08-17 13:34:59 ЛС | профиль | цитата
хм
18, инет есть
карма: 0

0
Разработчик
Ответов: 4698
Рейтинг: 426
#10: 2010-08-17 13:46:36 ЛС | профиль | цитата
Тестил с виртуалки, тип подключения NAT, вроде считается локальным, поэтому выдало 18, но через локалку есть выход в инет, так что не уверен в правильности ответа схемы
карма: 10
0
Ответов: 1926
Рейтинг: 172
#11: 2010-08-17 17:51:30 ЛС | профиль | цитата
Вообще говоря, расшифровка должна быть тут:

http://msdn.microsoft.com/en-us/library/aa384702(v=VS.85).aspx

Как видите, там есть и прокси, и другие варианты подключения. Так что значению могут зависеть от них. Однако я всё равно не очень понимаю, что означает то же 81 по указанной выше классификации (по ссылке). Кто-нибудь, кто знает, подскажите, пожалуйста.
карма: 9
0
Разработчик
Ответов: 26151
Рейтинг: 2127
#12: 2010-08-17 17:54:44 ЛС | профиль | цитата
3042 писал(а):
что означает то же 81 по указанной выше классификаци

Набор бит -- 0x40 + 0x10 + 0x01
карма: 22

1
Голосовали:3042
Ответов: 301
Рейтинг: 11
#13: 2010-08-17 20:28:09 ЛС | профиль | цитата
тоже 18. a интернет у меня через маскарадинг.
карма: 0

0
Ответов: 875
Рейтинг: 322
#14: 2010-08-17 20:53:43 ЛС | профиль | цитата
Вот эта схемка при отключенном интернете показывает одни, а при включенном другие значения. Наверняка из этого можно сделать какой либо вывод... code_20055.txt
карма: 1

0
файлы: 1code_20055.txt [2.2KB] [217]
Ответов: 1926
Рейтинг: 172
#15: 2010-08-17 21:07:28 ЛС | профиль | цитата
kamakama, вот скриншот программы по твоей схеме. Первая порция данных при подключенном Инете, вторая - при выключенном, третья - опять при поключенном. Пока не понимаю, какой можно сделать вывод и как - самое главное - определить подключённость.
карма: 9
0
файлы: 1ytrewq.jpg [16.6KB] [294]
Сообщение
...
Прикрепленные файлы
(файлы не залиты)