SQLRU.net
Разработка приложений баз данных

Начало » Программирование » Delphi » Отправка почты при запущенном Outlook'е (Отправка почты при запущенном Outlook'е)
Отправка почты при запущенном Outlook'е [сообщение #2675] Fri, 30 June 2023 11:53 Переход к следующему сообщению
SergeyKNP в настоящее время не в онлайне  SergeyKNP
Сообщений: 82
Зарегистрирован: October 2022
Member
Привет всем.

Винда 11
XE11.3

перестала отправляться почта через Outlook если он запущен.
если Outlook закрыт - всё ок

при открытом Outlook получаю ошибку
Outlook := GetActiveOleObject('Outlook.Application');

Заранее благодарен
Re: Отправка почты при запущенном Outlook'е [сообщение #2677 является ответом на сообщение #2675] Fri, 30 June 2023 15:05 Переход к предыдущему сообщениюПереход к следующему сообщению
МП в настоящее время не в онлайне  МП
Сообщений: 881
Зарегистрирован: August 2022
Географическое положение: бурятский тун...
Senior Member
EOleSysError?

перехватывай ошибку и вызывай CreateOleObject()
Re: Отправка почты при запущенном Outlook'е [сообщение #2682 является ответом на сообщение #2677] Fri, 30 June 2023 16:32 Переход к предыдущему сообщению
SergeyKNP в настоящее время не в онлайне  SergeyKNP
Сообщений: 82
Зарегистрирован: October 2022
Member
Я так и делаю

try
mOutlook := GetActiveOleObject('Outlook.Application');
except
mOutlook := CreateOleObject('Outlook.Application');
end;

но на CreateOleObject('Outlook.Application'); появляется сообщение об ошибке

Предыдущая тема: И снова про FireDac - он обзавелся ИИ?
Следующая тема: Как узнать почтовый ящик который основной
Переход к форуму:
  


Текущее время: Fri Nov 01 02:52:38 GMT+3 2024

Общее время, затраченное на создание страницы: 0.00752 секунд