I’ve amended and enhanced the code I’ll post to the Engineers. Any testers welcome, please.
tell application "Mail"
activate
try
delete mailbox "Year 2016"
delete mailbox "Year 2017"
say "Mail boxes year 2016, 2017 deleted"
end try
try
make new mailbox with properties {name:"Year 2016"}
say "Mail box Year 2016 created."
on error errmsg
say "Mail box 2016 try one failed to be created"
end try
try
make new mailbox at beginning of mailboxes of mailbox "On My Mac/Year 2016" with properties {name:"Year 2016/11"}
say "Mail box Year 2016 created, sub mailbox 11 created"
on error errmsg
say "Mail box 2016 11 try 2 failed to be created"
end try
try
make new mailbox at beginning of mailboxes of mailbox "Year 2016" with properties {name:"Year 2016/11"}
say "Mail box Year 2016 created, sub mailbox 11 created"
on error errmsg
say "Mail box 2016 11 try 3 failed to be created"
end try
try
make new mailbox at mailbox "Year 2016" with properties {name:"Year 2016/11"}
say "Mail box Year 2016 created, sub mailbox 11 created"
on error errmsg
say "Mail box 2016 11 try 4 failed to be created"
end try
try
make new mailbox with properties {name:"Year 2016/11"}
say "Mail box Year 2016 created, sub mailbox 11 created"
on error errmsg
say "Mail box 2016 11 try 5 failed to be created"
end try
try
make new mailbox at beginning of mailboxes of mailbox "Year 2016/11" with properties {"2016 11 17"}
on error errmsg
say "Mail box 2016 11 17 try 6 failed to be created"
end try
end tell
tell application "Mail"
activate
try
delete mailbox "Year 2016"
say "Mail box year 2016 deleted"
end try
try
make new mailbox with properties {name:"Year 2016/"}
say "Mail box Year 2016 with slash created."
on error errmsg
say "Mail box 2016 try 7 failed to be created"
end try
try
make new mailbox with properties {name:"Year 2016/11/"}
say "Mail box Year 2016 with slash created, sub mailbox 11 with slash created"
on error errmsg
say "Mail box 2016 11 try 8 failed to be created"
end try
try
make new mailbox with properties {name:"Year 2016/11/17/"} # FAILS
say "Mail box Year 2016 created, sub mailbox 11 created, sub mailbox 2016 11 17 with slash created"
on error errmsg
say "Mail box 2016 11 17 try 9 failed to be created"
end try
try
make new mailbox with properties {name:"Year 2017/12/17/"}
say "Mail box Year 2017 created, sub mailbox 12 created, sub mailbox 2017 12 17 with slash created"
on error errmsg
say "Mail box 2017 12 17 try 10 failed to be created"
end try
end tell
On 17 Nov 2015, at 11:46 AM, Stockly, Ed <
email@hidden> wrote:
In a quick glance it looks like you’ve got the property spec wrong.
I didn’t fix and test the other versions, but it looks the same in them.
Or, am I missing something? (Haven’t been following the thread, that closely, but I’m going to be scripting Mail this week…)
tell
application "Mail"
activate
try
--make new mailbox with properties "Year 2016” — doesn’t work
make
new
mailbox
with properties {name:"Year
2016”}— works
say "Mail box Year 2016 created."
on
error errmsg
say "Mail box 2016 try one failed to be created"
end
try
end
tell