Это у меня так работает, может поможет
Код 1C v 8.х Процедура ОсновныеДействияФормыЗагрузитьДанные(Кнопка)
Профиль = Новый ИнтернетПочтовыйПрофиль;
//Пропишем параметры соединения
//ip адрес или имя SMTP сервера
Профиль.АдресСервераSMTP = "192.111.1.10";
//Порт SMTP сервера
Профиль.ПортSMTP = 587;
//Имя пользователя почтового ящика
Профиль.Пользователь = "33333@mail.ru";
//Пароль доступа к почтовому ящику
Профиль.Пароль = "hp_5555";
//При необходимости добавляем аутентификацию
Профиль.АутентификацияSMTP = СпособSMTPАутентификации.Login;
//СпособSMTPАутентификации.ПоУмолчанию;
Профиль.ПарольSMTP = "hp_5555";
Профиль.ПользовательSMTP = "33333@mail.ru";
// Создаем объект для работы с почтой
Почта = Новый ИнтернетПочта;
//Выполняем подключение, согласно указанный параметров
Попытка
Почта.Подключиться(Профиль);
Исключение
//При подключении возникла ошибка, сообщим
Сообщить("Ошибка при подключении к серверу" + ОписаниеОшибки());
Возврат;
КонецПопытки;
//Создаем новое письмо (сообщение)
Сообщение = Новый ИнтернетПочтовоеСообщение;
//Указываем отправителя
Сообщение.Отправитель = "33333@mail.ru";
//Заполняем получателя
Сообщение.Получатели.Добавить(ЭлементыФормы.Адрес.Значение);
//Пишем тему письма
Сообщение.Тема = ЭлементыФормы.Тема.Значение;
//Формируем текст письма,указываем тип письма
//Сообщение.Тексты.Добавить("Текст",ЭлементыФормы.Текст.ПолучитьТекст());
Сообщение.Тексты.Добавить(ЭлементыФормы.Текст.ПолучитьТекст(), ТипТекстаПочтовогоСообщения.HTML);
//При необходимости делаем вложение с файлом
Если ЗагрузкаВозможна() Тогда
Возврат;
КонецЕсли;
Если Файл = "Файл" Тогда
Сообщение.Вложения.Добавить(ПутьКФайлу);
Иначе
НайденныеФайлы = НайтиФайлы(ПутьККаталогу, "*.xls");
Для каждого ТекущийФайл Из НайденныеФайлы Цикл
Сообщение.Вложения.Добавить(ТекущийФайл.ПолноеИмя);
КонецЦикла;
КонецЕсли;
Если Файл = "Файл" Тогда
Сообщение.Вложения.Добавить(ПутьКФайлу);
Иначе
НайденныеФайлы = НайтиФайлы(ПутьККаталогу, "*.txt");
Для каждого ТекущийФайл Из НайденныеФайлы Цикл
Сообщение.Вложения.Добавить(ТекущийФайл.ПолноеИмя);
КонецЦикла;
КонецЕсли;
//Непосредственно отправка сообщения
Почта.Послать(Сообщение);
//После отправки закрываем соединение
Почта.Отключиться();
КонецПроцедуры