пример отчета, в котором есть код для отправки по емаилу
Ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
Работающий пример кода
// Профиль=Новый ИнтернетПочтовыйПрофиль;
//Профиль.АдресСервераSMTP="mail.*";
//Профиль.ПортSMTP=;
//Профиль.ИспользоватьSSLSMTP=Ложь;
//Профиль.ПользовательSMTP="1c";
//Профиль.Пароль = "***********";
//Профиль.ПарольSMTP = "**************";
//Профиль.АутентификацияSMTP = Истина;
//Профиль.Таймаут = 60 ;
ИПП = ПолучитьИнтернетПочтовыйПрофиль();
Сообщение = Новый ИнтернетПочтовоеСообщение;
Сообщение.Кодировка = "UTF-8";
Сообщение.Получатели.Добавить("a****@gmail.com");
Сообщение.Отправитель.Адрес = "1*@*****.com";
Сообщение.Тема = "очень нужный отчет";
Попытка
Сообщение.Вложения.Добавить(ПолноеИмяФайла,"Отчет");
Исключение
ТекстПисьма = ТекстПисьма + "Не удалось добавить вложение! " + ОписаниеОшибки() + Символы.ПС;
КонецПопытки;
Сообщение.Тексты.Добавить(ТекстПисьма);
Почта = Новый ИнтернетПочта;
Попытка
Почта.Подключиться(ИПП);
Почта.Послать(Сообщение);
Исключение
ЗаписьЖурналаРегистрации("Ошибка при отправке почты",
УровеньЖурналаРегистрации.Ошибка, , ,
"Во время отправки почты произошла ошибка: " + ОписаниеОшибки());
#Если Клиент Тогда
Сообщить("Не удалось отправить : " + ОписаниеОшибки());
#КонецЕсли
КонецПопытки;
Почта.Отключиться();
Попытка
УдалитьФайлы(ПолноеИмяФайла);
Исключение
Показать
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот