Move selected messages in Mail.app

guychi · October 31, 2007, 11:03am

tell application "Mail"
	set selectedMessages to the selection
	repeat with x from 1 to count of selectedMessages
		set theMessage to item x of selectedMessages
		move theMessage to mailbox "Archive"
	end repeat
end tell

StefanK · October 31, 2007, 11:13am

Hi,

or (a bit shorter):

tell application "Mail" to move (get selection) to mailbox "Archive"