Имя: Пароль:
1C
Админ
Тряхнём стариной, или отправка почты через ROM-Mail
,
0 Industrial
 
29.11.12
16:50
Всем привет! Кто работал с ROM-Mail, пожалуйста, подскажите. Недавно прикрутил к нетленке на 7.7 отправку печатных форм через ROM-Mail. В процессе опытной эксплуатации выяснилось, что большинство писем уходят нормально, но примерно 4% возвращаются назад с ошибкой
"554 Message is not RFC compliant". Что может быть не так?
1 Industrial
 
29.11.12
16:50
Код отправки примерно такой
Тряхнём стариной, или отправка почты через ROM-Mail

Всем привет! Кто работал с ROM-Mail, пожалуйста, подскажите. Недавно прикрутил к нетленке на 7.7 отправку печатных форм через ROM-Mail. В процессе опытной эксплуатации выяснилось, что большинство писем уходят нормально, но примерно 4% возвращаются назад с ошибкой
"554 Message is not RFC compliant". Что может быть не так?


Почта=СоздатьОбъект("AddIn.AddInMail");
   
   НастройкиПочты=Константа.Industrial_ТекущаяНастройкаEMAIL;
   
   
   
   //Тестовый************************************************************
   Почта.СерверОтправки = СокрЛП(НастройкиПочты.СервСМТП);
   Почта.ПортОтправки = СокрЛП(НастройкиПочты.Порт);
   Почта.Логин = СокрЛП(НастройкиПочты.Логин);
   Почта.Пароль =СокрЛП(НастройкиПочты.Пар);
   Почта.АутентификацияПриОтправке = НастройкиПочты.ПП;
   
   //Почта.АдресОтправителя =СокрЛП(НастройкиПочты.АдресОтКого) ;//СокрЛП(НастройкиПочты.ОбрАдр);
   
   Почта.АдресОтправителя =СокрЛП(НастройкиПочты.ОбрАдр);
   Почта.АдресДляОтвета =СокрЛП(НастройкиПочты.ОбрАдр);
   
   
   
   Почта.ИмяОтправителя=СокрЛП(НастройкиПочты.АдресОтКого) ;
   
   //Почта.АдресДляОтвета=СокрЛП(НастройкиПочты.АдресОтКого);
   
   //*************************************************************
   Если Почта.Подключиться("Отправка") = 0 Тогда
       Предупреждение("Не удалось установить соединение с SMTP - сервером",6);
       Возврат 0;
   КонецЕсли;
   
   
   Почта.Кодировка = "windows-1251";
   Почта.ТипПисьма = 0; //text/plain
   Почта.Важность = 1;
   Почта.ПодтверждениеДоставки = 0;
   Почта.ПодтверждениеПрочтения = 0;
   
   Почта.XMailer="Microsoft Outlook Express 6.00.2600.0000"; // вообразим себя Outlook-ом
   Почта.АдресПолучателя = СокрЛП(ТекEmailАдрес);




.......................

   
       Почта.Тема =    ВычислитьШаблонТекста(НастройкиПочты.ТемаП);
       Почта.Тело =    ВычислитьШаблонТекста(НастройкиПочты.ТекстП);
       
       
       Почта.Вложения=СтрДляВложений;
   
       Если Почта.Отправить() = 1 Тогда
       //Сообщить("Письмо отправлено !!!");
           Возврат 1;
       Иначе
           Возврат 0;
           Предупреждение("Не удалось отправить сообщение",4);
       КонецЕсли;
       Состояние("Отключаемся "+Почта.АдресПолучателя);    
       Почта.Отключиться();
       
       Почта=0;
................
2 mikecool
 
29.11.12
16:52
3 Industrial
 
29.11.12
17:00
(2) смотрел, но, извините, там бутор. Компонента для 1с, меня интересует мнение 1с профи, которые побороли такую ошибку.
4 Mikeware
 
29.11.12
17:05
такая ошибка за 7 лет эксплуатации не встречалась.
смотри адреса, на которые уходят такие письма. свяжись с их админами... смотри заголовки писем.
5 афаф
 
29.11.12
17:13
За роммаил не скажу. Но недавно наткнулся на забавный косяк. Отсылается письмо стандартным объектом ИнтернетПочта в платформе 8.2. А сервер говорит, дескать идите лесом. Причем на одних машинах - все норм, на других - фиг. Ковыряли с одмином логи, и выяснилось, что лесом посылают машины, у которых в имени компьютера есть русские буквы. Как обычно винда предлагает при установке назвать? Правильно - имя пользователя + пк. Что то типа "Вася-ПК". Вот а при отправке - это имя фигурирует в отправляемой на сервер информации. Ну почтовый сервер буржуинами написан, они про то, что машина может не английскими буквами называться и думать не думали. А при смене имени машины на английский - все становилось на свои места.
6 Злопчинский
 
29.11.12
19:07
юзай CDO и перехват печатных форм
.
http://infostart.ru/public/14131/
http://infostart.ru/public/14180/
7 Эльниньо
 
29.11.12
19:59
(0) Кинь свой ром-майл.длл мне на почту.
8 Industrial
 
29.11.12
20:14
(6) это-ж код переписывать надо, влом
(7) отправил, зачем он тебе?
9 Эльниньо
 
29.11.12
21:29
(8) У меня проблема.
Оправка работает несколько сеансов и потом при запуске обработки 1С вылетает на:

   Попытка
       Флаг=ЗагрузитьВнешнююКомпоненту("ROM-Mail.dll");

С твоей дллкой та же хня. (
10 Злопчинский
 
29.11.12
21:53
(8) решение работоспособно "из коробки". Открыл ЛЮБУЮ печатную форму. жмакнул кнопку - открылось готовое письмо, ввел нужное мыло. нажал "отправить".
11 Mikeware
 
30.11.12
07:29
(9) соотношение радиусов?
Закон Брукера: Даже маленькая практика стоит большой теории.