-- summary: creates outgoing message, saves it to out box
-- freeFormName: recipients Real Name (string)
-- emailAddress: a valid SMTP address (string)
-- theSubject: the subject of your message (string)
-- theBody: the body of your message (string)
on createEmailerMessage(freeFormName, emailAddress, ¬ theSubject, theBody)
tell application "Claris Emailer Lite 1.1v4"
	create mail subject theSubject ¬
		body theBody ¬
		recipients {name:freeFormName, ¬ address:emailAddress, type:1} ¬
		with save
end tell
end createEmailerMessage