Outlook Aufgaben exportieren

[R2D2]

Hallo!

Ich möchte aus Oulook die Aufgaben exportieren. Für Termine, Kontakte gibt es z.B. im Swiss-Delphi-Center Quellcode. Allerdings habe ich nirgendwo etwas für Aufgaben gefunden.

Kann mir jemand helfen?

Danke!

[Boombuler]

Hi jo ich kann dir helfen ;)

Hier ist mal Beispiel Code der dir alle Subjects ausgibt... sollte er zumindest wenn ich nix vergessen hab ;)

Delphi-Quellcode:

  
uses Variants;

procedure ShowAllAfgs;
var
  Journals           : OleVariant;
  ItemColl           : OleVariant;
  aJournal           : OleVariant;
  OutlookApplication : OleVariant;
  iCnt               : Integer;
begin
  OutlookApplication := CreateOleObject('Outlook.Application');
  DefNameSpace := OutlookApplication.GetNamespace('MAPI');
  Journals := DefNameSpace.GetDefaultFolder(olFolderTasks);
  ItemColl := Journals.Items;
  for iCnt := 1 to ItemColl.Count do
  begin
    aJournal := ItemColl.Item(iCnt);
    ShowMessage(aJournal.Subject);
  end;
end;

Wenn noch fragen sind...

PS: Schöner gehts natürlich per MAPI hat aber auch seine Nachteile!

Greetz
Boombuler

[R2D2]

Bei mir kommen Fehlermeldungen

Zitat:

Undefinierter Bezeichner: DefNameSpace

und

Zitat:

Undefinierter Bezeichner: olFolderTasks

Als was muss ich die deklarieren?

[R2D2]

OK.
Habe DefNameSpace als ole deklariert. Den olFolderTasks habe ich hier gefunden. Der Code jetzt:

Delphi-Quellcode:

procedure TDeskBar.Button1Click(Sender: TObject);
var
  Journals           : OleVariant;
  ItemColl           : OleVariant;
  aJournal           : OleVariant;
  OutlookApplication : OleVariant;
  iCnt               : Integer;
  DefNameSpace       : OleVariant;
begin
  OutlookApplication := CreateOleObject('Outlook.Application');
  DefNameSpace := OutlookApplication.GetNamespace('MAPI');
  Journals := DefNameSpace.GetDefaultFolder($0000000D);
  ItemColl := Journals.Items;
  for iCnt := 1 to ItemColl.Count do
  begin
    aJournal := ItemColl.Item(iCnt);
    ShowMessage(aJournal.Subject);
  end;
end;

So läuft es.

Vielen Dank! :-D

[R2D2]

Nochmal eine Frage:

Was für properties hat aJournal eigentlich noch auser subject?

Eine Liste wäre hilfreich...

[R2D2]

Zitat:

Zitat von Boombuler

Hi jo ich kann dir helfen ;)

Gibt es da wirklich keine Liste?