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

Профиль = Новый ИнтернетПочтовыйПрофиль;
        Профиль.АдресСервераSMTP = Сервер;
        Профиль.АдресСервераPOP3    = Сервер;
        Профиль.ПортSMTP            = 76;
        Профиль.ПортPOP3            = 587;
        Профиль.Пользователь        = Логин;
        Профиль.Пароль                 = Пароль;  
        Сообщение = Новый ИнтернетПочтовоеСообщение;
        Сообщение.Тема                           = Строка(ТекущаяДата());
        Сообщение.Отправитель.Адрес                = Логин;
        Сообщение.Отправитель.ОтображаемоеИмя     = "Робот-1C";  
        Если СтрДлина(Адрес)=0 Тогда
            АдресПолучателя    = Сообщение.Получатели.Добавить("");
            АдресПолучателя.ОтображаемоеИмя="";
        Иначе
            Сообщение.Получатели.Добавить(Адрес);
        КонецЕсли;  
        Сообщение.УведомитьОДоставке            = Истина;
        Сообщение.УведомитьОПрочтении            = Истина;
      
        Текст    = Новый ТекстовыйДокумент;
        Текст.ДобавитьСтроку("Здравствуйте!");
        Текст.ДобавитьСтроку("");  
        Текст.ДобавитьСтроку("");
        Текст.ДобавитьСтроку("Спасибо.");
        Текст.ДобавитьСтроку("");
        Текст.ДобавитьСтроку("*** Это письмо носит информационный характер и не требует ответа.");
        Почта.Подключиться(Профиль);
    Почта.Послать(Сообщение);
    Почта.Отключиться();