к=_GetPerformanceCounter();
Пока Соединение.Status<>200 Цикл
Если _GetPerformanceCounter()-к>=2000 Тогда
Сообщить("Страница не отвечает. "+ОписаниеОшибки());
Возврат 0;
КонецЕсли;
Состояние("Ожидание соединения...");
КонецЦикла;
(3) Спасибо ещё раз!
Круто! Работает быстро, гораздо быстрее, чем через e-mail!
Требовать и эффективности, и гибкости от одной и той же программы — все равно, что искать очаровательную и скромную жену... по-видимому, нам следует остановиться на чем-то одном из двух. Фредерик Брукс-младший