Всем здрасте!
Подскажите, как отправить XML методом POST по HTTPS, если на сервере кривой сертификат? Ну ооооочень надо!
Желательно из 7.7 но и на 8-ке тоже пойдет.
Пробовал через MSXML2.ServerXMLHTTP.4.0, через WinHttp.WinHttpRequest.5.1, через HTTPСоединение в 8-ке, все отказывается работать из-за сертификата.
единственное, что почти взлетело – это через InternetExplorer.Application методом IE.Navigate("https://test...тут написан нужный адрес.......",,,ПараметрыПОСТ);  но ему в качестве ПараметрыПОСТ надо передать массив байт а не строку.
Может есть у кого-нить мысли на этот счет?

передай массив

(2) как сделать байтовый массив из строки?

оберни для 77

(4) Что имеется ввиду?

обертка

(6) логично, кэп )) как обернуть-то?

MSScriptControl

(8) Скажи, я на верном пути?
ПараметрыПОСТ = "<?xml version=""1.0"" encoding=""utf-8""?><request><operation>get_incremental_update</operation><last_update_time>0000-00-00 00:00:00</last_update_time></request>";
   IE = СоздатьОбъект("InternetExplorer.Application");
   IE.Silent = 1;

   
   MSScriptControl = СоздатьОбъект("MSScriptControl.ScriptControl");
   MSScriptControl.Language = "javascript";
   
   ДанныеМассива = "new Array(";
   Для к = 1 По СтрДлина(ПараметрыПОСТ) Цикл
       Если к = 1 Тогда
           ДанныеМассива = ДанныеМассива + "'" +Сред(ПараметрыПОСТ,к,1) + "'";
       Иначе
           ДанныеМассива = ДанныеМассива + ","+ "'" +Сред(ПараметрыПОСТ,к,1) + "'";
       КонецЕсли;
   КонецЦикла;
   ДанныеМассива = ДанныеМассива + ")";
   Массив = MSScriptControl.Eval(ДанныеМассива);

   IE.Navigate("https://test.........",,,Массив);

Судя по всему не верной, ибо в ответ говорится мне что мой XML не валидный....

в джабе не просто создать байтовый массив, в васике просче

и в массив закидывать не символы, а байты

(11) если не сложно, чиркани пару строк, как это должно выглядеть

Знатоки VBA, подскажите, как из одинэсной строки сделать массив байт, что б потом можно было его передать как параметр

если просче то
ADODB.Stream

Если посимвольно, примерно так (читаем Описание ошибки)

//*******************************************
Процедура Сформировать()
   Скрипт=СоздатьОбъект("MSScriptControl.ScriptControl");
   Скрипт.Language="vbscript";
   Скрипт.AddCode("class [Класс]
       |    Dim [Массив]()
       |    Public Function [МассивБайт]([Стр])
       |        Redim [Массив](0)
       |        For [Сч]=1 To Len([Стр])
       |            Redim Preserve [Массив](Ubound([Массив])+1)
       |            [Массив](Ubound([Массив])-1)=Asc(Mid([Стр],[Сч]))
       |        Next
       |        [МассивБайт]=Ubound([Массив])
       |    End Function
       |End class
       |");
   Класс=Скрипт.Eval("new [Класс]");
   Сообщить(Класс.МассивБайт("Массив Байт"));
   Попытка
       Массив=Класс.Массив;
   Исключение
       Сообщить("А это намек, что дальше делать (и с ADODB.Stream в том числе)
       |---> "+ОписаниеОшибки(),"!!!");
   КонецПопытки;
КонецПроцедуры