Вход | Регистрация

1С:Предприятие :: 1С:Предприятие 8 общая

WinHttp по протоколу TLSv1.2

WinHttp по протоколу TLSv1.2
Я
   Slon747
 
16.07.18 - 12:51
8.3.9.2233
Давно отправляю sms через сайт по протоколу HTTP.
Теперь они отказываются от протокола TLSv1.0 и программный интерфейс будет доступен только по TLSv1.1 и TLSv1.2.
Что нужно поменять в коде?
Адрес http уже поменял. Но при выполнении WinHttp.Send(ПараметрJSON) вылазит ошибка.
Вроде бы эта версия платформы должна поддерживать TLSv1.2

ПараметрJSON = "";
    
WinHttp = Новый COMОбъект("WinHttp.WinHttpRequest.5.1");
WinHttp.Option(2, "UTF-8");    
Страница = "https://tls11.esputnik.com/api/v1/balance";;
WinHttp.Open("GET", Страница, 0);
WinHttp.SetCredentials(ЛогинЕСпутник, ПарольЕСпутник, 0);
WinHttp.setRequestHeader("Content-Type", "application/json; charset=UTF-8");
WinHttp.Send(ПараметрJSON);
ТекстОтвет = WinHttp.ResponseText();
Если WinHttp.StatusText="OK" Тогда
    УспешнаяОтправка = Истина;        
ИначеЕсли WinHttp.StatusText="ERROR" Тогда
    УспешнаяОтправка = Ложь;
КонецЕсли;
 
 
   Широкий
 
1 - 16.07.18 - 12:55
Скрипт=Новый COMОбъект("MSScriptControl.ScriptControl");
        Скрипт.language="javascript";
        Скрипт.AddObject("WinHttpRequest",WinHttpRequest);
        Скрипт.Eval("WinHttpRequest.Option(4)=13056");
   Широкий
 
2 - 16.07.18 - 12:55
Попробуй с этим
   Slon747
 
3 - 16.07.18 - 13:06
(1) Не понял. Это код должен быть вместо WinHttp.Send(ПараметрJSON) ?
   Slon747
 
4 - 17.07.18 - 09:04
up
   Bober
 
5 - 17.07.18 - 12:05
(0) при тут версия платформы и возможности ком объекта "WinHttp.WinHttpRequest.5.1".
   Локи-13
 
6 - 17.07.18 - 13:22
а почему не на 1С?

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