Код IT
← Каталог

Функции и процедуры 1С — Интеграция с внешними системами

Фрагмент из «Функции и процедуры 1С»: Интеграция с внешними системами.

1С (BSL) main.bsl
Функция ПолучитьДанныеИзИнтернета(URL)
    
    Попытка
        Соединение = Новый HTTPСоединение("example.org");
        Запрос = Новый HTTPЗапрос(URL);
        Ответ = Соединение.Получить(Запрос);
        
        Если Ответ.КодСостояния = 200 Тогда
            Возврат Ответ.ПолучитьТелоКакСтроку();
        КонецЕсли;
        
    Исключение
        Сообщить("Ошибка запроса: " + ПодробноеПредставлениеОшибки(ИнформацияОбОшибке()));
        Возврат "";
    КонецПопытки;
    
КонецФункции
Функция ПолучитьДанныеИзИнтернета(URL)
    
    Попытка
        Соединение = Новый HTTPСоединение("example.org");
        Запрос = Новый HTTPЗапрос(URL);
        Ответ = Соединение.Получить(Запрос);
        
        Если Ответ.КодСостояния = 200 Тогда
            Возврат Ответ.ПолучитьТелоКакСтроку();
        КонецЕсли;
        
    Исключение
        Сообщить("Ошибка запроса: " + ПодробноеПредставлениеОшибки(ИнформацияОбОшибке()));
        Возврат "";
    КонецПопытки;
    
КонецФункции