Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.04.04;
Скачать: CL | DM;

Вниз

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

 
evgeniy55   (2004-01-21 07:37) [0]

Здравствуйте!
Как в Win 2000 узнать подключен сетевой кабель или нет,
Пример этого кода показывает что подключение к сети есть но на самом деле его нет т.к. кабель отключен

procedure TForm1.Button1Click(Sender: TObject);
begin
 if GetSystemMetrics(SM_NETWORK) and $01 = $01 then
   ShowMessage("Computer is attached to a network!")
 else
   ShowMessage("Computer is not attached to a network!");
end;

может будут другие идеи? готов выслушать.
Огромное всем спасибо.


 
Verg ©   (2004-01-21 09:59) [1]

GetIfTable из iphlpapi.dll

Поле dwOperStatus в записи для каждого ин-фейса (сетевой карты), полученой таблицы, отображает оперативный статус:

#define MIB_IF_OPER_STATUS_NON_OPERATIONAL      0
#define MIB_IF_OPER_STATUS_UNREACHABLE          1
#define MIB_IF_OPER_STATUS_DISCONNECTED         2
#define MIB_IF_OPER_STATUS_CONNECTING           3
#define MIB_IF_OPER_STATUS_CONNECTED            4
#define MIB_IF_OPER_STATUS_OPERATIONAL          5


 
S@shka ©   (2004-01-21 10:46) [2]

Послыаешь PING
PIng проходит - значит компутер подключен к сети


 
evgeniy55   (2004-01-22 05:35) [3]

Извините а примерчик моно?


 
Verg ©   (2004-01-22 13:13) [4]


> evgeniy55   (22.01.04 05:35) [3]
> Извините а примерчик моно?


На С сойдет?


 
Rouse_ ©   (2004-01-22 13:37) [5]

http://www.delphimaster.ru/articles/netmon/index.html

В предпоследней главе примерчик...



Страницы: 1 вся ветка

Текущий архив: 2004.04.04;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.045 c
1-1079674554
Nonamik
2004-03-19 08:35
2004.04.04
Динамический массив


9-1063796535
z1r[0]
2003-09-17 15:02
2004.04.04
из 3d-max в .x


8-1070574471
Suharew
2003-12-05 00:47
2004.04.04
Как работать с рисунками GIF


1-1079228525
Demik
2004-03-14 04:42
2004.04.04
-= Разработка поддержки Plug-In =-


3-1078121878
jenya_d
2004-03-01 09:17
2004.04.04
Компонент для закачки/обновления данных между таблицами IB