Форум Кладовочки АЛьФ`а

Новая версия DialMail (beta)
Ссылка (https://cloud.mail.ru/public/6PrT/gtKGnf7Jc)

Основные изменения:
+ добавлены новые объекты
  IMAP - получение, удаление писем, работа с папками IMAP
  ClipBoard - история буфера, исправление проблемы с кодировкой
  HTTP - работа с TLS 1.2 (SSL) в системах win XP/2003
  SMS - отправка / получение СМС с USB модемом
  JSON_Object - быстрый парсинг JSON
-(bugs) исправлены некоторые ошибки и добавлены новые. :)

Будет интерес к компоненте - пишите, будут примеры и исправления/дополнения.
 
 

Цитата: swa от 21 декабря 2024, 14:59-(bugs) исправлены некоторые ошибки и добавлены новые. :)

Вот это понашему %)

Просто супер, спасибо большое, активно пользуюсь!

Обновление.
DialMail 4.0.4.1 18.01.2025

Объект FTP версия 2.8.4
+ добавлена поддержка UTF8 (теперь нет необходимости перекодировать из/в UTF8 при работе с именами файлов)
- добавлены шаблоны парсинга LIST для сервера ProFTPD (не читался список файлов по команде LIST)
! ПолучитьДатуФайла() возвращает дату, а не строку
+ ПолучитьДатуФайла(), ПолучитьВремяФайла() - при первом обращении посылает запрос на получение точной
   даты/времени файла ("MDTM"). Теперь у "старых" файлов на FTP получаем точное время их создания.

Брать там же (см. первый пост)

Вылетает на новой версии с примерами от 2.7.6.17.
конкретно ExamplePOP3.ert
КаталогЛогов = КаталогИБ()+"SYSLOG\post\";
глБиблиотека_trdm.СоздатьКаталог(КаталогЛогов);

ФайлЛога = КаталогЛогов+"dialmail.pop3.log";
Состояние("Подключение компоненты....");
Попытка
гПолучениеПочты = СоздатьОбъект("AddIn.POP3");
гПолучениеПочты.ИмяЛогФайла = ФайлЛога; << тут вылет
гПолучениеПочты.ВестиЛогФайл = 1;
//гПолучениеПочты.ИмяЛогФайла = "c:\dialmail.pop3.log";
Сообщить("Подключились: "+гПолучениеПочты.ВерсияОбъектаСтр);
Исключение
Сообщить("Не удалось создать объект из компоненты DialMail.dll!");
Возврат 0;
КонецПопытки;


Цитата: trdm от 16 февраля 2025, 19:32Вылетает на новой версии с примерами от 2.7.6.17.
конкретно ExamplePOP3.ert

Посмотрим...

Цитата: trdm от 16 февраля 2025, 19:32Вылетает на новой версии с примерами от 2.7.6.17.
конкретно ExamplePOP3.ert

Посмотрел, у меня такого не наблюдается. Такое ощущение, что у вас компонента зарегистрирована, но не загружена - или наоборот? (есть подобная особенность для компонент, написанных в DELPHI)
Проверьте, в таком случае падает?
гПолучениеПочты = СоздатьОбъект("AddIn.POP3");
//гПолучениеПочты.ИмяЛогФайла = ФайлЛога;
гПолучениеПочты.ВестиЛогФайл = 1; << Будет и тут падать

P/S в работе вместо POP3 использую IMAP
P/P/S другие объекты создаются? Что показывает СистемныеКоманды=СоздатьОбъект("AddIn.SystComm"); Сообщить(СистемныеКоманды.Версия) ?

завтра потестю, на связи.

Цитата: swa от 21 декабря 2024, 14:59Новая версия DialMail (beta)
Ссылка (https://cloud.mail.ru/public/6PrT/gtKGnf7Jc)

Основные изменения:
+ добавлены новые объекты
  IMAP - получение, удаление писем, работа с папками IMAP
  ClipBoard - история буфера, исправление проблемы с кодировкой
  HTTP - работа с TLS 1.2 (SSL) в системах win XP/2003
  SMS - отправка / получение СМС с USB модемом
  JSON_Object - быстрый парсинг JSON
-(bugs) исправлены некоторые ошибки и добавлены новые. :)

Будет интерес к компоненте - пишите, будут примеры и исправления/дополнения.
 
 

Не работает pop3 yandex и gmail. Можно поправить или делать через imap? Есть пример обработки для imap?

Цитата: mic22 от 16 сентября 2025, 13:49Не работает pop3 yandex и gmail. Можно поправить или делать через imap? Есть пример обработки для imap?

См по ссылке в первом посте (папка Примеры). Пример состряпан быстро, но основное (получение заголовков писем и самого письма) понять можно. Проверялось на почте Яндеска.
У яндекса давно pop3 нет. Про GMAIL не знаю, думаю там то же самое.
Не забываем перед использованием обработки создать пароль приложения (https://yandex.ru/support/yandex-360/customers/mail/ru/mail-clients/others).

Цитата: swa от 16 сентября 2025, 17:46

Цитата: mic22 от 16 сентября 2025, 13:49Не работает pop3 yandex и gmail. Можно поправить или делать через imap? Есть пример обработки для imap?

См по ссылке в первом посте (папка Примеры). Пример состряпан быстро, но основное (получение заголовков писем и самого письма) понять можно. Проверялось на почте Яндеска.
У яндекса давно pop3 нет. Про GMAIL не знаю, думаю там то же самое.
Не забываем перед использованием обработки создать пароль приложения (https://yandex.ru/support/yandex-360/customers/mail/ru/mail-clients/others).

Не хочет яндекс работать, пароль создал
Вот лог:
16.09.25 19:12:36.654 Подключаемся к SSL
16.09.25 19:12:36.732 Подключились к SSL
16.09.25 19:12:36.969 IMAP <-- * OK Yandex IMAP4rev1 at mail-imap-production-main-66.sas.yp-c.yandex.net:993 ready to talk with ::ffff:176.211.99.246:59612, 2025-Sep-16 19:12:29, TCTJx13m9Gk0
16.09.25 19:12:36.969 IMAP --> S138 CAPABILITY
16.09.25 19:12:37.247 IMAP <-- * CAPABILITY IMAP4rev1 CHILDREN UNSELECT LITERAL+ NAMESPACE XLIST UIDPLUS ENABLE ID AUTH=PLAIN AUTH=XOAUTH2 IDLE MOVE
16.09.25 19:12:37.248 IMAP --> S139 AUTHENTICATE PLAIN
16.09.25 19:12:37.284 IMAP <-- +
16.09.25 19:12:37.284 IMAP --> ******+
16.09.25 19:12:37.335 IMAP --> *********
16.09.25 19:12:37.335 IMAP <-- NO
16.09.25 19:12:38.290 IMAP --> S140 LOGOUT
16.09.25 19:12:38.327 IMAP <-- * BYE IMAP4rev1 Server logging out

Цитата: mic22 от 16 сентября 2025, 19:2216.09.25 19:12:37.248 IMAP --> S139 AUTHENTICATE PLAIN
16.09.25 19:12:37.284 IMAP <-- +
16.09.25 19:12:37.284 IMAP --> ******+
16.09.25 19:12:37.335 IMAP --> *********
16.09.25 19:12:37.335 IMAP <-- NO

Неправильный пароль/логин. Используйте логин без имени домена (вместо "name@yandex.ru" используйте просто "name")
Мой лог
16.09.25 17:30:01.123 Подключаемся к SSL
16.09.25 17:30:01.173 Подключились к SSL
16.09.25 17:30:01.384 IMAP <-- * OK Yandex IMAP4rev1 at mail-imap-production-main-15.klg.yp-c.yandex.net:993 ready to talk with ::ffff:176.100.216.155:1231, 2025-Sep-16 17:30:00, xTRveX0MiqM0
16.09.25 17:30:01.384 IMAP --> S1 CAPABILITY
16.09.25 17:30:01.584 IMAP <-- * CAPABILITY IMAP4rev1 CHILDREN UNSELECT LITERAL+ NAMESPACE XLIST UIDPLUS ENABLE ID AUTH=PLAIN AUTH=XOAUTH2 IDLE MOVE
16.09.25 17:30:01.584 IMAP --> S2 AUTHENTICATE PLAIN
16.09.25 17:30:01.604 IMAP <-- +
16.09.25 17:30:01.604 IMAP --> ******+
16.09.25 17:30:01.644 IMAP --> *********
16.09.25 17:30:01.644 IMAP <-- OK
16.09.25 17:30:01.644 IMAP --> S3 NOOP
16.09.25 17:30:01.664 IMAP <-- S3 OK NOOP Completed.

+ хотя нет, логин тут ни при чем. Вы включили возможность IMAP в настройках почтового ящика? (https://mail.yandex.ru/?dpda=yes&uid=17770938#setup/client).
pop3 тоже прекрасно работает (ошибочно думал, что Яндекс заблокировал POP3).

Цитата: swa от 16 сентября 2025, 17:46Про GMAIL не знаю, думаю там то же самое.

У Gmail работает и POP3, и IMAP. Недавно начал требовать пароли приложения, вместо пароля аккаунта.

Цитата: swa от 17 сентября 2025, 08:45+ хотя нет, логин тут ни при чем. Вы включили возможность IMAP в настройках почтового ящика? (https://mail.yandex.ru/?dpda=yes&uid=17770938#setup/client).
pop3 тоже прекрасно работает (ошибочно думал, что Яндекс заблокировал POP3).

imap не включил. Все заработало, pop3 тоже.
Ура! Спасибо!!!

Доброго времени!
Есть косяк. Все виснет при попытке СохранитьПрисоединенныйФайл. Версия 2.7.6.16 сохраняет без проблем
Куда отправить косячное письмо для примера?

SWA собака list.ru
Жду

Исправил, обновил, сообщил, жду реакции от mic22

Интересно, это только у меня дебильный mail.ru не дает скачать саму компоненту DialMail.dll - попробовал три разных браузера - везде отлуп, антивируса нет, осознанность действия подтверждаю, что еще надо то?

отбой, со второй попытки все получилось вообще без вопросов - что это было -ХЗ

Цитата: ЯнСмит от 03 ноября 2025, 09:37отбой, со второй попытки все получилось вообще без вопросов - что это было -ХЗ

По недомыслию...
Или от бездуховности...
;-)

Цитата: swa от 02 ноября 2025, 17:54Исправил, обновил, сообщил, жду реакции от mic22

Косячное письмо загрузилось. Буду тестить дальше.
Спасибо!!

А перекодировка самого письма есть при приеме? У меня письма от одного отправителя получаются в разных кодировках.
А как вы письма просматриваете и отправляете?
Компонента HTTP для чего? Есть пример?

Цитата: mic22 от 12 ноября 2025, 18:41А перекодировка самого письма есть при приеме? У меня письма от одного отправителя получаются в разных кодировках.
А как вы письма просматриваете и отправляете?

Сейчас перекодировка письма - дело рук программиста 1С (для перекодировки из UTF-8 см FormEx или DialMail). Посмотреть кодировку присоединенного файла (а текст письма - это тоже присоединенный файл с индексом 1) теперь можно с помощью Метода ПолучитьКодировкуПрисоединенногоФайла(<Индекс>). Новую версию DialMail - скачать можно по ссылке из заглавного поста. Пока так.

По поводу просматривания писем. Сейчас часто текст письма - это HTML. Для полноценного просмотра таких писем нужно 1cpp для встраивания на форму 1С ActiveX для просмотра HTML. Такие формы долго не живут. Рано или поздно крушат старушку 1С 7.7. У меня лично отправка простого письма (без HTML и наворотов) реализована с пом. обыкновенной обработки со строковым элементом поле ввода (неограниченный, многострочный). А получение писем используется только для получения от покупателей/поставщиков внешних файлов.

Цитата: mic22 от 12 ноября 2025, 18:41Компонента HTTP для чего? Есть пример?

HTTP - служит для обращения к сайтам/ресурсам по одноименному протоколу. SSL поддерживается, но нужны доп. файлы.

WinHTTP  = СоздатьОбъект("AddIn.HTTP");
Пока й = 1 по 3 Цикл
    WinHTTP.open("GET", "https://fias.nalog.ru/WebServices/Public/GetAllDownloadFileInfo");
    WinHTTP.setRequestHeader("User-Agent", "1C+Enterprise/8.3");
    WinHTTP.setRequestHeader("Content-Type", "application/json; charset=utf-8");
    WinHTTP.setRequestHeader("SOAPAction", "http://ws.unisoft/FNSNDSCAWS2/Request");
    WinHTTP.send();
   
    Если (WinHTTP.status() = 500)
    или (WinHTTP.status() = 0)
    Тогда
        Продолжить;
    КонецЕсли;
КонецЦикла;
Сообщить(WinHTTP.status());
Сообщить(WinHTTP.ResponseText());

Цитата: swa от 13 ноября 2025, 16:14

Цитата: mic22 от 12 ноября 2025, 18:41Компонента HTTP для чего? Есть пример?

HTTP - служит для обращения к сайтам/ресурсам по одноименному протоколу. SSL поддерживается, но нужны доп. файлы.

WinHTTP  = СоздатьОбъект("AddIn.HTTP");
Пока й = 1 по 3 Цикл
    WinHTTP.open("GET", "https://fias.nalog.ru/WebServices/Public/GetAllDownloadFileInfo");
    WinHTTP.setRequestHeader("User-Agent", "1C+Enterprise/8.3");
    WinHTTP.setRequestHeader("Content-Type", "application/json; charset=utf-8");
    WinHTTP.setRequestHeader("SOAPAction", "http://ws.unisoft/FNSNDSCAWS2/Request");
    WinHTTP.send();
   
    Если (WinHTTP.status() = 500)
    или (WinHTTP.status() = 0)
    Тогда
        Продолжить;
    КонецЕсли;
КонецЦикла;
Сообщить(WinHTTP.status());
Сообщить(WinHTTP.ResponseText());

Стормозил...

WinHTTP  = СоздатьОбъект("AddIn.HTTP");
Пока й = 1 по 3 Цикл
    WinHTTP.open("GET", "https://fias.nalog.ru/WebServices/Public/GetAllDownloadFileInfo");
    WinHTTP.setRequestHeader("User-Agent", "1C+Enterprise/8.3");
    WinHTTP.setRequestHeader("Content-Type", "application/json; charset=utf-8");
    WinHTTP.setRequestHeader("SOAPAction", "http://ws.unisoft/FNSNDSCAWS2/Request");
    WinHTTP.send();
   
    Если (WinHTTP.status() = 500)
    или (WinHTTP.status() = 0)
    Тогда
        Продолжить;
    КонецЕсли;
    Прервать;
КонецЦикла;
Сообщить(WinHTTP.status());
Сообщить(WinHTTP.ResponseText());

Не приходит отправленное письмо, пробую через вашу обработку. Пишет все ОК, до получателя не доходит
Письмо и лог отправил в почту