Einzelnen Beitrag anzeigen

medirar

Registriert seit: 4. Feb 2009
Ort: BO
24 Beiträge
 
RAD-Studio 2009 Arc
 
#4

AW: sOutlook 2010 - Mail Betreff auslesen und Anhang speichern

  Alt 2. Jan 2012, 16:56
Ich glaub ein kleinen Ansatz hab ich schon... keine Ahnung ob das funzt! Heute Abend mal probieren...

Delphi-Quellcode:
var Outlook: OLEVariant;
     MailItem: Variant;
begin
  Outlook:=GetActiveOleObject('Outlook.Application');
  MailItem := Outlook.MailItemXXX(olMailItem); //Befehl vergessen..... ;-)
  If (MailItem.Subject = 'Spesen') and (MailItem.Attachment = '*.docx') then
  Attachments.SaveAsFile(......;
end;
  Mit Zitat antworten Zitat