Отправка письма с несколькими вложениями

1. G_113893961360018019308 06.10.21 10:18 Сейчас в теме
Добрый день. Поскажите, отправляю письмо с 3мя вложениями, пользователю приходит письмо, Три вложения с разными именами, но файл один первый во всех письмах. Хотя формируются разные файлы.
    Пока Выборка.Следующий() Цикл
        //Если Выборка.ДатаНачала = НачалоОтпуска Тогда
            
            ПланированиеОтпусков        = Выборка.Ссылка.ПолучитьОбъект();    
            
            ИмяВременногоФайла            = ПолучитьИмяВременногоФайла("pdf");        
            
            Бланк                        = ПланированиеОтпусков.НапечататьБланкНаОтпуск(Выборка.НомерСтроки,"ПечатьБланкОтпуск");        
            Бланк.Записать(ИмяВременногоФайла,ТипФайлаТабличногоДокумента.PDF);
            ДвоичныеДанные                = Новый ДвоичныеДанные(ИмяВременногоФайла);            
            
            Вложения                     = Новый ТаблицаЗначений;
            Вложения.Колонки.Добавить("Данные");
            Вложения.Колонки.Добавить("Имя");
            НоваяСтрока                    = Вложения.Добавить();
            НоваяСтрока.Данные            = Новый ДвоичныеДанные(ИмяВременногоФайла);
            НоваяСтрока.Имя                = "Бланк на отпуск.pdf";    
            //БланкЛистОзнакомления
            _ИмяВременногоФайла         = ПолучитьИмяВременногоФайла("pdf");
            БланкОзнакомления           = ПланированиеОтпусков.НапечататьБланкЛистОзнакомления(Выборка.НомерСтроки);
            Бланк.Записать(_ИмяВременногоФайла,ТипФайлаТабличногоДокумента.PDF);
            ДвоичныеДанные              = Новый ДвоичныеДанные(_ИмяВременногоФайла);
            НоваяСтрока                    = Вложения.Добавить();
            НоваяСтрока.Данные            = Новый ДвоичныеДанные(_ИмяВременногоФайла);
            НоваяСтрока.Имя                = "Бланк ознакомления.pdf";
            //-- Бланк уведомление о начале отпуска
            _ИмяВременногоФайла         = ПолучитьИмяВременногоФайла("pdf");
            БланкОзнакомления           = ПланированиеОтпусков.НапечататьБланкУведомлениеОНачалеОтпуска(Выборка.НомерСтроки);
            Бланк.Записать(_ИмяВременногоФайла,ТипФайлаТабличногоДокумента.PDF);
            ДвоичныеДанные              = Новый ДвоичныеДанные(_ИмяВременногоФайла);
            НоваяСтрока                    = Вложения.Добавить();
            НоваяСтрока.Данные            = Новый ДвоичныеДанные(_ИмяВременногоФайла);
            НоваяСтрока.Имя                = "Бланк уведомление о начале отпуска.pdf";
            //--        
            ТемаПисьма                    = "БЛАНК НА ОТПУСК";            
            ТекстПисьма                    = "Напоминание: ";
            ТекстПисьма                    = ТекстПисьма+"<H1>У вас начинается отпуск с "+Формат(Выборка.ДатаНачала,"ДФ=dd.MM.yyyy")+":</H1>";                    
            ТекстПисьма                    = ТекстПисьма+"<H1>Необходимо распечатать и подписать заявление и уведомление на отпуск. Подписанные документы предоставить в отдел кадров</H1>";                    
            sОбщиеФункцииНаСервере.ОтправитьПисьмоОтложенно(Выборка.Ответственный,ТекущаяДата(),,ТемаПисьма,ТекстПисьма,Новый ХранилищеЗначения(Вложения))
Показать
По теме из базы знаний
Найденные решения
2. Release 06.10.21 10:40 Сейчас в теме
Потому что:
            БланкОзнакомления           = ПланированиеОтпусков.НапечататьБланкЛистОзнакомления(Выборка.НомерСтроки);
            Бланк.Записать(_ИмяВременногоФайла,ТипФайлаТабличногоДокумента.PDF);

и аналогично:
            БланкОзнакомления           = ПланированиеОтпусков.НапечататьБланкУведомлениеОНачалеОтпуска(Выборка.НомерСтроки);
            Бланк.Записать(_ИмяВременногоФайла,ТипФайлаТабличногоДокумента.PDF);
Остальные ответы
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
2. Release 06.10.21 10:40 Сейчас в теме
Потому что:
            БланкОзнакомления           = ПланированиеОтпусков.НапечататьБланкЛистОзнакомления(Выборка.НомерСтроки);
            Бланк.Записать(_ИмяВременногоФайла,ТипФайлаТабличногоДокумента.PDF);

и аналогично:
            БланкОзнакомления           = ПланированиеОтпусков.НапечататьБланкУведомлениеОНачалеОтпуска(Выборка.НомерСтроки);
            Бланк.Записать(_ИмяВременногоФайла,ТипФайлаТабличногоДокумента.PDF);
4. Dem0 06.10.21 10:41 Сейчас в теме
(2)
Ах-ха-хах! Точно, не заметил! А я думал в темпах запоминается.
С утра уже глаз замыленный на работе =)
7. G_113893961360018019308 06.10.21 11:42 Сейчас в теме
(2) Спасибо. Все получилось.
3. Dem0 06.10.21 10:40 Сейчас в теме
может назвать переменные разными именами для 3-х файлов?
" _ИмяВременногоФайла" заменить на "ИмяВложения1" "ИмяВложения2" и "ИмяВложения3"?
5. G_113893961360018019308 06.10.21 10:45 Сейчас в теме
(3) Такой вариант не проверил, сейчас попробую.
6. Dem0 06.10.21 10:52 Сейчас в теме
(5)
Не это уже не актуально - вот вам выше написал Release.
У вас оказывается идет получение данных в одни переменные, а отправляете вы по прежнему старую переменную "Бланк" вместо "БланкОзнакомления".
Наверное в этом дело
Оставьте свое сообщение

Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот