Ошибка при работе с почтовым сервером

[dimalf]

Добрый день!

Бухгалтерия предприятия 2.0
При нажатии в форме документа кнопки печати, формируются файлы для отправки и идёт вызов процедуры:

&НаКлиенте
Процедура Рассылка(Команда,Путь, ИмФ, ЭА)

ПочтовоеСообщение=Новый ПочтовоеСообщение; // собственно сообщение
ПочтовоеСообщение.Тема = "СЧЁТ-ФАКТУРА и ТОРГ12";
ПочтовоеСообщение.Отправитель = Справочники.ФизическиеЛица.НайтиПоНаименованию(ИмяПользователя()).ИмяЭлектронногоАдреса + "@ИМЯ_СЕРВЕРА.ru";
ПочтовоеСообщение.Получатели.Добавить(СокрЛП(ЭА));
ПочтовоеСообщение.Вложения.Добавить(Путь + ИмФ, );

Профиль = Новый ИнтернетПочтовыйПрофиль;
Профиль.АдресСервераSMTP = "mail. ИМЯ_СЕРВЕРА .ru";
Профиль.АдресСервераPOP3 = "mail. ИМЯ_СЕРВЕРА .ru";
Профиль.ПортSMTP = 25;
Профиль.ПортPOP3 = 110;
Профиль.Пользователь = СокрЛП( ИмяПользователя());

Почта = Новый Почта;
Почта.Подключиться();
Почта.Послать(ПочтовоеСообщение);
Почта.Отключиться();

УдалитьФайлы(Путь + ИмФ);

КонецПроцедуры

Вместо отправки письма формируется ошибка:

Подскажите, что не так? Учётная запись пользователя на сервере существует.

[MuI_I_Ika]

Почтовый сервер через который вы пытаетесь отправить письмо говорит вам, что такой учетной записи нет.

Очевидно проблема в том, что вот в этом куске кода:

Код Выделить Развернуть

Почта = Новый Почта;
Почта.Подключиться();

отсутствует блок авторизации, то есть либо у вас неправильный профиль по-умолчанию, либо его вообще нет.

Причем профиль вы создаете для интернет почты, а отправлять пытаетесь через MAPI

[dimalf]

То есть надо написать

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

так?