Письмо разработчику

[kreator]

Была у меня когда-то возможность отправить сабж (в принципе и сейчас есть), через ShellExecute и mailto. Особо невостребованный, мягко говоря. Попросили обновить. Вопрос такой. Тема письма и тело письма первоначально какие у кого формируются? Если есть? Наверняка есть такой сервис.

[Игорь Столяров]

через ShellExecute и mailto

А вдруг на компьютере нет почтовой программы ? Сейчас все ведут почту в сервисах ...
Или вообще у пользователя нет e-mail ...
В 2022 г. письмо конечно формирмируется и отправляется через LibCurl. Там всё есть.

Тема - название программы.
В тексте информация о системе + пользователь пишет что хочет сообщить дополнительно.
Что-то вроде:

Код: Выделить всё

У нас не печатаются кассовые чеки через сеть !

ИНФОРМАЦИЯ О КОМПЬЮТЕРЕ
---------------------------------------------------------
Операционная система: Windows 10 Pro x32
Объект: C:\Program Files\Kassa\kassa.exe  ПАРАМЕТРЫ
Версия: "Супер-касса" от 02.12.2022 г.
Папка БД: C:\Program Files\Kassa\
Папка TEMP: R:\TEMP\
Настройка списков: C:\Users\Igor4\AppData\Local\BF00001S.tps
Объекты GDI: 65,001
Текущий принтер: HP LaserJet Professional P 1102w
E-Mail для ответа: jopamira@magazin.ru

[kreator]

Спасибо Игорь.
Если нет почтового клиента, не судьба. Но у нас нет таких клиентов. Причём просят наладить именно сервис отправки сообщений через MS Outlook, причём не на автомате, а именно через открытие Outlook. "Письмо разработчику" - это побочка. Может быть в качестве оценки возможностей.

[Ал]

Спасибо Игорь.
Если нет почтового клиента, не судьба. Но у нас нет таких клиентов. Причём просят наладить именно сервис отправки сообщений через MS Outlook, причём не на автомате, а именно через открытие Outlook. "Письмо разработчику" - это побочка. Может быть в качестве оценки возможностей.

эти шаблоны viewtopic.php?t=2109 через ole outlook работали с почтой

Office_chm.zip

(478.24 КБ) 43 скачивания

[Ал]

через ShellExecute и mailto

..
В 2022 г. письмо конечно формирмируется и отправляется через LibCurl. Там всё есть.

Игорь, мне как-то нужно было написать программки-роботы для разбора входящих(с и без вложений) и формирования автоответов в зависимости от текста в теме входящих или состояния вложений. В случаях работы с файлами-вложениями из входящих обойтись только функционалом кларионовской библиотеку LibCurl и только одним Clarion у меня не получилось, интересно как вы работаете с вложениями средствами сабжа?

[Дед Пахом]

Из Outlook libcurl вполне себе получает письма, и вложения, и всё остальное. Если просто IMAP, то я на это забил.

[Ал]

Из Outlook libcurl вполне себе получает письма, и вложения, и всё остальное. Если просто IMAP, то я на это забил.

понятно, да тогда мне потребовался именно IMAP... ну и + входящие могли быть отправлены откуда угодно клиентами клиента ... и их нужно обязательно принять/обработать/ответить... нужно было быстро - добавил "вкрапление" на питоне для разбора входящих.
Хотел переделать, но завод купила крупная "фирма" и переводит на свой софт, и это не Кларион...

[Игорь Столяров]

Мы в своё время делали большую автоматизированную систему обмена почтовыми сообщениями
на библиотеке Catalyst Tools (интересна жива она ещё ?), в т.ч. и c протоколом IMAP.

Всё работало прекрасно.
Получалось, разбиралось, дополнялось, подписывалось и снова отправлялось.

[finsoftrz]

через ShellExecute и mailto

А вдруг на компьютере нет почтовой программы ? Сейчас все ведут почту в сервисах ...
Или вообще у пользователя нет e-mail ...
В 2022 г. письмо конечно формирмируется и отправляется через LibCurl. Там всё есть.

Тема - название программы.
В тексте информация о системе + пользователь пишет что хочет сообщить дополнительно.
Что-то вроде:

Код: Выделить всё

У нас не печатаются кассовые чеки через сеть !

ИНФОРМАЦИЯ О КОМПЬЮТЕРЕ
---------------------------------------------------------
Операционная система: Windows 10 Pro x32
Объект: C:\Program Files\Kassa\kassa.exe  ПАРАМЕТРЫ
Версия: "Супер-касса" от 02.12.2022 г.
Папка БД: C:\Program Files\Kassa\
Папка TEMP: R:\TEMP\
Настройка списков: C:\Users\Igor4\AppData\Local\BF00001S.tps
Объекты GDI: 65,001
Текущий принтер: HP LaserJet Professional P 1102w
E-Mail для ответа: jopamira@magazin.ru

Игорь, а как информацию о версии операционной системы получаете? Я знаю про старый класс, где через win api. Но MS пишут, что используемые там функции не рекомендуют, устарели. А сейчас как-то на манифест завязано, сложно показалось. Углубляться не стал в этот вопрос.

[Игорь Столяров]

информацию о версии операционной системы

Проще детской игры в крысу !
(Вопрос к администрации заведения: почему нет подходящего смайлика ?)

Код: Выделить всё

  Incluide('CWUtil.inc'),Once
  ...
  Loc:OsVersion = OSVersion()
  
  ! Если программа работает на сервере в терминальном режиме
  If IsTermServer() then Loc:OsVersion = Clip(Loc:OsVersion) & ' (терминал)'.
  Loc:OsVersion = Clip(Loc:OsVersion) & Choose(System{Prop:WindowsVersion,7} = '1',' x64',' x32')

[finsoftrz]

Понятно, sv включили функционал того древнего класса в rtl. Проверьте, по идее не получится вывести номер релиз а вин10, а вин11 будет определяться как вин10. Если так, то это оно.

[Игорь Столяров]

Давайте Win11 - проверим ...

[Admin]

Проверьте, по идее не получится вывести номер релиз а вин10, а вин11 будет определяться как вин10. Если так, то это оно.

Для Window 11 (22H2) Сборка 25252.1010 выдает:
Windows 8 64 bits x64

[Игорь Столяров]

Для Window 11 (22H2) Сборка 25252

А SYSTEM {PROP:WindowsVersion,9} выдаёт 15 ?
Если да - то можно просто вручную обработать следующую версию Windows.
На момент выпуска Clarion 11 ещё не существовало Windows 11 ...

[Admin]

SYSTEM {PROP:WindowsVersion,9}

SYSTEM {PROP:WindowsVersion,9} = 12