Applescript archivieren von E-Mails in Mail.app

Schreiben brauche ich ein Applescript für Mail.app, die alle Nachrichten in meinem Posteingang und Gesendete Nachrichten, die älter als eine bestimmte Anzahl von Tagen, und verschieben Sie Sie in den jeweiligen Ordnern "Auf Meinem Mac", oder "lokale Ordner".

Der Grund dafür, dass mein IMAP-Konto hat einen 120 Tage-Kontingent zu begrenzen, und ich würde eher zu automatisieren "Archivierung" meine E-Mail in einen lokalen Ordner anstatt es manuell zu tun.

InformationsquelleAutor churnd | 2009-11-12
  1. 0

    Was haben Sie bisher ausprobiert? Ihre Frage ist sehr breit. Das folgende sollte Ihnen den Einstieg:

    property secondsIn120Days : 10368000

tell application "Mail"

    set theInbox to inbox

    set dateToday to current date

    set firstMessage to 1
    set lastMessage to (get count of messages in theInbox)

    repeat with thisMessage from lastMessage to firstMessage by -1
        set currentMessage to message thisMessage of theInbox
        set messageDate to date received of currentMessage

        set timeDifference to dateToday - messageDate

        if timeDifference ≥ secondsIn120Days then

            (* In answer to your comment, any folder you create to archive
            messages is going to be in the "On My Mac" directory. But say you
             create a Smart Mailbox called "Mail Archive"  then all you should 
            need are these lines... *)

            set archiveMailbox to (mailbox ("Mail Archive" as string))
            move currentMessage to archiveMailbox

        end if
    end repeat
end tell

    UPDATE: Hinzugefügt: Antwort auf die Kommentare im code.

    • Ich habe gesehen, wie diese: doughellmann.com/projects/MailArchiveByDate. Grundsätzlich will ich tun, aber ohne zu kategorisieren Sie nach Monat. Ich will es einfach nur in einem Ordner der obersten Ebene.
    • Alle Ordner, die Sie erstellen, um die Archivierung von Nachrichten in die "On My Mac" - Verzeichnis. Aber sagen Sie, dass Sie erstellen Sie ein Intelligentes Postfach namens "Mail-Archiv" dann alles, was Sie benötigen sollten, sind diese Linien... "Gesetzt archiveMailbox zu (Postfach ("Mail-Archiv" als string)) \r bewegen currentMessage zu archiveMailbox" Finden Sie in den aktualisierten code von oben für die richtige Formatierung.
    InformationsquelleAutor Philip Regan
Schreibe einen Kommentar