Отправка сообщений через электронную почту из 1С

03.06.15

Интеграция - Email рассылки

По просьбам коллег по цеху выкладываю давно работающий механизм отправки сообщений через электронную почту из 1С.

Файлы

ВНИМАНИЕ: Файлы из Базы знаний - это исходный код разработки. Это примеры решения задач, шаблоны, заготовки, "строительные материалы" для учетной системы. Файлы ориентированы на специалистов 1С, которые могут разобраться в коде и оптимизировать программу для запуска в базе данных. Гарантии работоспособности нет. Возврата нет. Технической поддержки нет.

Наименование Скачано Купить файл
Конфигурация для объединения
.cf 33,30Kb ver:1.0
96 1 850 руб. Купить

Подписка PRO — скачивайте любые файлы со скидкой до 85% из Базы знаний

Оформите подписку на компанию для решения рабочих задач

Оформить подписку и скачать решение со скидкой

Внутри файлик с конфой. Ставится сбоку. Но для нормальной работы потребуется наличие справочников из типовых конфигураций (Пользователи, Физические лица, Виды контактной информации и т.п.). Проверено работает на КА и УПП. Но в принципе ничто не мешает использоваться процедуры и в других конфигурациях. Только надо будет позаботиться о совместимости.

Посредством этого механизма можно оповещать пользователей практически о любых событиях в системе (например о создании элемента справочника, проведении документа), а также отправка необходимых отчетов руководству в полностью автоматическом режиме.

Код формирования письма будет выглядеть примерно так:

Запрос = Новый Запрос;
Запрос.Текст=
"ВЫБРАТЬ
|    ПриходныйОрдерНаТоварыТовары.Номенклатура,
|    ПриходныйОрдерНаТоварыТовары.Количество,
|    ПриходныйОрдерНаТоварыТовары.ЕдиницаИзмерения
|ИЗ
|    Документ.ПриходныйОрдерНаТовары.Товары КАК ПриходныйОрдерНаТоварыТовары
|ГДЕ
|    И ПриходныйОрдерНаТоварыТовары.Ссылка = &Ссылка";
Запрос.УстановитьПараметр("Ссылка",ЭтотОбъект.Ссылка);

Результат=Запрос.Выполнить().Выбрать();
Если Результат.Количество() > 0 тогда
    
    АдресОтправителя =Константы.АдресОтправителя.Получить();
    ИмяОтправителя        = ?(ПолноеИмяПользователя()<>"", ПолноеИмяПользователя(),ИмяПользователя());
    
    Заголовок   = "Приход сырья на склад: "+Склад+" № "+номер+" от "+Дата+ "Поставщик:"+Контрагент;
    ТекстПисьма="";
    Пока Результат.Следующий() Цикл
        ТекстПисьма = ТекстПисьма + "<p>"+Результат.номенклатура.код+ " " + Результат.номенклатура + " " + Результат.количество + Результат.ЕдиницаИзмерения+"";
    КонецЦикла;
    
    ТипСообщенияПолученоСырье=Справочники.ТипыСообщенийПоЭлПочте.НайтиПоНаименованию("ПолученоСырье");
    Если не ТипСообщенияПолученоСырье.Пустая() Тогда
        ОтправкаЭлектронныхСообщений.ПослатьПисьмоHTMLСписку(
        ТипСообщенияПолученоСырье,            
        Заголовок, ТекстПисьма,АдресОтправителя,ИмяОтправителя);
    Иначе
        Сообщить("В справочнике ТипыСообщений нет элемента с наименованием:+ПолученоСырье");
    КонецЕсли;
КонецЕсли;

После исполнения этого кода письмо попадает в очередь, которая представляет собой регистр сведений. Затем регламентное задание отправляет письма с заданным интервалом и в случае успешного отправления удаляет их из очереди.

Есть поддержка отправки писем с вложениями. Для этого предназначен соответствующий реквизит с типом ХранилищеЗначения. В качестве вложения можно использовать отчеты сформированные в xls, да и вообще все, что угодно.

Параметры работы с почтовым сервером задаются через константы. Отдельно админку делать не стал, т.к. привык пользоваться редактом из пакета "Инструменты разработчика".


В составе конфигурации есть справочник Типы сообщений по электронной почте. Он предназначен для создания списков рассылок. Рекомендую использовать только предопределенные элементы. Также в нем можно назначить ответственного за ведение списка рассылки.

В нашей организации это работает уже 4 года и решает много проблем. Однако рекомендую не создавать слишком много рассылок для отдельных пользователей. Как показывает практика, если человеку приходит слишком много писем, он просто перестает их читать.

Вступайте в нашу телеграмм-группу Инфостарт

См. также

SALE! 50%

Мессенджеры и боты SMS рассылки Email рассылки Пользователь 1С:Предприятие 8 1C:Бухгалтерия 1С:ERP Управление предприятием 2 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х 1С:Управление нашей фирмой 3.0 1С:Розница 3.0 Управленческий учет Платные (руб)

Расширение 1С с полным набором инструментов для качественных транзакционных, триггерных и маркетинговых рассылок Email, SMS, WhatsApp, Telegram. Даже простые уведомления об оплате счетов способны существенно упростить сбор дебиторской задолженности. Применение всех возможностей прямого маркетинга выводит коммуникацию с клиентами, уровень сервиса и лояльность на новый уровень.

6000 3000 руб.

07.04.2014    91781    71    200    

152

Взаиморасчеты Email рассылки Акт сверки Бухгалтер Пользователь 1С:Предприятие 8 1С:Бухгалтерия 3.0 Бухгалтерский учет Платные (руб)

Внешняя обработка для Бухгалтерии 3.0 - позволяет автоматически формировать документы «Акт сверки расчетов» с контрагентами за выбранный период с последующей фоновой отправкой на почту контрагента.

5000 руб.

25.11.2020    28274    311    9    

269

SALE! 50%

Взаиморасчеты SMS рассылки Email рассылки Создание на основании Бухгалтер 1С:Предприятие 8 1С:Бухгалтерия 3.0 Россия Бухгалтерский учет Платные (руб)

Расширение Директ Маркетинг для 1С:Бухгалтерия с триггерами и роботами для автоматического создания документов, полным набором инструментов для качественных транзакционных, триггерных и маркетинговых рассылок Email, SMS, WhatsApp, Telegram.

6000 3000 руб.

15.04.2025    2656    11    9    

12

Email рассылки Оптовая торговля Бизнес-аналитик Бухгалтер Пользователь Руководитель проекта 1С:Предприятие 8 1С:Управление торговлей 10 1С:Управление производственным предприятием Управленческий учет Платные (руб)

Многим сотрудникам предприятия требуется актуальная и достоверная информация для принятия верных управленческих решений. Получить данную информацию можно при помощи отчетов, существующих в конфигурации «1С: Управление торговлей 10.3» или «1С:УПП». Но не всегда у пользователей есть время, возможность и/или желание формировать отчеты непосредственно в системе. Намного привычней и удобней получать готовые отчеты на электронную почту, не открывая 1С.

12000 руб.

16.04.2014    87358    103    91    

98

Взаиморасчеты Email рассылки Акт сверки Бухгалтер Пользователь 1С:Предприятие 8 1С:Управление нашей фирмой 1.6 1С:Управление нашей фирмой 3.0 Бухгалтерский учет Управленческий учет Платные (руб)

Создать и отправить 1000 Актов серки контрагентам за 5 мин?! Легко! Разработано для конфигурации 1C:УНФ. Массовое создание и рассылка Актов сверки в три клика.

6000 руб.

13.01.2022    12778    16    13    

22

Мессенджеры и боты SMS рассылки Email рассылки 1С:Предприятие 8 1С:Бухгалтерия 2.0 1С:Управление торговлей 10 1С:Розница 2 1С:Управление нашей фирмой 1.6 1С:Документооборот 1С:ERP Управление предприятием 2 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х 1С:Зарплата и Управление Персоналом 3.x 1С:Управление нашей фирмой 3.0 1С:Розница 3.0 Управленческий учет Платные (руб)

Общение с клиентами несколькими операторами 1С с одного или нескольких аккаунтов WhatsApp в вашей базе 1С. Рассылки, чат-боты, сценарии. Работает как самостоятельное решение, так и в составе других конфигураций 1С 8.3. Неограниченное количество операторов и аккаунтов WhatsApp и Телеграм в 1С.

4680 руб.

08.04.2020    54677    118    0    

137

Email рассылки Взаиморасчеты Акт сверки Бухгалтер 1С:Предприятие 8 1С:Бухгалтерия 3.0 Бухгалтерский учет Платные (руб)

Данная обработка позволяет сократить объем ручных операций, выполняемых ежемесячно бухгалтером или его помощником за счет автоматизации систематического процесса.

7800 руб.

12.02.2019    35828    29    24    

28
Комментарии
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
1. karpik666 4117 10.02.15 18:13 Сейчас в теме
Как минимум конфигурации УТ:CRM, Комплексная автоматизация имеют такой встроенный механизм, даже есть специальный документ Электронное письмо, готов поспорить, что такое имеет и бухгалтерия. Чем же ваша надстройка так существенно отличается?
2. burlakov 83 10.02.15 19:40 Сейчас в теме
(1) karpik666, да хотя бы тем, что работает надежнее и не засирает базу в отличие от типовых решений. в типовых нет списков рассылок с ответственными за их ведение. ну по крайней мере раньше не было.
3. realandrei 10.02.15 23:44 Сейчас в теме
(2), так ли нет? в той же УПП давно уже (если не сначала времен, не помню что было в 1.2) есть справочник группы почтовой рассылки, где состав групп можно выбирать из контактных лиц, контрагентов, личных контактов, организаций, пользователей и физических лиц, так же есть ответственный за список и в каких учетных записях эл.почты может использоваться.
разделение на учетные записи весьма полезно, чтобы получателям письма приходили от разных ящиков.
4. GreenDragon 10.03.15 16:06 Сейчас в теме
То, как реализовал в нашей переписаной УТ:
1. Добавлен регистр сведений, в который вносятся клиенты, которым необходимо отправлять документы и типы печатных форм этих самых документов.
2. Добавлена подписка на событие "При проведении" в которой проверяется очередь отправленных писем, чтобы избежать дублирования отправки при повторном проведении, наличие электронного адреса получателя в карточке клиента и вызовы процедур формирования необходимых печатных форм с помещением их на общий сетевой ресурс или в хранилище.
3. Регистр "Почта по сделкам", в котором содержатся получатель, путь к печатной форме, электронный адрес получателя и статус сообщения (использую два: Исходящее и Отправлено)
4. Регламентное задание, собирающее данные из регистра "Почта по сделкам" со статусом "Исходящее" и отправляющее письмо непосредственно из 1С.

P.S. Если стоит Exchange сервер, то можно возложить отправку писем на него, напрямую подсовывая ему данные в SQL. Данный механизм крутить не стал ввиду отсутствия этого самого Exchange

5. FarFar 47 02.06.15 17:38 Сейчас в теме
Скачал свежую КА. Объединил на нее Вашу конфигурацию.
Пробую открыть регистр сведений "Очередь электронных сообщений", пишет:
6. FarFar 47 02.06.15 17:38 Сейчас в теме
Ошибка инициализации модуля: РегистрСведений.ОчередьЭлектронныхСообщений.Форма.ФормаСписка.Форма
по причине:
{РегистрСведений.ОчередьЭлектронныхСообщений.Форма.ФормаСписка.Форма(5,2)}: Переменная не определена (ПолитикаБезопасности)
<<?>>ПолитикаБезопасности.ПриСозданииНаСервере(ЭтаФорма, Отказ, СтандартнаяОбработка);
7. burlakov 83 05.06.15 13:53 Сейчас в теме
8. altset 13.10.22 14:00 Сейчас в теме
Добрый день. В Упп если использовать отчеты из доп. внешних отчетов будут рассылаться?
(7)
9. burlakov 83 13.10.22 17:33 Сейчас в теме
(8) на самом деле источник данных не важен. главное чтоб было что рассылать. результат из Вашего отчета сложите в файл, прикрепите и отправляйте.
10. altset 13.10.22 21:52 Сейчас в теме
(9)как то не тут, можно приобрести?
11. burlakov 83 14.10.22 08:59 Сейчас в теме
(10) а в чем проблема приобрести тут? иначе - нарушение принципов сообщества будет
12. altset 14.10.22 09:06 Сейчас в теме
(11) проблемы нету, есть вопросы.
как у вас это реализовано? Пример что нужно мне это справочник с рассылками в котором будет указан какой отчет рассылать с какими параметрами его формировать и кому по списку его рассылать по планировщику. Отчеты будут переписываться на СКД.
13. burlakov 83 14.10.22 12:49 Сейчас в теме
(12) делаете рассылку в справочнике. в ней указываете список получателей. затем программно формируете отчет и выводите его в таб док. таб док сохраняете в файл. затем программно вызываете отправку рассылки с присоединенным файлом. все это попадает в регистре сведений - очередь на отправку. ну а потом регл. задание отправит через почтовый сервер. настройки сервера предварительно надо задать в константах.
Для отправки сообщения требуется регистрация/авторизация