|
Отправка почты с локального почтового сервера | ☑ | ||
---|---|---|---|---|
0
1CVERYGOOD
08.09.14
✎
15:56
|
мПрофиль = Новый ИнтернетПочтовыйПрофиль;
мПрофиль.АдресСервераIMAP = "192.168.0.140"; мПрофиль.АдресСервераSMTP = "192.168.0.140"; мПрофиль.ПортSMTP = 25; мПрофиль.ПортIMAP = 143; мПрофиль.АутентификацияSMTP = СпособSMTPАутентификации.Login; мПрофиль.ПользовательIMAP = "[email protected]"; мПрофиль.ПользовательSMTP = "[email protected]"; мПрофиль.ПарольIMAP = "123"; мПрофиль.ПарольSMTP = "123"; мПрофиль.ВремяОжидания = 30; мПочта = Новый ИнтернетПочта; Попытка мПочта.Подключиться(мПрофиль); Исключение пВозвращаемоеЗначение=ОписаниеОшибки(); Возврат; КонецПопытки; мПочта.Отключиться(); Сообщение = Новый ИнтернетПочтовоеСообщение; Текст = Сообщение.Тексты.Добавить("Выгрузка" + строка(ТекущаяДата())); Текст.ТипТекста = ТипТекстаПочтовогоСообщения.ПростойТекст; Сообщение = Новый ИнтернетПочтовоеСообщение; Сообщение.Получатели.Добавить("[email protected]"); Сообщение.Тексты.Добавить(Текст) ; Сообщение.Тема = "Выгрузка" + строка(ТекущаяДата()); Сообщение.Вложения.Добавить(архфайл); Попытка мПочта.Подключиться(мПрофиль); Исключение пВозвращаемоеЗначение=ОписаниеОшибки(); Возврат; КонецПопытки; мПочта.Послать(Сообщение,,); Говорит: Почтовый ящик не доступен (SMTP error code 550, <[email protected]>, Recipient unknown) Пробовал gmail mail. Результат одинаковый. С такими же настройками по локалке письма шлет нормально. Почтовик сандерберд на внешку на те же адреса нормально шлет. Там такие же настройки. В чем может быть дело ? |
|||
1
vde69
08.09.14
✎
15:59
|
код выполняется на сервере или на клиенте?
|
|||
2
1CVERYGOOD
08.09.14
✎
15:59
|
на клиенте
|
|||
3
1CVERYGOOD
08.09.14
✎
16:00
|
Единственное отличие - в сандербёрде прописан прокси.
|
|||
4
vde69
08.09.14
✎
16:04
|
Функция СформироватьИнтернетПрофиль(знач УчетнаяЗапись,
знач Пароль = Неопределено, знач ФормироватьSMTPПрофиль = Истина, знач ФормироватьPOP3Профиль = Истина) Экспорт Профиль = Новый ИнтернетПочтовыйПрофиль; Профиль.Пользователь = УчетнаяЗапись.Пользователь; Профиль.ВремяОжидания = УчетнаяЗапись.ВремяОжидания; Если ЗначениеЗаполнено(Пароль) Тогда Профиль.Пароль = Пароль; Иначе Профиль.Пароль = УчетнаяЗапись.Пароль; КонецЕсли; Если ФормироватьSMTPПрофиль Тогда Профиль.АдресСервераSMTP = УчетнаяЗапись.СерверИсходящейПочтыSMTP; Профиль.ПортSMTP = УчетнаяЗапись.ПортSMTP; Если УчетнаяЗапись.SMTPАутентификация = Перечисления.ВариантыSMTPАутентификации.АналогичноPOP3 Тогда Профиль.АутентификацияSMTP = СпособSMTPАутентификации.ПоУмолчанию; Профиль.ПользовательSMTP = УчетнаяЗапись.Пользователь; Профиль.ПарольSMTP = УчетнаяЗапись.Пароль; ИначеЕсли УчетнаяЗапись.SMTPАутентификация = Перечисления.ВариантыSMTPАутентификации.ЗадаетсяПараметрами Тогда Если УчетнаяЗапись.СпособSMTPАутентификации = Перечисления.СпособыSMTPАутентификации.CramMD5 Тогда Профиль.АутентификацияSMTP = СпособSMTPАутентификации.CramMD5; ИначеЕсли УчетнаяЗапись.СпособSMTPАутентификации = Перечисления.СпособыSMTPАутентификации.Login Тогда Профиль.АутентификацияSMTP = СпособSMTPАутентификации.Login; ИначеЕсли УчетнаяЗапись.СпособSMTPАутентификации = Перечисления.СпособыSMTPАутентификации.Plain Тогда Профиль.АутентификацияSMTP = СпособSMTPАутентификации.Plain; ИначеЕсли УчетнаяЗапись.СпособSMTPАутентификации = Перечисления.СпособыSMTPАутентификации.БезАутентификации Тогда Профиль.АутентификацияSMTP = СпособSMTPАутентификации.БезАутентификации; Иначе Профиль.АутентификацияSMTP = СпособSMTPАутентификации.ПоУмолчанию; КонецЕсли; Профиль.ПользовательSMTP = УчетнаяЗапись.ПользовательSMTP; Профиль.ПарольSMTP = УчетнаяЗапись.ПарольSMTP; ИначеЕсли УчетнаяЗапись.SMTPАутентификация = Перечисления.ВариантыSMTPАутентификации.POP3ПередSMTP Тогда Профиль.АутентификацияSMTP = СпособSMTPАутентификации.БезАутентификации; Профиль.POP3ПередSMTP = Истина; Иначе Профиль.АутентификацияSMTP = СпособSMTPАутентификации.БезАутентификации; КонецЕсли; КонецЕсли; Если ФормироватьPOP3Профиль Тогда Профиль.АдресСервераPOP3 = УчетнаяЗапись.СерверВходящейПочтыPOP3; Профиль.ПортPOP3 = УчетнаяЗапись.ПортPOP3; Если УчетнаяЗапись.СпособPOP3Аутентификации = Перечисления.СпособыPOP3Аутентификации.APOP Тогда Профиль.АутентификацияPOP3 = СпособPOP3Аутентификации.APOP; ИначеЕсли УчетнаяЗапись.СпособPOP3Аутентификации = Перечисления.СпособыPOP3Аутентификации.CramMD5 Тогда Профиль.АутентификацияPOP3 = СпособPOP3Аутентификации.CramMD5; Иначе Профиль.АутентификацияPOP3 = СпособPOP3Аутентификации.Обычная; КонецЕсли; КонецЕсли; Возврат Профиль; КонецФункции |
|||
5
1CVERYGOOD
09.09.14
✎
07:49
|
Все то же самое.
|
|||
6
oleg_km
09.09.14
✎
09:47
|
Странно, ругается то на адрес получателя: [email protected]. Там точно ошибки нет? На локальном SMTP логи SMTP-сессий посмотри
|
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |