OK, ich habe dies mit SmartPST (Freeware) und AutoIT (Freeware) erreicht.
Mit SmartPST kann ich PST-Dateien in meinem Outlook-Profil hinzufügen. Drag & Drop
Das folgende AutoIT-Skript, das ich ausgegraben habe, durchläuft die einzelnen und komprimiert. Führen Sie es in einer VM aus, um Ihre aktuelle Arbeit nicht zu vermeiden.
Das war das Beste, was ich mir wünschen konnte. Ein Drag & Drop und klicken Sie auf Lösung. :) IT Automation wird nicht besser.
#include <GUIListView.au3> SplashTextOn("Compacting now", "This may take hours...", 250, 40) ;//Runs the mail application that is in control panel. $Path = FileGetShortName(RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Control Panel\Cpls", "mlcfg32.cpl")) Run(@SystemDir & "\control.exe " & $Path) Opt("WinTitleMatchMode", 4) WinWait("Mail Setup - Outlook", "Setup e-mail accounts and dire") ControlClick("Mail Setup - Outlook", "Setup e-mail accounts and dire", "Button2") WinWait("Account Settings", "AcctMgr Tab") ;//Gets list of data files listed $sTitle = "Account Settings" $hWnd = WinGetHandle($sTitle) If @error Then MsgBox(0, "Error", "Unable to find window") EndIf WinActivate($hWnd) $hlist = ControlGetHandle($hWnd, "", "[CLASS:SysListView32; INSTANCE:2]") If @error Then Exit $arraycount = _GUICtrlListView_GetItemCount($hlist) Local $ltext[$arraycount] $i = 0 Do $ltext[$i] = _GUICtrlListView_GetItemText($hlist, $i) $i = $i + 1 Until $i = $arraycount ;//Goes into each listed Data file and compresses them $b = 0 Do _GUICtrlListView_ClickItem($hlist, $b, "left", False, 2) Sleep(1000) WinWaitActive("Outlook Data File") ControlClick("Outlook Data File", "", "[CLASS:Button; INSTANCE:2]") ; click Compact Now Sleep(1200) If WinExists("Compact Now") Then WinWaitClose("Compact Now") WinClose("Outlook Data File") $b = $b + 1 Until $b = $arraycount WinClose("Outlook Data Files") WinClose("Account Settings") WinClose("Mail Setup - Outlook") SplashOff() MsgBox(64, "Outlook", "All accounts were processed." & @CRLF & "Closing in 5 seconds...", 5) Exit