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

Вниз

Как проверить доступен-ли удаленный компьютер по имени   Найти похожие ветки 

 
AlexS76   (2004-03-11 10:16) [0]

Необходимо выяснить доступен ли в данный момент компьютер по сети.
Есть ли какие-то способы кроме ping


 
Reindeer Moss Eater ©   (2004-03-11 10:23) [1]

Какой смысл вложен в "компьютер доступен" и когда считается что "он недоступен" ?


 
Rezya ©   (2004-03-11 10:42) [2]

А чем тебя Ping не устраивает?.
На мой взгляд это самое лучшее средство которым обладает Win32 (и не только) для достижения товоей цели. Если у тебя с этим проблема то почитай к примеру "Реализация ping с помощью ICMP API" на этом сайте.
Если так подумать то для того чтобы обойтись без Ping то тебе нужно знать какой не будь постоянно открытый порт на удаленном компе, после чего если соединение с этим компом на этот порт прошло удачно без всяких там SOCKET_ERROR, то комп в сети если нет то ....


 
Reindeer Moss Eater ©   (2004-03-11 10:51) [3]

Ну вот стоит рядом со мной компьютер доступный мне по самое нехочу.
Но нет на нем TCP/IP. Вообще нет.

Что дальше?


 
just me   (2004-03-11 18:01) [4]

Можно так:
var
 ntr      : NETRESOURCE;
 code     : DWORD;
 buf      : array[0..99] of char;
 Host     : string;
begin
 Host := "my_servrt_name";
 StrPCopy(buf, "\\" + Host);
 with ntr do
 begin
   dwType       := RESOURCETYPE_ANY;
   lpLocalName  := nil;
   lpRemoteName := buf;
   lpProvider   := nil;
 end;
 code := WNetAddConnection2(ntr, "", "", 0);
 WNetCancelConnection2(buf, 0, True);
 if NO_ERROR <> code then
   raise Exception.Create(Format("Cannot access "%s".",Host]));



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

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

Наверх




Память: 0.47 MB
Время: 0.023 c
7-1078390349
Олег
2004-03-04 11:52
2004.05.02
Переключение клавиатуры


14-1081741095
mfender
2004-04-12 07:38
2004.05.02
День космонавтики


1-1082096797
Litva
2004-04-16 10:26
2004.05.02
помогите новенкой...


14-1081622468
Brahman
2004-04-10 22:41
2004.05.02
В это вечер..


1-1081860107
Анонимщик
2004-04-13 16:41
2004.05.02
Допустимо ли имя файла