Имя: Пароль:
1C
1С v8
не получается отправить эл.сообщение программно
0 altaykniga
 
15.08.16
22:45
Всем привет. Прошу помощи умных людей. Гляньте код, что не так написал? Ошибок при выполнении кода не возникает, но фактически эл.письмо на указанный в коде эл.ящик не приходит. Код написал в форме внешней обработки.

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

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

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

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

    Почта.Отключиться();
1 altaykniga
 
16.08.16
17:15
1. установлена платформа 8.2.19.130.
2. у меня не указаны настройки SSL
3. Платформа 8.2 не работает с SSL?
2 Зая Бусечка
 
16.08.16
17:16
8,2 не работает с ссл
3 lamme
 
16.08.16
17:18
(1)
точно. не работает
4 altaykniga
 
16.08.16
17:19
(2,3) А как отправить тогда эл.сообщение с платформы 8.2?
5 Мимохожий Однако
 
16.08.16
17:21
(4)Установить платформу 8.3 ))
6 Зая Бусечка
 
16.08.16
17:21
(4) поставить какой-гибудь stunnel и направлять через него
7 altaykniga
 
16.08.16
17:29
(5,6) а почему тогда типовой документ "ЭлектронноеПисьмо" на яндекс уходит?
8 Генератор
 
16.08.16
17:34
с помощью COM объекта CDO.Message отправляю по ssl из 8.2, примеры есть в гугле, может даже на этом форуме
9 Зая Бусечка
 
16.08.16
17:34
(7) Главное - не смотреть в код...
10 altaykniga
 
16.08.16
20:45
(9) Посмотрел код, как при отправке документа ЭлектронноеПисьмо. Сделал по образу и подобию. Т.е. в отладчике сравниваю свойства "Профиль" и "ПочтовоеСообщение" при типовой отправке с помощью ЭлектронногоПисьма и моей обработке. Свойства Идентичны!
Ошибок при подключении к профилю и отправке не возникает, но письмо упорно не приходит к адресату. Ниже приведен код:

Процедура КнопкаВыполнитьНажатие(Кнопка)
    СисУчетка = справочники.УчетныеЗаписиЭлектроннойПочты.СистемнаяУчетнаяЗаписьЭлектроннойПочты;
    Профиль = УправлениеЭлектроннойПочтой.ПолучитьИнтернетПочтовыйПрофиль(СисУчетка);
    
    ИнтернетПочта = Новый ИнтернетПочта;
    
    Попытка
        ИнтернетПочта.Подключиться(Профиль);
    Исключение
        Сообщить("Не удалось подключиться к профилю сисУчетка");
        возврат;
    КонецПопытки;
    
    ПочтовоеСообщение = Новый ИнтернетПочтовоеСообщение;
    
    ПочтовоеСообщение.ИмяОтправителя = "S1C УПП";
    ПочтовоеСообщение.Отправитель    = сисучетка.АдресЭлектроннойПочты;
    ПочтовоеСообщение.Тема = "проверка отправки 16-08-16";
    
    Получатель = ПочтовоеСообщение.Получатели.Добавить();
    Получатель.Адрес           = "[email protected]";
    Получатель.Кодировка       = "utf-8";
    
    Попытка
        
        ИнтернетПочта.Послать(ПочтовоеСообщение);
    Исключение
        Сообщить("Не удалось выполнить код(ИнтернетПочта.Послать(ПочтовоеСообщение))");
    КонецПопытки;
    
    ИнтернетПочта.Отключиться();
    
КонецПроцедуры
11 Fram
 
16.08.16
22:53
(10) под спам фильтр может попадает?
сисучетка.АдресЭлектроннойПочты сопадает с учеткой в профиле?
12 Fram
 
16.08.16
22:56
+(11) еще вариант - ваш айпи может быть в спам листе
13 altaykniga
 
18.08.16
20:54
(11, 12) ну так а почему типовой документ ЭлектронноеПисьмо отправляется штатными средствами 1с на платформе 8.2 ?
14 Fram
 
18.08.16
22:38
(13) дык у тебя ж тоже отправляется. вопрос как я понял почему не доходит. кстати, в папке спама искал?