Submit Hint Search The Forums LinksStatsPollsHeadlinesRSS
14,000 hints and counting!


Summarize | 20 comments | Create New Account
Click here to return to the 'Summarize' hint
The following comments are owned by whoever posted them. This site is not responsible for what they say.
Summarize
Authored by: Brontojoris on May 27, '03 11:05:40AM

This version will get Summarize the webpage text too.

tell application "Safari"
ignoring case
set theURL to URL of front document
set theTitle to name of front window
set theText to text of front document
set theDocSummary to summarize theText in 4
end ignoring
end tell

tell application "Mail"
set accountAddresses to (email addresses of first account)
set fromAddress to first item of accountAddresses
set theMessage to make new outgoing message
set visible of theMessage to true
set subject of theMessage to theTitle
set content of theMessage to theDocSummary & "

" & theURL
activate
end tell



[ Reply to This | # ]