649 iPhone_iPad_Mac_apple

Save Mail attachments to a folder

I modified a published script and it used to work, but it's no longer working in Sierra.

using terms from application "Mail"

on perform mail action with messages theMessages for rule theRule

-- set up the attachment folder path

tell application "Finder"

set folderName to "Dropbox/ GPX daily logs/2017 MotionX"

set homePath to (path to home folder as text) as text

set attachmentsFolder to (homePath & folderName) as text

end tell

Latest version of Sierra.

tell application "Mail"

repeat with eachMessage in theMessages

--set the sub folder for the attachments to the senders mail address.

-- All future attachments from this sender will the be put here.

-- set subFolder to (sender of eachMessage)

-- set up the folder name for this mail message's attachments. We use the time stamp of the date received time stamp

set {year:y, month:m, day:d, hours:h, minutes:min} to eachMessage's date received

---set timeStamp to (y & "-" & my pad(d) & "-" & my pad(m as integer) & "_" & my pad(h) & "-" & my pad(min)) as string -- month as number

set timeStamp to (y & "_" & my pad(d) & "-" & m & "_" & my pad(h) & "-" & my pad(min)) as string

try

-- Save the attachment

repeat with theAttachment in eachMessage's mail attachments

set originalName to timeStamp & "_" & name of theAttachment

set savePath to attachmentsFolder & ":" & originalName

try

save theAttachment in file (savePath)

end try

end repeat

on error msg

display dialog msg

end try

end repeat

end tell

end perform mail action with messages

end using terms from

on pad(n)

return text -2 thru -1 of ("0" & n)

end pad

OP here. But I think the problem is that I used a slash instead of a colon for the path separator.

最後更新：2017-08-23 00:44:35