Отправляет email-рассылки с помощью сервиса Sendsay

Программирование. Форум !!!

Delphi интернет

Здрям!
Как в делфи 6 узнать что комп подключен к инету?

Заранее спасибо.
С уважением monah
janal***@n*****.ru
Номер выпуска : 1929
Возраст листа : 143 (дней)
Количество подписчиков : 388
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/77706
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписаться: mailto:comp.soft.prog.prog--unsub@subscribe.ru

http://subscribe.ru/ mailto:ask@subscribe.ru

Ответить   Wed, 11 Feb 2004 20:07:37 +0600 (#77706)

 

Ответы:

1) Единственный 100% достоверный способ узнать находится ли комп в интернете
это скачать что-то со стабильного внешнего сервера - такого как Microsoft, Yahoo,
AT&T... По другому ни одна функция локального компьютера не сможет отличить нахождение
компьютера в интранете и в интернете...

2) Можно импортировать функцию InetIsOffline из URL.DLL:
function InetIsOffline(Flag: Integer): Boolean; stdcall; external 'URL.DLL';

а затем поместить в программу простой вызов функции для проверки статуса соединения:

if InetIsOffline(0) then
Но пишут мужики, что этот метод показывает правильно, только если нет сетевых
устройств :((

С уважением,
Борис Сурин, surin_***@m*****.ru

Номер выпуска : 1930
Возраст листа : 143 (дней)
Количество подписчиков : 388
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/77794
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписаться: mailto:comp.soft.prog.prog--unsub@subscribe.ru

http://subscribe.ru/ mailto:ask@subscribe.ru

Ответить   Wed, 11 Feb 2004 18:09:51 +0300 (#77794)

 

function InternetGetConnectedState(var lpdwFlags: DWORD;
dwReserved: DWORD): LongBool; stdcall; external 'WinInet.dll';

InternetGetConnectedState(st, 0); // True, если подключен

К сожалению, у одного человека (Win9x сильно с глюками, как он сам
признался) после подключения к сети - возвращало False, поэтому вводил в
своей программке режим "не делать проверку подключенности". Так что мнение:

интернете

Yahoo,

отчасти правильно.

Можно также смотреть - есть ли диалап (RAS) соединение (см. MSDN). И для
проверки подключенности к локальной сети, очевидно, есть свои функции

'URL.DLL';

Вот этого не слышал. Мне кажется, WinInet.dll стандартнее, чем URL.dll :)
Впрочем, все MSDN-уточняемо...
Номер выпуска : 1932
Возраст листа : 143 (дней)
Количество подписчиков : 388
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/77823
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписаться: mailto:comp.soft.prog.prog--unsub@subscribe.ru

http://subscribe.ru/ mailto:ask@subscribe.ru

Ответить   "VladS" Wed, 11 Feb 2004 19:35:22 +0300 (#77823)

 

Hello monah,

Wednesday, February 11, 2004, 4:07:37 PM, you wrote:

что ты имеешь ввиду под понятием подключен к нету?
если установлен ли ip канал, то самый простой способ это пинг
запустить, исходник могу кинуть, если можно ли браузером страничку
посмотреть - то изврат начинается

Ответить   Wed, 11 Feb 2004 18:31:22 +0200 (#77825)