Имя: Пароль:
1C
1С v8
Как в почту прикрепить отчет
0 SH_tan
 
20.08.14
13:53
Добрый день. Есть задачка не большая, не знаю как лучше сделать, если есть у кого похожее или пример то подскажите как реализовалось.
Вообщем есть отчет который выводит с помощью макета данные, необходимо эти данные выводить в почту и рассылать ключевым сотрудникам.
Я думаю необходимо сперва то что получилось в отчете передавать в ворд сохранять его и отправлять вордовский файл. У кого есть идеи?
1 Crush
 
20.08.14
13:56
(0) Я сохраняю в хтмл и потом вставляю в тело письма текст хтмл
2 ejiki
 
20.08.14
13:56
(0) Ну не имел дела, но лучше отчет ляжет в табличку в формате exel. По крайней мере сам факт сохранения гораздо проще, Отчет зрительно удобнее. А для того чтобы это рассылать. Кхм. Самое простое это Впланировщеке заданий настроить так чтобы запускался Батник проверяющий наличие новых файлов в папке,затем архивировал их и удалял остатки за собой. а полученый архив отправлять по почте.

Логически это довольно таки просто реализуется. Если немного разобраться.
3 SH_tan
 
20.08.14
13:57
(1) по подробнее можешь?
4 ejiki
 
20.08.14
13:57
(1) забыл что можно в ХТМЛ сохранить :D

+1 еще проще
5 ejiki
 
20.08.14
13:58
Куда проще. Ты когда таблицу открываешь в меню Файл- сохранить как, а уж там много типов файлов.
6 arccos6pi
 
20.08.14
14:13
(0)
ИмяФайла = ПолучитьИмяВременногоФайла("xls");
ТабДок.Записать(ИмяФайла);
ПочтСообщение = Новый ИнтернетПочтовоеСообщение;
ПочтСообщение.Вложения.Добавить(Новый ДвоичныеДанные(ИмяФайла ),"Файлег.xls");
7 ам794123
 
20.08.14
14:19
(0)Сохраняй свой отчет в файл и отправляй:

ТабДок.Записать(<ИмяФайла>, <ТипФайлаТаблицы>)

ТипФайлаТабличногоДокумента:

ANSITXT
DOCX
HTML
HTML3
HTML4
MXL
MXL7
ODS
PDF
TXT
XLS
XLS95
XLS97
XLSX

например: МойОтчет.Записать("С:\Отчет.pdf", ТипФайлаТабличногоДокумента.PDF)
8 User_Agronom
 
20.08.14
14:24
(2) Бред какой-то.
1. Формировать отчет.
2. Сохранять в xls или ещё как - пофигу. При сохранении генерить имя файла
3. Эта же обработка, после формирования отчета, шлёт файл по правильному назначению.
4. После успешного посыла (и даже не успешного) файл удаляется.

Все четыре действия делать одной кнопкой.
9 User_Agronom
 
20.08.14
14:25
+(8) А ещё лучше забацать на почве этого танца регламентное задание.
10 Crush
 
20.08.14
14:31
(3)
1. Генеришь отчет - табДок;

    ВремФайл    = ПолучитьИмяВременногоФайла("htm");
    ТабДок.Записать(ВремФайл,ТипФайлаТабличногоДокумента.HTML);
    Текст    = Новый ТекстовыйДокумент;
    Текст.Прочитать(ВремФайл);
    УдалитьФайлы(ВремФайл);
    
    Профиль    = Новый ИнтернетПочтовыйПрофиль;
    Почта    = Новый ИнтернетПочта;
    Почта.Подключиться(Профиль);
    Письмо    = Новый ИнтернетПочтовоеСообщение;
    Письмо.Отправитель.ОтображаемоеИмя    = "1С";
    Письмо.Тексты.Добавить(Текст.ПолучитьТекст(),ТипТекстаПочтовогоСообщения.HTML);
    Письмо.ОбработатьТексты();
    Почта.Послать(Письмо);
    Почта.Отключиться();

Ну и конечно же (9) в регламентное задание
11 SH_tan
 
20.08.14
14:41
буду пробовать
спасибо всем.
12 User_Agronom
 
20.08.14
14:42
(10) Ну почти то же самое, что я написал. Только я файл не читаю, а просто вкладываю в сообщение. Ну и выбрал бы xls-формат, как более понятный пользователю.
Текст сообщения: данные во вложении.
13 User_Agronom
 
20.08.14
14:43
(10) Удалить временный файл забыл
14 Crush
 
20.08.14
14:45
(12) Это от задачи зависит. В моём случае проще видеть сразу информацию, без открытия вложений.

(13) Забей;) (5-я строчка)
15 SH_tan
 
20.08.14
16:22
(10) реализовал как ты показал
все работает
Спасибо!
Программист всегда исправляет последнюю ошибку.