Вниз
Скачать: CL | DM;

Outlook   Найти похожие ветки 

← →
Fill ©   (2004-11-22 16:55) [0]

Приветствую Вас Мастера!
Подскажите решение проблемки!
Пытаюсь автоматизировать работу с Outlook, с использование делфийских компонентов (вкладка Servers, компонент TDocumentItem). Как только ставлю свойство AutoConnect = True, сразу при запуске вылетает ошибка:
"class not registered" EOleSysError. Подскажите в чем проблема и как ее решить? Поиски в Инете ни к чему не привели!


← →
grigory ©   (2004-11-22 17:09) [1]

возможно присоединяться стоит вручную, либо поздним, либо ранним связывание! вот например работающий код подсоединения:

var
   AppProgID : String;
   App, NS : Variant;
   ServerRun   : Boolean;
   Result      : Hresult;
   Unknown     : IUnknown;

 AppProgID := "Outlook.Application";
 ServerRun := false;
 Result := GetActiveObject(ProgIDToClassID(AppProgID),nil,Unknown);
 if (Result=MK_E_UNAVAILABLE) then
   App := CreateOleObject(AppProgID)
 else begin
   App := GetActiveOleObject(AppProgID);
   ServerRun := true;
 end;
 NS := App.GetNamespace("MAPI");
 Contact:=NS.GetDefaultFolder(olFolderContacts);
 NS.Logon;
.............
.............
 NS.Logoff;
 if not ServerRun then App.Quit;
 App:=Unassigned;

переделай под свой объект TDocumentItem и попробуй


← →
Fill ©   (2004-11-22 17:50) [2]

У меня уже пол проги работает на ручном связывании! Тогда появляется проблема при работе с attachmend! может кто подскажет: как при получении нового письма, проверить есть ли в нем вложение, и если да, то переслать вложение в новом письме по новому адресу?


← →
Poirot ©   (2004-11-22 19:17) [3]

А пробовал свойствами играться - по типа создавать новый объект если не создан и всё такое:)свойства кома.



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.025 c
1-1123490231
W0lfX
2005-08-08 12:37
2005.08.28
Иконка для расширения


14-1123335870
lookin
2005-08-06 17:44
2005.08.28
eMule: прием vs отдача


1-1123175284
Андрей Молчанов
2005-08-04 21:08
2005.08.28
получить интерфейс IShellFolder


11-1106042777
Эдик
2005-01-18 13:06
2005.08.28
TKOLButton и image


1-1123239022
rolex
2005-08-05 14:50
2005.08.28
Как в ListView список прокрутить в самый конец?




   Наверх