Here is a SuperCard script that does this:
on mouseUp
put "set theMessage to " & quote & "This is the message body" & quote &
return after s
put "set theSubject to " & quote & "Message from SuperCard" & quote &
return after s
put "set theName to " & quote & "George Henne" & quote & return after s
put "set theEmail to " & quote & "[EMAIL PROTECTED]" & quote & return after s
put "tell application " & quote & "PowerMail" & quote & return after s
put "set msg to make new message with properties {subject:theSubject,
recipient:{{address:{display name:theName, email address:theEmail},
recipient type:to recipient}}, content:theMessage}" & return after s
put "send msg " & return after s
put "end tell" & return after s
do script(do,Applescript,s)
end mouseUp
>I'd like to create an email message in another app that can be sent out
>by PowerMail.
>
>Does anyone have a sample script for this? I'm using SuperCard, but a
>script for another app could probably be adapted.
>
