Как работать с Outlook - ом в Delphi?

Модераторы: Duncon, Naeel Maqsudov, Игорь Акопян, Хыиуду

Ответить
Nikolay
Сообщения: 1
Зарегистрирован: 11 фев 2005, 15:02

11 фев 2005, 15:07

Мне нужно выгрузить вложенные файлы из присланых сообщений. Подскажите кто знает.
Аватара пользователя
Naeel Maqsudov
Сообщения: 2551
Зарегистрирован: 20 фев 2004, 19:17
Откуда: Moscow, Russia
Контактная информация:

16 фев 2005, 18:49

Если речь идет об OutLook из MsOffice (а не OutLookExpress), то я думаю можно это сделать средствами VBA. Устанавливаем справку по VBA для OutLook пишем макрос из любого офисного приложения. Перевести этот макрос на Delphi не составит труда (если это еще будет нужно).

Т.е. надо смотреть объектную модель Outlook-а.
YurikGL
Сообщения: 142
Зарегистрирован: 16 фев 2005, 21:54
Откуда: Уфа
Контактная информация:

16 фев 2005, 22:01

Попробуй в яндексе или гугле набрать "ole delphi outlook"
Seat
Сообщения: 1
Зарегистрирован: 10 апр 2005, 20:38
Откуда: Иркутск

10 апр 2005, 20:53

Обработчик события получения новой почты
procedure TDTExtensibility2.NewMailex(EntryIDCollection: WideString);
var
NS: NameSpace;
FLD: MAPIFolder;
MI: MailItem;
i: Integer;
begin
NS:= Host.GetNamespace('MAPI');
FLD:= NS.GetDefaultFolder(olFolderInbox);
MI:= (NS.GetItemFromID(EntryIDCollection,FLD.StoreID) as MailItem);
for i:=1 to MI.Attachments.Count do
MI.Attachments.Item(i).SaveAsFile(MI.Attachments.Item(i).FileName);
......
end;
Ответить