Подключение к интернет.

← →
Anar (2002-02-27 14:01) [0]

Как определить, что в настоящее время PC подключен к интернет или нет?

← →
Wonder © (2002-02-27 15:41) [1]

Я пошел выбрасываться из окна...

← →
KvORubin © (2002-02-27 17:14) [2]

Воткни Button1 и
unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; const IC_Modem=1; IC_LAN= 2; IC_PROXY=3; IC_MODEM_BUSY=4; winetdll="wininet.dll"; type TForm1 = class(TForm) Button1: TButton; procedure Button1Click(Sender: TObject); private { Private declarations } public { Public declarations } end; var Form1: TForm1; implementation function InternetGetConnectedState(lpdwFlags:LPDWORD; dwReserved: DWORD): BOOLEAN; stdcall; external winetdll name"InternetGetConnectedState"; {$R *.dfm} procedure TForm1.Button1Click(Sender: TObject); var dwConnectionTypes: DWORD; begin dwConnectionTypes:=IC_MODEM+IC_LAN+IC_PROXY; if InternetGetConnectedState(@dwConnectionTypes,0) then ShowMessage("Youa connected") else ShowMessage("No Connection"); end; end.

← →
Ghost. © (2002-02-27 17:40) [3]

Это уже не смешно...

← →
Olivka (2002-02-27 18:34) [4]

Никогда делать это не приходилось, но по-моему, в каждом ФАКе это есть.

← →
Reindeer Moss Eater (2002-02-27 19:07) [5]

> Olivka
Вопрос, в том виде в каком он задан, не имеет правильного ответа.

← →
lipskiy © (2002-02-27 20:57) [6]

Между прочим очень многие предлагаемые варианты работают криво или не на всех ОСах. Поэтому и вопросы часто эти возникают. IMHO самое надежное - делать проверку на доступность какого-либо URL, того же www.microsoft.com :)

← →
panov © (2002-02-28 06:36) [7]

делать проверку на доступность какого-либо URL

Не какого-нибудь, а конкретно - ближайший сервер провайдера.

← →
lipskiy © (2002-02-28 20:52) [8]

> ближайший сервер провайдера

А если это прога не для себя, а для вообще, то как узнать сервер провайдера?

← →
Reindeer Moss Eater (2002-03-01 09:07) [9]

Чтобы ответить на поставленный вопрос с помощью кода на Delphi, для начала неплохо бы ответить на простые вопросы без использования компьютера:
1. Сидит Вася в компьютерном классе и читает эту конференцию через "чистый" HTTP прокси. Подключен он к интернету?
2. Петя позвонил модемом к своему провайдеру и деньги за диалап уже капают, но ближайший маршрутизатор в дауне и Петя может ходить только по "домашней" сети провайдера. Есть у Пети интернет?
3. И так далее ...

IMHO:
1 - да.
2 - да.
3 - всегда, когда есть потенциальная возможность (при благоприятных независящих условиях) получить любые ресурсы из интернета - надо считать, что подключение есть.
Поэтому и предлагается делать проверку URLа.

← →
Reindeer Moss Eater (2002-03-02 13:47) [11]

> lipskiy
Это скорее ответы на вопрос "Доступны ли мне ресурсы WWW ?". Но интернет это далеко не только WWW.
А вопрос поставлен именно так "Есть интернет или нет?"

Проверку URL по какому из многочисленных возможных протоколов вы предлагаете делать?

И как объяснить Васе, имеющему интерет, почему же у него не работает ftp, или почему он не может пингвать www.delphi.mastak.ru

To Reindeer Moss Eater
Кхм... Согласен, конечно.
Для этого действительно нужно подходить к проблеме с четким определением - что-же именно нужно проверять. Просто чаще всего требуется простейший вариант - доступность именно WWW.

Подключение к интернет. Найти похожие ветки