Odin | База знаний 1С

Как в 1С отправить email через SMTP нескольким получателям?


Фото аватара
(@odineski)
Участник
Присоединился: 2 месяца назад
Записи: 1515
Создатель темы  

программная отправка на почту mail письма. распиши что должен в профиле отправителя писать, скелет письма, хочу 3 получателям это письмо отправить



   
Цитата
(@odin)
Участник
Присоединился: 2 месяца назад
Записи: 1470
 

Для программной отправки письма на почту с использованием 1С:Предприятие, необходимо правильно настроить профиль отправителя и сформировать само письмо.

### Профиль отправителя

В профиле отправителя должны быть указаны следующие параметры:

1C
Профиль = Новый ИнтернетПочтовыйПрофиль;
Профиль.АдресСервераSMTP = "smtp.mail.ru"; // Адрес SMTP сервера
Профиль.ПортSMTP = 465; // Порт для SSL
Профиль.ИспользоватьSSLSMTP = Истина; // Использовать SSL
Профиль.ПользовательSMTP = "ваш_email@mail.ru"; // Ваш email
Профиль.ПарольSMTP = "ваш_пароль"; // Ваш пароль
Профиль.ТолькоЗащищеннаяАутентификацияSMTP = Истина; // Защищенная аутентификация

### Скелет письма

Для отправки письма трем получателям, можно использовать следующий код:

1C
Процедура ОтправитьПисьмо()
    // Создаем почтовый профиль
    Профиль = Новый ИнтернетПочтовыйПрофиль;
    Профиль.АдресСервераSMTP = "smtp.mail.ru";
    Профиль.ПортSMTP = 465;
    Профиль.ИспользоватьSSLSMTP = Истина;
    Профиль.ПользовательSMTP = "ваш_email@mail.ru";
    Профиль.ПарольSMTP = "ваш_пароль";
    Профиль.ТолькоЗащищеннаяАутентификацияSMTP = Истина;

    // Создаем сообщение
    Сообщение = Новый ИнтернетПочтовоеСообщение;
    Сообщение.Отправитель = "ваш_email@mail.ru";
    Сообщение.Тема = "Тема вашего письма";
    
    // Добавляем получателей
    Сообщение.Получатели.Добавить("получатель1@mail.ru");
    Сообщение.Получатели.Добавить("получатель2@mail.ru");
    Сообщение.Получатели.Добавить("получатель3@mail.ru");

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

    // Отправляем сообщение
    Почта = Новый ИнтернетПочта;
    Почта.Подключиться(Профиль);
    Почта.Послать(Сообщение);
    Почта.Отключиться();
КонецПроцедуры

### Объяснение кода

1. **Профиль отправителя**: Указываются параметры SMTP-сервера, порт, логин и пароль.
2. **Создание сообщения**: Создается объект сообщения, задается отправитель, тема и получатели.
3. **Текст сообщения**: Добавляется текст письма.
4. **Отправка**: Подключение к почтовому серверу и отправка сообщения.

Этот код позволяет отправить письмо на три указанных адреса. Не забудьте заменить `ваш_email@mail.ru` и `ваш_пароль` на свои реальные данные.



   
ОтветитьЦитата