Как отправить письмо?

[Yamuna]

добрый день! Не получается отправить письмо подскажите что не так делаю... самописная конфигурация, при проведении документа в процедуре ОбработкаПроведения(Отказ, РежимПроведения) делаю определенную проверку и если проверку проходим то надо отправить письмо  с вложением и при проведении получаем ошибки:
1) Ошибка авторизации, введите правильный логин и пароль{Документ.Тестирование.МодульОбъекта(72)}: Значение не является значением объектного типа (Подключиться)
2) Во время отправки письма возникла ошибка{Документ.Тестирование.МодульОбъекта(81)}: Значение не является значением объектного типа (Послать)
3) {Документ.Тестирование.МодульОбъекта(88)}: Значение не является значением объектного типа (Отключиться)
      Email.Отключиться();

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

Процедура ОбработкаПроведения(Отказ, РежимПроведения)
Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ
| Тестирование.Билет1 КАК Билет1,
| Тестирование.Билет2 КАК Билет2,
| Тестирование.Билет3 КАК Билет3
|ИЗ
| Документ.Тестирование КАК Тестирование
|ГДЕ
| Тестирование.Ссылка = &Ссылка";

Запрос.УстановитьПараметр("Ссылка", Ссылка);

РезультатЗапроса = Запрос.Выполнить();

Выборка = РезультатЗапроса.Выбрать();
РезОтветов = 0;
Ответ1 = 3;
Ответ2 = 4;    
Ответ3 = 1;    

Пока Выборка.Следующий() Цикл
Если  Выборка.Билет1 = Ответ1 Тогда
РезОтветов = РезОтветов+1;
КонецЕсли;

Если Выборка.Билет2 = Ответ2  Тогда
РезОтветов = РезОтветов+1;
КонецЕсли;
Если Выборка.Билет3 = Ответ3  Тогда
РезОтветов = РезОтветов+1 ;
КонецЕсли;
КонецЦикла;
ВсеБилеты = 3;
НабранныйПроцент = Цел(РезОтветов*100/ВсеБилеты);
НабраноБалов = РезОтветов;
    Если РезОтветов >= 2 Тогда
Документы.Тестирование.Печать(Ссылка);

УчетнаяЗапись = Новый ИнтернетПочтовыйПрофиль;
УчетнаяЗапись.ВремяОжидания = 120; ;           
УчетнаяЗапись.АдресСервераSMTP = "smtp.rambler.ru";     
УчетнаяЗапись.АдресСервераPOP3 = "pop.rambler.ru";
УчетнаяЗапись.Пользователь = "*****@rambler.ru";     
УчетнаяЗапись.ПользовательSMTP = "*****@rambler.ru";
УчетнаяЗапись.Пароль = "123";     
УчетнаяЗапись.ПарольSMTP = "123";     
УчетнаяЗапись.ПортSMTP = 465;
УчетнаяЗапись.ИспользоватьSSLSMTP = Истина;
УчетнаяЗапись.ПортPOP3 = 995;
УчетнаяЗапись.ИспользоватьSSLPOP3 = Истина;
УчетнаяЗапись.АутентификацияSMTP = СпособSMTPАутентификации.Login;
Почта = Новый ИнтернетПочта;           


Письмо = Новый ИнтернетПочтовоеСообщение;
Письмо.Отправитель.Адрес = "*****@rambler.ru";
Письмо.Отправитель.ОтображаемоеИмя = "Вася";     
Письмо.Вложения.Добавить("C:\Users\777\Desktop\sert\Sertifikat.PDF", "Сертификат");
Письмо.Тема = "Ваш сертификат";                   
Получатель = Письмо.Получатели.Добавить("*****@yandex.ru");

Попытка           
Почта.Подключиться(УчетнаяЗапись);     
Исключение           
Сообщить("Ошибка авторизации, введите правильный логин и пароль" + ОписаниеОшибки(), СтатусСообщения.Важное);     
КонецПопытки;           
Текст = Письмо.Тексты.Добавить();     
Текст.ТипТекста  = ТипТекстаПочтовогоСообщения.ПростойТекст;
Текст.Текст = "Текст письма, тест";

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

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

КонецЕсли;
КонецПроцедуры


[Yamuna]

все решил проблему  оказывается Почта надо было заменить на Почта1 и все заработало