Здравствуйте!

Платформа 8.3. Пытаюсь получить JSON через http-запрос, прошу помощи. Как только не писал - ничего не выходит. Один из вариантов:

WinHttp = Новый COMОбъект("WinHttp.WinHttpRequest.5.1");
WinHttp.Open("GET", "https://vpn.bisoft.fi:44304/login?username=log_expeditor&password=log_expeditor1&command=query&qry_name=stock%20report%20extended&date%20min=2019-01-01T00:00:00.000&date%20max=2019-06-01T00:00:00.000";, 0);
WinHttp.Send();
WinHttp.SetTimeouts(15000, 15000, 15000, 15000);
Результат = WinHttp.ResponseText();

Выдает ошибку:

Ошибка при вызове метода контекста (Send) WinHttp.Send();
по причине: Произошла исключительная ситуация (WinHttp.WinHttpRequest): A connection with the server could not be established


Если скопировать адрес в браузер - все работает.

(0) Зачем использовать "COMОбъект("WinHttp.WinHttpRequest.5.1")"? Есть же стандартный в 1С встроенный. Примеров навалом.

(1) Например "HTTPСоединение"?
мой пример:

Соединение = Новый HTTPСоединение("vpn.bisoft.fi:44304",443);    
Запрос = Новый HTTPЗапрос("/login?username=log_expeditor&password=log_expeditor1&command=query&qry_name=stock%20report%20extended&date%20min=2019-01-01T00:00:00.000&date%20max=2019-06-01T00:00:00.000");     
Ответ = Соединение.Получить(Запрос);

Ошибка:
Ошибка при вызове метода контекста (Получить)
Ответ = Соединение.Получить(Запрос);
по причине: Ошибка работы с Интернет: Server returned nothing (no headers, no data)

Напоминаю, что если вводить в строку адреса браузера, то все работает:
https://vpn.bisoft.fi:44304/login?username=log_expeditor&password=log_expeditor1&command=query&qry_name=stock%20report%20extended&date%20min=2019-01-01T00:00:00.000&date%20max=2019-06-01T00:00:00.000

(2) а где ты указал, что это https ?

(2) про заголовки не забывай

(3) Соединение = Новый HTTPСоединение("vpn.bisoft.fi:44304",443);    
443 - типа https

(4) какие заголовки указать?

(5) https - это защищенной соединение.
и порт у тебя вроде не 443, а 44304

(6) + Новый HTTPСоединение(Сервер,Порт,,,,ТаймАут,Новый ЗащищенноеСоединениеOpenSSL)

Соединение = Новый HTTPСоединение("vpn.bisoft.fi:44304",,,,,,Новый ЗащищенноеСоединениеOpenSSL());    
    Запрос = Новый HTTPЗапрос("/login?username=log_expeditor&password=log_expeditor1&command=query&qry_name=stock%20report%20extended&date%20min=2019-01-01T00:00:00.000&date%20max=2019-06-01T00:00:00.000");    
    Ответ = Соединение.Получить(Запрос);

все работает

(8) Большое спасибо!

Добавил сохранение в файл:

Соединение = Новый HTTPСоединение("vpn.bisoft.fi:44304",,,,,,Новый ЗащищенноеСоединениеOpenSSL());    
    Запрос = Новый HTTPЗапрос("/login?username=log_expeditor&password=log_expeditor1&command=query&qry_name=stock%20report%20extended&date%20min=2019-01-01T00:00:00.000&date%20max=2019-06-01T00:00:00.000");    
    
    Режим = РежимДиалогаВыбораФайла.Сохранение;
    ДиалогОткрытияФайла = Новый ДиалогВыбораФайла(Режим);
    ДиалогОткрытияФайла.Фильтр = НСтр("ru = 'Файл'") + "(*.txt)|*.txt";
    ДиалогОткрытияФайла.Заголовок = "Выберите путь и имя файла";
    ДиалогОткрытияФайла.МножественныйВыбор = Ложь;
    Если ДиалогОткрытияФайла.Выбрать() Тогда
        Ответ = Соединение.Получить(Запрос, ДиалогОткрытияФайла.ПолноеИмяФайла);
    КонецЕсли;


Сохраняет в ANSI, а нужно, видимо, UTF-8. Не подскажите как указать кодировку?

(10) И где здесь сохранения в файл? СП смотрел?

(10) смотри через HttpОтвет и там ПолучитьТелоКакСтроку с указанием кодировки

(12) БлагоДарю! Все получилось!