Estrarre allegati da outlook 2003

[fungo]

Ciao a tutti, volevo sapere se esiste un programma che permette di estrarre gli alleggati dalle email di microsoft outlook.
MI hanno inviato 163 messaggi con alleggati in PDF
Non sono riuscito a trovare nulla che fa al caso mio. Qualcuno conosce qualche programma che estrae da un archio pst solo gli allegati ?

Grazie

[loop]

Originariamente inviato da fungo
.... estrae da un archio pst solo gli allegati ?....

Che vuol dire?


Estrarre gli allegati di solito basta cliccare sugli allegati e fare salva tutto

[nicola75ss]

Apri l'editor vba di outlook e incolla questa macro:

Sub scarica_tutti_allegati()
Const olFolderInbox = 6
    Dim olkApp As Object, _
        olkInbox As Object, _
        olkItem As Object, _
        olkAttach As Object
    Set olkApp = CreateObject("Outlook.Application")
    Set olkInbox = olkApp.Session.GetDefaultFolder(olFolderInbox)

For Each olkItem In olkInbox.Items
If olkItem.Attachments.Count > 0 Then
For Each olkAttach In olkItem.Attachments
olkAttach.SaveAsFile "C:\tuo_percorso\" & olkAttach.FileName
Next
End If
Next
End Sub

Devi solo modificare la riga in cui specifichi la cartella in cui verranno salvati tutti gli allegati.