Страницы: 1
ты в любом случае выводишь на печать ТабличныйДокумент. В нем нет функции сохранения в файл. Тебе нужно сделать ТекстовыйДокумент и выводить в него все то, что ты выводишь в табличный документ
Тебе можно не загонять данные в текст письма, а сделать по типу такое:
Для каждого СтрокаТаблицы Из ТаблицаОтчетов Цикл
ИмяТемпФайла = ПолучитьИмяВременногоФайла();
СтрокаТаблицы.Отчет.Записать(ИмяТемпФайла,
ТипФайлаТабличногоДокумента.HTML);
КонецЦикла
См. хелп по ПолучитьИмяВременногоФайла(), а потом созданный файл присоединяешь к письму и х..чишь его покупателю по почте. Если так не подойдет, то создавай объект Word или Excell и затем шли по почте
В 1с есть возможность отправки сообщений автоматически, не клацая на кнопочку отправить. НО ТОЛЬКО С ПРОТОКОЛОМ SMTP. Вот такой код:
Попытка
ОтправитьПоПочте2(ТекСтрока); // работает с Батом
Исключение
Попытка
ОтправитьПоПочте1(ТекСтрока); // работает с Аутлуком, но переспрашивает при отправке
Исключение
Сообщить_и_записать("Ошибка при отправке почты - "+ОписаниеОшибки(),СтатусСообщения.Важное);
КонецПопытки;
КонецПопытки;
Процедура ОтправитьПоПочте1(ТекСтрока)
Почта = Новый Почта;
Сообщение = Новый ПочтовоеСообщение;
//Работает с Аутглуком, но переспрашивает приотправке
//не работает с Батом 3.60
Почта.Подключиться("name@mysite.dp.ua","password");
Сообщение.Вложения.Добавить(ПолучитьИмяФайлаПодразделения(ТекСтрока.филиал.наименование));
Сообщение.Получатели.Добавить(ТекСтрока.филиал.email);
Сообщение.Тема ="Проигнорированные документы в офисе. Письмо сгенерированно роботом";
Сообщение.Текст="Проверьте, будь ласка эти документы ПОСЛЕ получения обновления из офиса. Ва
Страницы: 1