Процедура Кнопка1Нажатие(Элемент)
Ip = ПолеВвода1;          
  Try
     ServicesSet = GetCOMObject("winmgmts:{impersonationLevel=impersonate}");
     Items = ServicesSet.ExecQuery("SELECT * from Win32_PingStatus WHERE address = '" + IP + "' AND Timeout=10");
  Except
   
     Сообщить("Исключение");
  EndTry;
 
  For Each Item  In Items Do
    If Item.StatusCode = 0 Then
               Сообщить("ЕстьСвязь");
               

    Else
       
        Сообщить("НетСвязи");
    EndIf;
     Time = Item.ResponseTimeToLive;
     Сообщить(Time);
  EndDo;

КонецПроцедуры


викторина штоле?

а где призы?

Если 999 вбить в поле ввода,то ничего не происходит.
А если ороро вбить,то нет связи.

Инет отключил,всё равно нет исключения.Зачем она тут нужна эта попытка.

(4) а вдруг ком-объект не получится взять

догадайся каких форматов бывает сетевой адрес?

ip-4
ip-6
dns_name

наверно еще есть варианты с нетбиосом, апихсом и другими протоколами где есть разрешение имен.

по этому что-бы сработало исключение туда нужно загнать запрещенный символ, например ">"

(4) Отключи WMI - тогда сработает.

(7)+ или на линухе запусти :)

У пользователя guest нет возможности выполнять Wmi-запросы - поэтому должно сработать исключение (только вопрос - а может ли он запустить 1С).

Ясно.
А как бы исключить СБОЙ ПЕРЕДАЧИ и Не удалось обнаружить узел?

бгг - пусти сигнал по 2 м проводам )))

Пока только такой статус код удалось получить...
11010
Request Timed Out
Где бы на русском про это почитать?