Отправка на email информации об ошибках при выполнении проекта

В данной статье продемонстрирован пример использования предопределенного обработчика «Отправка на email результата выполнения проекта» в Экстракторе 1С.

Подробнее об Экстракторе 1С

Данный вид предопределенного обработчика может быть использован для регламентного уведомления на служебный e-mail о результатах исполнения проекта по расписанию.

Используемые параметры для настройки:

  • Порт SMTP

  • Сервер SMTP

  • Пользователь SMTP

  • Пароль SMTP

  • Только защищенная аутентификация SMTP

  • Использовать SSL SMTP

  • Адрес отправителя

  • Адрес получателя

Пример программного кода, используемого для отправки служебных писем
Если СтруктураПроекта.Результат.Статус = Ложь Тогда

Профиль = Новый ИнтернетПочтовыйПрофиль;
Профиль.АдресСервераSMTP = Параметры.Получить("Сервер SMTP");
Профиль.ПортSMTP = Параметры.Получить("Порт SMTP");
Профиль.ПользовательSMTP = Параметры.Получить("Пользователь SMTP");
Профиль.ПарольSMTP = Параметры.Получить("Пароль SMTP");
Профиль.ТолькоЗащищеннаяАутентификацияSMTP = Параметры.Получить("Только защищенная аутентификация SMTP");
Профиль.ИспользоватьSSLSMTP = Параметры.Получить("Использовать SSL SMTP");

АдресОтправителя = Параметры.Получить("Адрес отправителя");
АдресПолучателя = Параметры.Получить("Адрес получателя");

Сообщение = Новый ИнтернетПочтовоеСообщение;
Сообщение.Тема = "(Экстрактор) Ошибка при выполнении проекта """ + Строка(СтруктураПроекта.Ссылка) + """";
Сообщение.Отправитель = АдресОтправителя;

Для каждого Адрес Из Экс_ОбщийМодульКлиентСервер.СтрРазделить82(АдресПолучателя, ",") Цикл
Сообщение.Получатели.Добавить(СокрЛП(Адрес));
КонецЦикла;

Сообщение.Тексты.Добавить(СтруктураПроекта.Результат.ТекстОшибки, ТипТекстаПочтовогоСообщения.ПростойТекст);

Почта = Новый ИнтернетПочта;

Попытка
Почта.Подключиться(Профиль);
Почта.Послать(Сообщение);
Почта.Отключиться();
Исключение
ТекстОшибки = ОписаниеОшибки();
КонецПопытки;
 
КонецЕсли;