День добрый!
Понимаю, что тема заезженная, и в поиске много что есть, но все равно не могу разобраться.
Ситуация такая - Есть сервер у клиента, на котором поднят веб-сервис, на который надо передать данные и получить оттуда ответ. (Конкретно - это 7 континент, может уже кто с ним работал...). Через HTTPСоединие нарываюсь на известную ошибку о сертификате.
Если через WinHttpRequest - то вроде отрабатывает, но никакого ответа я не получаю. Может кто пнет меня в нужном направлении?
Код такой:
WinHttp= Новый COMОбъект("WinHttp.WinHttpRequest.5.1");
Скрипт= Новый COMОбъект("MSScriptControl.ScriptControl");
Скрипт.language="javascript";
Скрипт.AddObject("WinHttp",WinHttp);
Скрипт.Eval("WinHttp.Option(2)=1251");
Скрипт.Eval("WinHttp.Option(4)=13056");//intSslErrorIgnoreFlags
Скрипт.Eval("WinHttp.Option(6)=true");//blnEnableRedirects
Скрипт.Eval("WinHttp.Option(12)=true");//blnEnableHttpsToHttpRedirects
WinHttp.Open("POST","https://dip.7cont.ru/DataExch/DataExchangeService.asmx",0);
ЗапросНаСайт =
"<Root>
|<Autorization Login=""guest"" Password=""084E0343A0486FF05530DF6C705C8B""</>
|<Request ProcedureId=9</>
|</Root>";
WinHttp.setRequestHeader("Content-Type","text/xml; charset=utf-8");
WinHttp.Send(ЗапросНаСайт);// Параметром передаем POST-данные для страници тут как раз
Текст = Новый ТекстовыйДокумент;
Текст.ДобавитьСтроку(WinHttp.ResponseText());
Текст.Записать("D:\otvet.xml");
Заранее благодарен...
