Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Win32/Win64 API (native code) (https://www.delphipraxis.net/17-win32-win64-api-native-code/)
-   -   Outlook msg-file parsen (https://www.delphipraxis.net/179305-outlook-msg-file-parsen.html)

Gerd01 25. Feb 2014 18:23

Outlook msg-file parsen
 
Hat jemand eine Idee, wie man eine Mail im msg-Format von Outlook parsen kann? Am besten wenn man den Quelltext der empfangenen Mail aus dem msg-file bekommen könnte.

Soweit bin ich schon mal gekommen:
Code:
   outlook  := CreateOleObject('Outlook.Application');
    NameSpace := outlook.GetNameSpace('MAPI');
//    MailItem := outlook.CreateItem(0);
    entryID := String(Node.Data);
    folder := namespace.GetFolderFromID(entryID);
//    folder := NameSpace.GetDefaultFolder(olFolderInbox);

    I := Folder.Unreaditemcount;
    for I := 1 to folder.Unreaditemcount do
    Begin
      MailItem := Folder.Items.item(I);
      MailItem.SaveAs('C:....\outlook.txt',olMsg);
      L := lvmails.Items.Add;
      L.Caption := MailItem.Subject;
    End;
    outlook := Unassigned;
  Finally
    Screen.Cursor := crDefault;
  End;
Wobei man in MailItem.SaveAs diverse Typen eingeben kann. Hier ist der Typ für das msg-Format: olMsg.
Irgendwo habe ich mal den Typen: olRFC822 gefunden, der wäre ja wohl der Quelltext der Mail, allerdings funktioniert er heute nicht mehr.

Folgende Konstanten hierfür sind in Outlook 15 definiert:
Code:
const
  olTXT = $00000000;
  olRTF = $00000001;
  olTemplate = $00000002;
  olMSG = $00000003;
  olDoc = $00000004;
  olHTML = $00000005;
  olVCard = $00000006;
  olVCal = $00000007;
  olICal = $00000008;
  olMSGUnicode = $00000009;
  olMHTML = $0000000A;
Microsoft will sich bei Outlook wohl nicht mehr in die Karten gucken lassen.

Any idea?

Harry Stahl 25. Feb 2014 19:43

AW: Outlook msg-file parsen
 
Wenn es ein wenig kosten darf (35-75 Euro), ich verwende in meinem E-Mail Programm (Safer Mail) die Komponenten (Import/Export Suite) von dieser Seite hier:

http://www.scalabium.com/

Vorteil dabei ist, dass keine installiertes Outlook benötigt wird.

bcvs 26. Feb 2014 07:41

AW: Outlook msg-file parsen
 
Ich verwende dazu die Komponente TSMMsg, auch von scalambium.

Gerd01 26. Feb 2014 08:38

AW: Outlook msg-file parsen
 
Wo kann ich die Komponente TSMMsg auf scalambium finden?

bcvs 26. Feb 2014 09:56

AW: Outlook msg-file parsen
 
Stimmt, die ist sehr versteckt. Ich habe sie zuerst auch nicht wiedergefunden.

Auf der What's new-Seite nach unten scrollen bis April 2007. Da gibts einen Link auf SMMsg. Scheint auch nicht besonders weiterentwickelt zu werden.


Alle Zeitangaben in WEZ +1. Es ist jetzt 16:09 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz