Версия для печати темы (https://pro1c.org.ua/index.php?s=30ba3af993eab110433a6e474da23e1d&showtopic=36814)

Автор: A.Frost89 25.04.17, 13:56

Добрый день. Бухгалтерия предприятия КОРП 3.0.49.23 . Есть обработка, которая отправляет документы - акт об оказании услуг, счета-фактуры, счета на оплату покупателей, контрагентам - списку либо единичным. Документы сохраняются в формате pdf, учетная запись используется 1С-ная настроенная. Все бы ничего, но при отправке документов контрагентам, сколько документов было выбрано для отправки, столько писем на почтовый адрес и приходит. Что не есть хорошо. Как сделать так, чтобы одному контрагенту, приходило одно письмо с вложенными документами, сколько бы их там не было выбрано?
p.s. Прикладываю http://pro1c.org.ua/redirect.php?https://yadi.sk/d/Pygdjp1X3HLHFp.честно, она не моя. счета кое-как подправил под себя. их цепляет и отправляет. а при выборе акта, наблюдаются проблемы. видимо из-за изменения конфы. но надеюсь что подправлю со временем.
p.p.s. в программировании начинающий,так что учусь, просьба не ругаться если буду тупить. Буду рад любой помощи/подсказке/совету.

Автор: a1987mar 26.04.17, 14:46

A.Frost89 @ Вчера, 14:56 ,
Добрий день. А яким чином формуються файли відправки для контрагента? (в папку"ТЕМР" на компютері)...

Автор: A.Frost89 26.04.17, 16:04

a1987mar @ Сегодня, 15:46 ,
да.всё так и есть. производится выгрузка во временный каталог.

Автор: a1987mar 26.04.17, 21:27

A.Frost89 @ Сегодня, 17:04 ,
Вам потрібно щоб оброботка створювала по коду ЄДРПО Контрагента каталог (папку) і в неї закидувало документи для відправки.

Автор: Bernet 27.04.17, 10:30

Если сами писали код, то найдите участок гле формируется объект "ИнтернетПочтовоеСообщение", у него есть коллекция "Вложения" - добавляйте свои файлы по одному в коллекцию, или раз вы сохраняете их во временный каталог, то можно заархивировать их и приложить к письму архив. По поводу первого способа в коде должно быть что-то вроде такого:

ПочтовоеСообщение = Новый ИнтернетПочтовоеСообщение;
                            
    ПочтовоеСообщение.Кодировка = "utf-8";
    ПочтовоеСообщение.ИмяОтправителя  = СокрЛП(УчетнаяЗаписьДляРассылки.АдресЭлектроннойПочты);
    ПочтовоеСообщение.Отправитель     = СокрЛП(УчетнаяЗаписьДляРассылки.АдресЭлектроннойПочты);
    ПочтовоеСообщение.Тема            = "Тема месседжа";
    
    Получатель = ПочтовоеСообщение.Получатели.Добавить();
    Получатель.Адрес           = СокрЛП(ПолучательПисьма);
    Получатель.ОтображаемоеИмя = СокрЛП(ПолучательПисьма);
    Получатель.Кодировка       = "utf-8";

    ТекстСообщения = ПочтовоеСообщение.Тексты.Добавить();
    ТекстСообщения.Кодировка = "utf-8";
    ТекстСообщения.ТипТекста = ТипТекстаПочтовогоСообщения.HTML;    
    ТекстСообщения.Текст = ПолучитьТекстСообщенияHTML();
    
        Для Каждого ПутьФайлаВложения Из МассивВложений Цикл
               ПочтовоеСообщение.Вложения.Добавить(ПутьФайлаВложения);
        КонецЦикла;

    Попытка
        ИнтернетПочта.Послать(ПочтовоеСообщение);
    Исключение
        ТекстОшибок = ТекстОшибок + Символы.ПС + (Строка(УчетнаяЗаписьДляРассылки) + ". " + ОписаниеОшибки());
        Возврат ТекстОшибок;    
    КонецПопытки;