Вход | Регистрация
 
1С:Предприятие :: 1С:Предприятие 8 общая

Проверка подключения к интернет

Проверка подключения к интернет
Я
   Azgerd
 
05.04.21 - 10:00
Здравствуйте! Как можно программно из конфигурации 1с 8.3 проверить подключение к интернет ?
например в Fox-е работал такой код:
<code>
DECLARE INTEGER InternetAttemptConnect IN wininet;
    INTEGER dwReserved
&&... returns 0 if connected
IF InternetAttemptConnect(0) = 0  
   WAIT WINDOW 'Есть подключение к интернету' NOWAIT
ELSE
   WAIT WINDOW 'Нет подключения к интернету' NOWAIT
ENDIF
</code>
Спасибо!
   acht
 
1 - 05.04.21 - 10:27
Представить себе, что он есть, и обработать ошибку его отсуствия в месте использования.
   mistеr
 
2 - 05.04.21 - 10:38
(0) СП HTTPСоединение.
   acht
 
3 - 05.04.21 - 11:03
(2) Ну начинается...
А вдруг, для ТС интернет - это электронная почта? Или FTP?
   Garykom
 
4 - 05.04.21 - 11:08
(0) Никак.
Даже если "инет работает" конкретный ресурс/протокол нет или заблочен
Даже если инета нету - можно внутри локалки сэмулировать что угодно
   fisher
 
5 - 05.04.21 - 11:15
Кроме как проверкой доступа к какому-либо интернет-ресурсу "родных" вариантов не знаю.
   Kigo_Kigo
 
6 - 05.04.21 - 11:23
ya.ru ru.ru работают всегда
   Kassern
 
7 - 05.04.21 - 11:29
Можно еще так извратиться)
wss=Новый COMОбъект("WScript.Shell");
ЕстьИнет = Не wss.Run("ping -w 1500 -n 1 "+IP,0,Истина);
   acht
 
8 - 05.04.21 - 12:37
(6) > работают всегда

Хи.
google://Яндекс+был+недоступен
   Azgerd
 
9 - 05.04.21 - 13:03
(6) Сделал через проверку доступа к ya.ru

Список тем форума
Рекламное место пустует  Рекламное место пустует
Пользователь не знает, чего он хочет, пока не увидит то, что он получил.
Э. Йодан
ВНИМАНИЕ! Если вы потеряли окно ввода сообщения, нажмите Ctrl-F5 или Ctrl-R или кнопку "Обновить" в браузере.