Показано с 1 по 5 из 5
Древовидный режим
-
16.08.2016, 22:19 #3
- Регистрация
- 17.11.2011
- Сообщений
- 4
- Сказал(а) спасибо
- 0
- Поблагодарили 0 раз(а) в 0 сообщениях
Re: не получается отправить эл.сообщение программно
Посмотрел код, как при отправке документа ЭлектронноеПисьмо. Сделал по образу и подобию. Т.е. в отладчике сравниваю свойства "Профиль" и "ПочтовоеСообщение" при типовой отправке с помощью ЭлектронногоПисьма и моей обработке. Свойства Идентичны!
Ошибок при подключении к профилю и отправке не возникает, но письмо упорно не приходит к адресату. Ниже приведен код:
Процедура КнопкаВыполнитьНажатие(Кн� �пка)
СисУчетка = справочники.УчетныеЗаписи� �лектроннойПочты.Системная УчетнаяЗаписьЭлектроннойП очты;
Профиль = УправлениеЭлектроннойПочт ой.ПолучитьИнтернетПочтов� �йПрофиль(СисУчетка);
ИнтернетПочта = Новый ИнтернетПочта;
Попытка
ИнтернетПочта.Подключитьс� �(Профиль);
Исключение
Сообщить("Не удалось подключиться к профилю сисУчетка");
возврат;
КонецПопытки;
ПочтовоеСообщение = Новый ИнтернетПочтовоеСообщение ;
ПочтовоеСообщение.ИмяОтпр� �вителя = "S1C УПП";
ПочтовоеСообщение.Отправи� �ель = сисучетка.АдресЭлектронно� �Почты;
ПочтовоеСообщение.Тема = "проверка отправки 16-08-16";
Получатель = ПочтовоеСообщение.Получат� �ли.Добавить();
Получатель.Адрес = "[email protected]";
Получатель.Кодировка = "utf-8";
Попытка
ИнтернетПочта.Послать(Почт овоеСообщение);
Исключение
Сообщить("Не удалось выполнить код(ИнтернетПочта.Послать(� �очтовоеСообщение))");
КонецПопытки;
ИнтернетПочта.Отключиться( );
КонецПроцедуры
Похожие темы
-
УТ 11. Добавить запись в справочник партнеры программно (обработкой)
от asadroman в разделе 1С - Предприятие 8.0, 8.1, 8.2, 8.3Ответов: 0Последнее сообщение: 03.11.2014, 10:46
Социальные закладки