8.х не получается отправить эл.сообщение программно

Всем привет. Прошу помощи умных людей. Гляньте код, что не так написал? Ошибок при выполнении кода не возникает, но фактически эл.письмо на указанный в коде эл.ящик не приходит. Код написал в форме внешней обработки.

СисУчетка = справочники.УчетныеЗаписиЭлектроннойПочты.СистемнаяУчетнаяЗаписьЭлектроннойПочты;
Письмо = Новый ИнтернетПочтовоеСообщение;
Письмо.ИмяОтправителя = ПараметрыСеанса.ТекущийПользователь;
Письмо.Отправитель = сисучетка.АдресЭлектроннойПочты;
Получатель = Письмо.Получатели.Добавить();
Получатель.Адрес = ".......@yandex.ru";
Письмо.Тема = "автоматом ушло";
ПрофильОтправки = Новый ИнтернетПочтовыйПрофиль;
ПрофильОтправки.АдресСервераSMTP = СисУчетка.SMTPСервер;
ПрофильОтправки.ПортSMTP = СисУчетка.ПортSMTP;
ПрофильОтправки.АдресСервераPOP3 = СисУчетка.POP3Сервер;
ПрофильОтправки.ПортPOP3 = СисУчетка.ПортPOP3;
ПрофильОтправки.АутентификацияSMTP=СпособSMTPАутентификации.БезАутентификации;
//ПрофильОтправки.ПользовательSMTP = СисУчетка.Логин;
//ПрофильОтправки.ПарольSMTP = СисУчетка.Пароль;
ПрофильОтправки.Пользователь = СисУчетка.Логин;
ПрофильОтправки.Пароль = СисУчетка.Пароль;

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

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

Попытка
Почта.Послать(Письмо);
Исключение
ОбщегоНазначения.СообщитьОбОшибке(ОписаниеОшибки(),, "Электронное сообщение не отправлено.");
Возврат;
КонецПопытки;

Почта.Отключиться();