Обмен данными / Электронная почта

Профиль = Новый ИнтернетПочтовыйПрофиль;
Профиль.АдресСервераSMTP = "smtp.mail.ru";
Профиль.ПортSMTP = 465;
Профиль.ПользовательSMTP = "robot@mail.ru";
Профиль.ПарольSMTP = "s3cret";
Профиль.ИспользоватьSSLSMTP = Истина;

Письмо = Новый ИнтернетПочтовоеСообщение;
Письмо.Тема = "Акт за июль";
Письмо.Отправитель = "robot@mail.ru";
Письмо.ИмяОтправителя = "Робот";

//Получатели - коллекция: Добавить даёт
//пустой адрес, который тут же заполняют
Адрес = Письмо.Получатели.Добавить();
Адрес.Адрес = "buh@example.com";

//Тексты тоже коллекция: одно письмо может
//нести и простой текст, и разметку
Тело = Письмо.Тексты.Добавить();
Тело.Текст = "Акт готов, ждем подписи.";
Тело.ТипТекста =
    ТипТекстаПочтовогоСообщения.ПростойТекст;

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