Реклама на этом месте
Форум 1С
Форум 1С
Программистам. Бухгалтерам. Администраторам. Пользователям
Задай вопрос - получи решение проблемы. Без троллинга и флуда.
29 Май 2017, 01:03
МультиВход
Добро пожаловать, Гость. Пожалуйста, войдите или зарегистрируйтесь.
Не получили письмо с кодом активации?
 
collapse

Автор Тема: Ошибка при отправке письма на эл. почту.  (Прочитано 440 раз)

0 Пользователей и 1 Гость просматривают эту тему.

Оффлайн OlegSh

  • *
  • Сообщений: 1
  • РЕПУТАЦИЯ: 0
  • Регистрация: 2016-08-29
  • Сайт: 
  • Профессия: Ученик 1С
В середине августа сего года вдруг перестали отправляться письма из 1С7.7. Выдает ошибку "Ошибка:CDO.Message.1: The transport failed to connect to the server." Оболочка 027.

Вот код, который давно и успешно работал ((... Может кто-то сможет подсказать, куда копать?

 iConf = CreateObject("CDO.Configuration");
         
            iMsg = CreateObject("CDO.Message");
         
         
            iMsg.Configuration = iConf;
         
            iMsg.From          = "на склад""""<"+ СокрЛП(Константа.АдресЭлПочты)+">";
         
            iMsg.To            = СокрЛП(Клиент.АдресЭлПочты);
         
            iMsg.Subject       = "Накладная для загрузки №"+НомерДок+" от "+ДатаДок;
         
            iMsg.textBody      = "...";
         
         
            iMsg.BodyPart.Charset = "windows-1251";
         
            iMsg.AddAttachment(СокрЛП(Константа.ПутьКфайлу)+"\Real.dbf");
         
            iConf.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing").            Value = 2;
         
            iConf.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver").           Value = "smtp.mail.ru";
         
            iConf.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport").       Value = "465";
         
            iConf.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate").     Value = 1;
         
            iConf.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusername").         Value = "почта@mail.ru";
         
            iConf.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendpassword").         Value = "пароль";
         
            iConf.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpusessl").           Value = 1;
         
            iConf.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout").Value = 60;
         
         
            iConf.Fields.Update();
         
            Попытка
             
                iMsg.Send();
             
                Сообщить("Письмо отправлено.");
             
            Исключение
             
                Сообщить("Письмо не отправлено. Ошибка:" +ОписаниеОшибки());
             
            КонецПопытки;


Теги:
 


* Живое общение

Не устроил ответ?

Зарегистрируйся и задай свой вопрос. Живое общение приносит результат намного быстрее.


Зарегистрироваться

* Реклама

* Поиск

* Последние задачи на разработку (фриланс)

* Реклама

* Последние вакансии

* Топ 10 авторов за месяц

Геннадий ОбьГЭС Геннадий ОбьГЭС
80 Сообщений
wise wise
63 Сообщений
Dethmontt Dethmontt
49 Сообщений
MuI_I_Ika MuI_I_Ika
49 Сообщений
alex0402
43 Сообщений
Сергей Федоров Сергей Федоров
32 Сообщений
ilyay ilyay
27 Сообщений
ilnur75
25 Сообщений
Дмитрий Медведков
19 Сообщений
DmitriyF DmitriyF
17 Сообщений

* Кто онлайн

  • Точка Гостей: 249
  • Точка Скрытых: 0
  • Точка Пользователей: 4
  • Точка Сейчас на форуме:

* Облако тэгов

* Форум 1С с мобильного

* Инструменты

* Дополнительно

Поиск

 
SimplePortal 2.3.5 © 2008-2012, SimplePortal