Applescript 将附件从邮件保存到外部高清

Question

从收到的邮件消息中，我想将附件复制到外部 HD。我正在使用脚本通过邮件规则将附件复制到用户目录，该规则在看到发件人的电子邮件地址时激活。

我尝试修改它以复制到外部高清，但据我所知它没有做任何事情。这是我修改的，我相信附件文件夹是症结所在

on perform_mail_action(ruleData)

    -- The folder to save the attachments in (must already exist)
    set attachmentsFolder to ("Macintosh HD:MegaStore:Sync:logs") as text

    -- Save in a sub-folder based on the name of the rule in Mail
    set subFolder to name of |Rule| of ruleData as text
    tell application "Finder"
        if not (exists folder subFolder of folder attachmentsFolder) then
            make new folder at attachmentsFolder with properties {name:subFolder}
        end if
    end tell

    -- Get incoming messages that match the rule
    tell application "Mail"
        set selectedMessages to |SelectedMessages| of ruleData
        repeat with theMessage in selectedMessages

            -- Get the date the message was sent
            set {year:y, month:m, day:d, hours:h, minutes:min} to theMessage's date sent
            set timeStamp to ("" & y & "-" & my pad(m as integer) & "-" & my pad(d) & "-" & my pad(h) & "-" & my pad(min))

            -- Save the attachment
            repeat with theAttachment in theMessage's mail attachments
                set originalName to name of theAttachment
                set savePath to attachmentsFolder & ":" & subFolder & ":" & timeStamp & " " & originalName
                try
                    save theAttachment in savePath
                end try
            end repeat
        end repeat
    end tell

end perform_mail_action

-- Adds leading zeros to date components
on pad(n)
    return text -2 thru -1 of ("00" & n)
end pad

Answer 1

我很确定“尝试”块正在掩盖您无法保存附件。我现在也有同样的问题，如果你取消注释“try”和“end try”行，我敢打赌你会得到一个关于在 finder 中设置访问权限的错误。我仍然坚持那个。尽管设置了完整的磁盘访问权限，但它似乎没有获得写访问权限。