none
PST Einbindung per Skript aufheben RRS feed

  • Frage

  • Hallo,
    ich nutze zum aufheben der Einbindung der PST's in Outlook 2010 folgendes Startkript (Benutzer):

    On Error Resume Next
    Dim objOutlook 'As Outlook.Application
    Dim Stores     'As Outlook.Stores
    Dim objFolder  'As Outlook.Folder
    Dim i          'As Integer
     
    Set objOutlook = CreateObject("Outlook.Application")
    Set Stores = objOutlook.Session.Stores
     
     
    For i =  Stores.Count to 0 step -1
     
    If Stores(i).ExchangeStoreType = 3 Then
       Set objFolder = Stores(i).GetRootFolder
       objOutlook.Session.RemoveStore objFolder
     Else
    End If
     
    Next

    Bei meinen Tests mit lokal angelegten PST's hat das auch funktioniert.
    Aber bei PST's auf Netzlaufwerken nicht.
    Jemand eine Idee oder eine bessere Lösung um die Einbindung in OL aufzuheben?

    Vielen Dank
    Dennis

    Dienstag, 4. April 2017 11:11

Antworten

Alle Antworten