ДиректБанк
X

Привет дорогой друг

Наш сайт существует и развиваетется за счет рекламы. Пожалуйста, отключите блокировку рекламы AdBlock или подобное, для нашего сайта. Спасибо!
Показано с 1 по 8 из 8

Комбинированный просмотр

  1. #1
    Гость форума

    Регистрация
    18.04.2023
    Сообщений
    1
    Сказал(а) спасибо
    0
    Поблагодарили 0 раз(а) в 0 сообщениях

    По умолчанию Re: ДиректБанк

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

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

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

  2. #2
    Пришел за помощью

    Регистрация
    26.07.2018
    Сообщений
    1
    Сказал(а) спасибо
    1
    Поблагодарили 6 раз(а) в 3 сообщениях

    По умолчанию Re: ДиректБанк

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

  3. #3
    Гость форума

    Регистрация
    04.07.2023
    Сообщений
    1
    Сказал(а) спасибо
    0
    Поблагодарили 0 раз(а) в 0 сообщениях

    По умолчанию Re: ДиректБанк

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



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

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


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


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

Похожие темы

  1. 1C ДиректБанк в УТ 11.5.8.ххх
    от Дмитрий5041987 в разделе Общие вопросы по 1С - Предприятие
    Ответов: 0
    Последнее сообщение: 07.07.2022, 10:47
  2. 1с 8.3 ДиректБанк может ли работать без ИТС?
    от anton_xxx в разделе Общие вопросы по 1С - Предприятие
    Ответов: 2
    Последнее сообщение: 27.05.2019, 20:43

Социальные закладки

Социальные закладки

Ваши права

  • Вы не можете создавать новые темы
  • Вы не можете отвечать в темах
  • Вы не можете прикреплять вложения
  • Вы не можете редактировать свои сообщения
  •