Отправка файла методом POST в объекте WinHttpRequest из 1C
Задание в категории
песочница
7 |
0
11 декабря 2022 в 15:48:46
(1 год 49 недель 4 дня 7 часов назад)
Нужна помощь найти/исправить синтаксис в коде, падает по 500 ошибке.
WinHttp = Новый COMОбъект("WinHttp.WinHttpRequest.5.1");
Boundary = "Boundary"+СтрЗаменить(формат(ТекущаяДата(),"ДЛФ=T"),":","");
ФайлДанных = "file.xls";
РазделительСтрок = Символы.ПС;
СтрокаBase64 = Base64Строка(Новый ДвоичныеДанные("D:file.xls"));
Зп = "--" + Boundary + "
|Content-Disposition: form-data; name=""data""; filename=""" + ФайлДанных + """
|Content-Type: application/xml;" + РазделительСтрок + РазделительСтрок + "
|" + СтрокаBase64 + РазделительСтрок + "
|--" + Boundary + "--";
WinHttp.Open("POST", URL, 0);
WinHttp.SetRequestHeader("Content-Type","multipart/form-data;boundary=" + Boundary);
WinHttp.SetRequestHeader("Content-Length", СтрДлина(Зп));
WinHttp.setRequestHeader("Token", Токен);
WinHttp.Send(Зп);
Если WinHttp.Status = 200 Тогда
Сообщить(WinHttp.ResponseText);
КонецЕсли;
-
Отменена