|
Не отправляет почту из 1С | ☑ | ||
---|---|---|---|---|
0
ogion83
14.09.15
✎
11:06
|
Пытаюсь настроить отправку почты, вот нашел как делать:
Сообщение = Новый ПочтовоеСообщение; Сообщение.Текст = "текст сообщения"; Сообщение.Отправитель = "АДРЕС"; Сообщение.Тема ="Тема сообщения"; Сообщение.Получатели.Добавить("АДРЕС"); Сообщение.Вложения.Добавить(Новый ДвоичныеДанные("D:\ДляОтправки\ПСА.xls"),"ПСА.xls"); Почта = Новый Почта; Почта.Подключиться(,); Попытка Почта.Послать(Сообщение,); Исключение Сообщить(ОписаниеОшибки()); Возврат; КонецПопытки; //отключение Почта.Отключиться(); При отправке открывается почтовый клиент (Thunderbird), но письма в нем не появляется. При обычной отправке все уходит нормально. Может кто подскажет в чем может быть проблема? |
|||
1
mehfk
14.09.15
✎
11:09
|
А если попробовать другой почтовый клиент?
|
|||
2
ogion83
14.09.15
✎
11:11
|
(1)Попробую
|
|||
3
cons74
14.09.15
✎
11:38
|
Почта.Подключиться(,);
Это что? Подключение к пустому профилю, с пустым паролем? И потом удивление? |
|||
4
ogion83
14.09.15
✎
11:39
|
Не нашел других бесплатных программ. В 1С7.7 все работало. Дело в 1С 8.2. Что там может быть не так. Нашел 5 способов отправки писем из 1С8, ни один не работает
|
|||
5
ogion83
14.09.15
✎
11:40
|
//подключаемся без параметров, к клиенту установленному по умолчанию в системе
Почта.Подключиться(,); |
|||
6
VikingKosmo
14.09.15
✎
11:42
|
Может стоит попробовать отправить почту встроенным почтовым клиентом, в 1С???
|
|||
7
ЧеловекДуши
14.09.15
✎
11:46
|
(5) тогда, причем тут 1С?
Вы понадеялись на систему, все вопросы к Администратору :) |
|||
8
ЧеловекДуши
14.09.15
✎
11:46
|
+ Кто такой "к клиенту установленному по умолчанию в системе"?
|
|||
9
ЧеловекДуши
14.09.15
✎
11:46
|
+ И с чем его "едят"? :)
|
|||
10
lamme
14.09.15
✎
11:51
|
а зачем использовать ПочтовоеСообщение
может ИнтернетПочтовыйПрофиль ? тогда пофг что будет установлено - Thunderbird, бат , аутлук или иное |
|||
11
ogion83
14.09.15
✎
12:01
|
(6) пробовал и встроенным, не пашет
|
|||
12
lamme
14.09.15
✎
12:08
|
Профиль = Новый ИнтернетПочтовыйПрофиль;
Профиль.АдресСервераSMTP = "Указать"; Профиль.АдресСервераPOP3 = ""Указать"; Профиль.Пользователь = ""Указать"; Профиль.Пароль = ""Указать"; Профиль.ПользовательSMTP = ""Указать"; Профиль.ПарольSMTP = ""Указать"; Профиль.АутентификацияSMTP = СпособSMTPАутентификации.Login; Профиль.АутентификацияPOP3 = СпособPOP3Аутентификации.Обычная; Профиль.ВремяОжидания = 90; Сообщение = Новый ИнтернетПочтовоеСообщение; Сообщение.Тема = "Хеллоу "; Сообщение.Отправитель.Адрес = Сокрлп(текПользователь.email); Сообщение.Отправитель.ОтображаемоеИмя = Сокрлп(текПользователь.email); Сообщение.Тексты.Добавить("Добрый день! | ВНИМАНИЕ! | Данное письмо сгенерировано роботом и носит информационный характер! Просьба НЕ ОТВЕЧАТЬ на него | | ХЕЛЛОУ | | ВНИМАНИЕ! | Данное письмо сгенерировано роботом и носит информационный характер! Просьба НЕ ОТВЕЧАТЬ на него | | Спасибо."); Сообщение.Получатели.Добавить(Сокрлп(текПользователь.email)); Сообщение.Вложения.Добавить(ИмяФайлаТмп); Почта = Новый ИнтернетПочта; Попытка Почта.Подключиться(Профиль); Исключение Сообщить("Не удалось подключиться к почтовому серверу !", СтатусСообщения.ОченьВажное); Сообщить("Ошибка: " + ОписаниеОшибки()); КонецПопытки; Попытка Почта.Послать(Сообщение); Сообщить("Письмо отправлено " + Сокрлп(текПользователь.email) +".", СтатусСообщения.Информация); Исключение Сообщить("Не удалось отправить письмо " + Сокрлп(текПользователь.email) + "!", СтатусСообщения.ОченьВажное); Сообщить("Ошибка: " + ОписаниеОшибки()); КонецПопытки; Почта.Отключиться(); |
|||
13
yavasya
14.09.15
✎
12:21
|
(0) домен почты ?
|
|||
14
ogion83
15.09.15
✎
15:49
|
С другой программой заработало)
|
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |