Alle Mailboxen auflisten, die ein Benutzer in Outlook geladen hat

Question

Ich versuche, die freigegebenen Mailboxen eines Benutzers aufzulisten. Wir haben eine gemischte Umgebung, sodass einige automatisch über Exchange zugeordnet werden und einige nicht (Sicherheitsgruppenberechtigungen). Ich möchte ein Powershell-Skript zum Anmeldevorgang hinzufügen, um alle Postfächer aufzuzeichnen, die ein Benutzer in Outlook geladen hat. Ich möchte diese Liste in eine Textdatei oder CSV speichern.

Ich bin in der Lage, die Namen durch $outlook.getnamespace("mapi") zu bekommen. Einige Namen haben sich jedoch geändert, und das Outlook des Benutzers zeigt diese Änderungen nicht an, daher bedeutet dieser Name nichts, wenn er bei Exchange oder AD ausgelöst wird, funktioniert jedoch irgendwie immer noch magisch.

Ich brauche etwas konkreter, samaccountname oder SMTP-Adresse .. so etwas.

EDIT

Ich habe in diesem weiter arbeiten, und mit Hilfe von MFCMAPI Ich konnte ich die PR_USER_NAME Eigenschaft benötigen, um zu bestimmen. Ich muss dies mit Vanille Powershell tun, um auf einem Klientensystem zu laufen (und ich habe Tausende, also ist das Installieren von EMS keine Wahl).

Answer 1

Verwendung Namespace.Stores Sammlung. MFCMAPI zeigt MAPI-Objekte an, auf die Sie in PS nicht zugreifen können. Verwenden Sie OutlookSpy (um MAPI- und OOM-Objekte anzuzeigen), um live Outlook Object Model Objekte anzuzeigen.

UPDATE: Wenn Redemption eine Option ist, können Sie RDOExchangeMailbox verwenden. Owner Eigenschaft:

skPstAnsi = 1 
    skPstUnicode = 2 
    skPrimaryExchangeMailbox = 3 
    skDelegateExchangeMailbox = 4 
    skPublicFolders = 5 
    set Session = CreateObject("Redemption.RDOSession") 
    Session.MAPIOBJECT = Application.Session.MAPIOBJECT 
    for each Store in Session.Stores 
    'for i = 1 to Session.Stores.Count 
    'set Store = Session.Stores(i) 
    Debug.Print Store.Name 
    If (Store.StoreKind = skPrimaryExchangeMailbox) or (Store.StoreKind = skDelegateExchangeMailbox) Then 
     Debug.Print Store.Owner.SmtpAddress 
    End If 
    Debug.Print " ------ " 
    next