Outlook Einen anderen Kontakt Ordner auswählen

[RaMa]

Hallo alle miteinander.
Ich habe ein kleines Problem mit Outlook.
Ich versuche mit Delphi 5 und den Outlook Komponenten
auf den Ordner Kontakte zuzugreifen. Wenn es sich um
meinen Ordner handelt bzw. um den Ordner in meinem
Postfach funktioniert das auch ganz gut.
Ich habe hierzu das Beispiel von Herr Kosch genommen.
Doch ich muss auf einen Kontakte Ordner unter
Alle öffentlichen Ordner zugreifen.
Wenn ich folgende Code Zeile eingebe, komme ich da auch hin.

OutlookApplication1.Connect;

DefNameSpace := OutlookApplication1.GetNamespace('MAPI');

Contacts := OutlookApplication1.ActiveExplorer.
CurrentFolder.Folders.Item('EDV-Kontakte');

ItemCol := Contacts.Items;

Das ganze funktioniert aber nur, wenn ich im Outlook den Alle öffentlichen
Ordner schon vorher mit der Maus angewählt bzw. aktiviert habe.
Und das ist mein Problem. Ich möchte in diesen Ordner wechseln, egal
was im Outlook gerade aktiviert ist.
Kann mir da jemand helfen ?
Der Baum sieht so aus :
Öffentliche Ordner
Alle Öffentliche Ordner
EDV-Kontakte

Danke im Voraus