Имя: Пароль:
1C
1С v8
Когда у меня сработает исключение?
,
0 БалбесВ1с
 
23.07.13
22:57

Процедура Кнопка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;

КонецПроцедуры
1 Asmody
 
23.07.13
23:00
викторина штоле?
2 Asmody
 
23.07.13
23:00
а где призы?
3 БалбесВ1с
 
23.07.13
23:01
Если 999 вбить в поле ввода,то ничего не происходит.
А если ороро вбить,то нет связи.
4 БалбесВ1с
 
23.07.13
23:07
Инет отключил,всё равно нет исключения.Зачем она тут нужна эта попытка.
5 Asmody
 
23.07.13
23:08
(4) а вдруг ком-объект не получится взять
6 vde69
 
модератор
23.07.13
23:09
догадайся каких форматов бывает сетевой адрес?

ip-4
ip-6
dns_name

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

по этому что-бы сработало исключение туда нужно загнать запрещенный символ, например ">"
7 Torquader
 
23.07.13
23:09
(4) Отключи WMI - тогда сработает.
8 vde69
 
модератор
23.07.13
23:10
(7)+ или на линухе запусти :)
9 Torquader
 
23.07.13
23:13
У пользователя guest нет возможности выполнять Wmi-запросы - поэтому должно сработать исключение (только вопрос - а может ли он запустить 1С).
10 БалбесВ1с
 
23.07.13
23:13
Ясно.
А как бы исключить СБОЙ ПЕРЕДАЧИ и Не удалось обнаружить узел?
11 Aprobator
 
23.07.13
23:17
бгг - пусти сигнал по 2 м проводам )))
12 БалбесВ1с
 
23.07.13
23:53
Пока только такой статус код удалось получить...
11010
Request Timed Out
Где бы на русском про это почитать?
Закон Брукера: Даже маленькая практика стоит большой теории.