Posted at


More than 1 year has passed since last update.


set theToAddress to ""

set theSubject to "メールタイトル"
set theBody to "メール本文"

tell application "Mail"
-- メール作成
set newMessage to make new outgoing message with properties {subject:theSubject, content:theBody}

tell newMessage
make new to recipient at end of to recipients with properties {address:theToAddress}

end tell
end tell