set theAccount to "kiel"
set theSubject to "test the script"
set theAddress to "email@hidden"
set fileName to "coso"
set fileExtension to ".jpg"
set theAttachment1 to fileName & fileExtension
set theAttachment to (((path to desktop) as string) & theAttachment1)
as alias
tell application "Mail"
activate
set newMessage to make new outgoing message with properties
{account:theAccount, subject:theSubject, content:theData}
tell newMessage
make new to recipient at end of to recipients with properties
{address:theAddress}
--set visible to false
tell content
make new attachment with properties {file name:theAttachment} at
after the last paragraph
end tell
end tell
send newMessage
end tell
this is a dog
_______________________________________________
Do not post admin requests to the list. They will be ignored.
Applescript-studio mailing list (email@hidden)
Help/Unsubscribe/Update your Subscription:
http://lists.apple.com/mailman/options/applescript-studio/email@hidden
This email sent to email@hidden