DI RECENTE ACCOMAZZI...
CERCA
» Ricerca avanzata
MAILING LIST

Se vuoi iscriverti alla mailing list di Luca Accomazzi inserisci qui la tua mail:

Vuoi ricevere i messaggi immediatamente (50 invii / giorno) o in differita e in gruppo
(due invii / giorno)?

» Vuoi saperne di più?

A domanda rispondo - sezione Macintosh

Archiviazione da Outlook o Entourage

Ho necessità di esportare e catalogare di un qualche centinaio di messaggi
di posta inviata ma non mi interessa il corpo o gli attachment ma solo
quella "riga" che vedo aprendo (in outlook express) la cartella della
posta spedita , mittente, oggetto, data, destinatario ecc. in formato txt o
xls. Qualcuno ha qualche dritta?

Stefano Boccuzzi

Questo AppleScript dovrebbe fare al caso tuo:
<pre>
on Scandisci(qualeFolder, qualePrefisso)
tell application "Microsoft Outlook Express"
set numMessages to (count messages of qualeFolder)
set nomeMailbox to qualePrefisso & name of qualeFolder
set numSubfolders to (count folders of qualeFolder)

repeat with j from 1 to numMessages
tell message j of qualeFolder
set subject1 to subject
set sender1 to my FormatAddress(sender)
set date1 to time sent as string
set receiver1 to (address of recipient 1)
end tell
-- qui fai quello che vuoi con le informazioni:
-- stampale, salvale su file...
end repeat

repeat with i from 1 to numSubfolders
set unFolder to (a reference to folder i of qualeFolder)
my Scandisci(unFolder, nomeMailbox & ":")
end repeat
end tell
end Scandisci

tell application "Microsoft Outlook Express"
set numMailbox to (count folders)
set archiveThem to true

repeat with i from 1 to numMailbox
set unFolder to (a reference to folder i)
my Scandisci(unFolder, "")
end repeat
end tell
</pre>

Puoi anche dare una occhiata a Version tracker e cercare qualche applicativo pronto:

http://www.versiontracker.com