Hi Yves, This is the short version of the AppleScript I use:
set mailText to "****" set thisSubject to "Test E-Mail" set thisEmail to "[email protected]" using terms from application "Mail" tell application "Mail" set theAccount to "Name of Your Mail Account" set theNewMessage to make new outgoing message with properties {account:theAccount, subject:thisSubject, content:mailText, visible:false} tell theNewMessage make new to recipient at end with properties {address:thisEmail} set sender to "Your Name <[email protected]>" end tell send theNewMessage end tell end using terms from and this is a LiveCode script, assuming that the AppleScript is in a field (normally I'd use a property) and the body text is also in a field: on mouseUp put fld "AppleScript" into myAppleScript put fld "Body Text" into myBodyText replace quote with backslash & quote in myBodyText replace cr with backslash & "n" in myBodyText replace "****" with myBodyText in myAppleScript do myAppleScript as AppleScript put the result into rslt if rslt is not empty then beep answer error rslt end if end mouseUp Careful: if you run this script, it *will* send an e-mail. -- Best regards, Mark Schonewille Economy-x-Talk Consulting and Software Engineering Homepage: http://economy-x-talk.com Twitter: http://twitter.com/xtalkprogrammer KvK: 50277553 Use Color Converter to convert CMYK, RGB, RAL, XYZ, H.Lab and other colour spaces. http://www.color-converter.com We have time for new software development projects. Contact me for a quote. On 14 aug 2013, at 10:30, Yves COPPE wrote: > Hi, > > thanks for the good idea; the text appears without html flags > but … as plain text, not formatted, without returns, bold text, … > > no any other idea ? > _______________________________________________ use-livecode mailing list [email protected] Please visit this url to subscribe, unsubscribe and manage your subscription preferences: http://lists.runrev.com/mailman/listinfo/use-livecode
