|
отправка почты из 1с | ☑ | ||
---|---|---|---|---|
0
lordworld17
07.05.15
✎
12:53
|
ПочтовыйАдресТехподдержки = "88888";
АдресСервераSMTP = "8888"; ПочтовыйАдресОтправителя= "88888888"; ПользовательSMTP = "888888"; ПарольSMTP = "888888"; // ----- Профиль почтового ящика ----- ПрофильПочты = Новый ИнтернетПочтовыйПрофиль; ПрофильПочты.АдресСервераSMTP = АдресСервераSMTP; ПрофильПочты.ПользовательSMTP = ПользовательSMTP; ПрофильПочты.ПарольSMTP = ПарольSMTP; ПрофильПочты.ПортSMTP = 25; // ----- Письмо ----- Письмо = Новый ИнтернетПочтовоеСообщение; Письмо.Тема = Объект.ТемаОбращения; Письмо.Получатели.Добавить(ПочтовыйАдресТехподдержки); // добавляем к письму имя отправителя Письмо.ИмяОтправителя = СокрЛП(Объект.Пользователь); Письмо.Отправитель.Адрес = ПочтовыйАдресОтправителя; // устанавливаем важность письма Если Объект.Срочность = 0 Тогда Письмо.Важность = ВажностьИнтернетПочтовогоСообщения.Низкая; ИначеЕсли Объект.Срочность = 2 Тогда Письмо.Важность = ВажностьИнтернетПочтовогоСообщения.Высокая; Иначе Письмо.Важность = ВажностьИнтернетПочтовогоСообщения.Обычная; КонецЕсли; // добавляем вложения к письму Если Вложения <> Неопределено Тогда Для Каждого ЭлементВложение Из Вложения Цикл Письмо.Вложения.Добавить(Новый ДвоичныеДанные(ЭлементВложение.ИмяФайлаНаКомпьютере), ЭлементВложение.ИмяФайла); КонецЦикла; КонецЕсли; // добавляем текст //Текст = Письмо.Тексты.Добавить(Объект.ОписаниеПроблемы.ПолучитьТекст(), ТипТекстаПочтовогоСообщения.HTML); Объект.ОписаниеПроблемы.ПолучитьHTML(HTML, Картинки); Для Каждого Картинка Из Картинки Цикл Вложение = Письмо.Вложения.Добавить(Картинка.Значение.ПолучитьДвоичныеДанные()); Вложение.Идентификатор = Картинка.Ключ; HTML = СтрЗаменить(HTML, Картинка.Ключ, "cid:" + Вложение.Идентификатор); КонецЦикла; ТекстСообщения = Письмо.Тексты.Добавить(HTML, ТипТекстаПочтовогоСообщения.HTML); ТекстСообщения = Письмо.Тексты.Добавить("", ТипТекстаПочтовогоСообщения.HTML); ТекстСообщения = Письмо.Тексты.Добавить("Контактная информация: "+Объект.КонтактнаяИнформация, ТипТекстаПочтовогоСообщения.HTML); ТекстСообщения = Письмо.Тексты.Добавить("Срочность заявки: "+ЭтаФорма.Элементы.Срочность.ВыделенныйТекст, ТипТекстаПочтовогоСообщения.HTML); // ----- Отправка письма ----- Соединение = Новый ИнтернетПочта; Попытка Соединение.Подключиться(ПрофильПочты); Исключение Сообщить(ОписаниеОшибки()); Предупреждение("Произошли ошибки при подключении к почтовому серверу. |Описание ошибки приведено в окне сообщения."); Возврат; КонецПопытки; Соединение.Послать(Письмо); Соединение.Отключиться(); Сообщить("Письмо отправлено."); // ----- Очищаем поля для нового письма ----- Объект.Срочность = 1; Объект.ТемаОбращения = ""; Объект.ОписаниеПроблемы.Удалить(); Вложения.Очистить(); Собственно из БП 3.0 нормально отправлет в КА 1.1 выкидывает ошибку Указано недопустимое имя почтового ящика (SMTP error code 553) |
|||
1
Stim
07.05.15
✎
12:58
|
платформа?
|
|||
2
lordworld17
07.05.15
✎
13:00
|
8.3.5.1482
|
|||
3
Бубка Гоп
07.05.15
✎
13:03
|
(0) АдресСервераSMTP = "8888";
и недопустимое имя ящика? хм... действительно, с чего бы это |
|||
4
lordworld17
07.05.15
✎
13:07
|
АдресСервераSMTP=25
|
|||
5
Бубка Гоп
07.05.15
✎
13:09
|
(4) может, 25 - это порт?
|
|||
6
User_Agronom
07.05.15
✎
13:10
|
(4) Адрес? Нужно писать фактический адрес помещения, где находится сервер. Например,
АдресСервераSMTP= "ЧереззаборногшуЗадерищинск, дом 25 помещение 12"; |
|||
7
1С_Fitness
07.05.15
✎
13:11
|
(4) БП3.0 ссл шифрование поддерживает , КА - не факт
|
|||
8
1С_Fitness
07.05.15
✎
13:12
|
SMTP 110 и 25 как то так было
|
|||
9
ДенисЧ
07.05.15
✎
13:13
|
SMTP 110 - можно мне такого же зелья?
|
|||
10
lordworld17
07.05.15
✎
13:15
|
(5) конечно порт
|
|||
11
User_Agronom
07.05.15
✎
13:15
|
(7) Я тут что-то не понял: кто шлёт письма? Платформа или конфигурация? Если платформа, то при чём тут БП3 или КА?
|
|||
12
ColonelAp4u
07.05.15
✎
13:15
|
а разве не такой ли должен быть смтп адрес? smtp.mail.ru&
|
|||
13
ColonelAp4u
07.05.15
✎
13:16
|
а цифры это порт
|
|||
14
Бубка Гоп
07.05.15
✎
13:16
|
(10) тогда почему
АдресСервераSMTP=25 ??? |
|||
15
Бубка Гоп
07.05.15
✎
13:18
|
(14) намекаю:
адрес <> порт |
|||
16
lordworld17
07.05.15
✎
13:18
|
ПочтовыйАдресТехподдержки = "[email protected]";
АдресСервераSMTP = "smtp.kr-gallery.ru"; ПочтовыйАдресОтправителя = "[email protected]"; ПользовательSMTP = "[email protected]"; ПарольSMTP = "8888888"; |
|||
17
Бубка Гоп
07.05.15
✎
13:18
|
(16) вот, другое дело
|
|||
18
lordworld17
07.05.15
✎
13:19
|
(11) вот и мне интерсно.с бп 3.0 уходят письма и даже приходят а с ка 1.1 нет.платформа то одна и та же.
|
|||
19
Бубка Гоп
07.05.15
✎
13:22
|
(18) попробуй из пустой конфигурации, ради эксперимента
|
|||
20
User_Agronom
07.05.15
✎
13:24
|
(18) Скорее всего с формированием письма связано. Может тело пустое или вложения слишком большие.
Попробуй послать письмо с текстом "Тестовое сообщение" и темой "тест" без вложений и т.д. |
|||
21
Бубка Гоп
07.05.15
✎
13:29
|
(18) бп и ка на одном компе или на разных? антивирусы, фаерволы одинаковые?
|
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |