ДиректБанк

[LuMp1ck]

Аналогичная проблема, решение не нашел. Получилось у кого решить?

К сожалению, нет, я решения не нашел ((

[Александр___]

В HTTP запросе не уходят двоичные данные. Проблема ушла после конвертации данных в строку.

#Вставка
Если ТипЗнч(Данные) = Тип("ДвоичныеДанные")Тогда
ИмяФайла = ПолучитьИмяВременногоФайл а();
ДвоичныеДанные = Данные;
ДвоичныеДанные.Записать(Им яФайла);
ТекстовыйДокумент = Новый ТекстовыйДокумент;
ТекстовыйДокумент.Прочита� �ь(ИмяФайла);

РезультатВыполнения = ОтправитьPOSTЗапрос(
Настройки.Адрес, Настройки.Ресурс, Заголовки, ТекстовыйДокумент.Получит� �Текст(), , , НастройкаОбмена);
УдалитьФайлы(ИмяФайла);
Иначе
РезультатВыполнения = ОтправитьPOSTЗапрос(
Настройки.Адрес, Настройки.Ресурс, Заголовки, Данные, , , НастройкаОбмена);
КонецЕсли;
#КонецВставки
#Удаление
РезультатВыполнения = ОтправитьPOSTЗапрос(
Настройки.Адрес, Настройки.Ресурс, Заголовки, Данные, , , НастройкаОбмена);
#КонецУдаления

[eksin]

Привет, подскажи пожалуйста, куда данный код нужно вставить или где его отредактировать?

[lex_board]

Открыть конфигуратор
поиск : "обменсбанкамислужеб" ---поиск модуля
снимаем запрет редактирования
меняем код в процедуре :
Процедура ОтправитьВБанк(НастройкаО� �мена, Настройки, Данные, Результат, ТекстОшибки)



сам код:
//Вставляем код
Если ТипЗнч(Данные) = Тип("ДвоичныеДанные")Тогда
ИмяФайла = ПолучитьИмяВременногоФайл а ();
ДвоичныеДанные = Данные;
ДвоичныеДанные.Записать(Им яФайла);
ТекстовыйДокумент = Новый ТекстовыйДокумент;
ТекстовыйДокумент.Прочита� �ь(ИмяФайла);

РезультатВыполнения = ОтправитьPOSTЗапрос(
Настройки.Адрес, Настройки.Ресурс, Заголовки, ТекстовыйДокумент.Получит� �Текст(), , , НастройкаОбмена);
УдалитьФайлы(ИмяФайла);
Иначе
РезультатВыполнения = ОтправитьPOSTЗапрос(
Настройки.Адрес, Настройки.Ресурс, Заголовки, Данные, , , НастройкаОбмена);
КонецЕсли;
//


//Комментируем старый код
// РезультатВыполнения = ОтправитьPOSTЗапрос(
// Настройки.Адрес, Настройки.Ресурс, Заголовки, Данные, , , НастройкаОбмена);


Нажать F7, проверить ошибки.