Отправка по почте сформированного в 1С 8.1 отчета, используя Outlook или другую почтовую программу

Рассмотрим пример отправки любого сформированного отчета, прямо из 1С используя почтовую программу используемую пользователем по умолчанию. Как пример использования данной задачи - отправка сверки клиенту, или хронология отгрузок товара клиенту. Вариантов может масса. Решение нашей задачи будет выглядеть следующим образом: 1. сохранить документ во временный файл в формате Excel; 2. заархивировать файл; 3. отправить архив. Сделать это просто и выглядеть это будет следующим образом.

 
//Сформируем имя временного файла
  ИмяФайла = ПолучитьИмяВременногоФайла("xls");
  
  //Запишем сформированный отчет во временный файл Excel
  ЭлементыФормы.ПолеПечати.Записать(ИмяФайла,ТипФайлаТабличногоДокумента.XLS);
  
  
  //Создадим объет файл, для получения доступа к свойствам файла
  // таким как имяфайла, имя файла без расширения, размер и т.д.
  АрхФайл = Новый Файл(ИмяФайла);
  
  //сформируем имя файл архива
  ЗаголовокФайла = "test";
  Архив = АрхФайл.Путь + ЗаголовокФайла +".zip";
 
  //Зархивируем наш файл
  ЗаписьZip = Новый ЗаписьZipФайла(Архив,,,МетодСжатияZIP.Сжатие,УровеньСжатияZIP.Максимальный,); 
  ЗаписьZip.Добавить(Архив,РежимСохраненияПутейZIP.НеСохранятьПути);
  ЗаписьZip.Записать();
  
  //Удалим временній файл
  УдалитьФайлы(ИмяФайла); 
 
    //Создадим письмо    
  Письмо = Новый ПочтовоеСообщение;
  
  //Укажим адрес получаеля
  Письмо.Получатели.Добавить(info(a)1cprofi.com);
  
  //заполним тему  письма
  Письмо.Тема  = ТемаПисьма;
  
  //заполним текст письма
  Письмо.Текст = ТекстПисьма;
  
  //Вложим в письмо наш файл
  Письмо.Вложения.Добавить(Архив);    
  
  //Создадим объект почта
  Почта = Новый Почта;   
  
  //Подключимся к почте. Если в качестве параметра ничего не указывать
  //определиться почтвик по умолчанию (например outlook)
  Почта.Подключиться();    
  
  //Отправляем наше письмо
  Почта.Послать(Письмо);   
  
  //Закрываем соединение
  Почта.Отключиться();