Mailsmith
Other ProgramsScriptsMailsmith.scptArchive to sub-mailboxCheck SpellingFind replyChange font sizeSubmit Script to JEMFix common spelling errorsSetting SMTP serverURL from SafariAddress from ABlinkMungeExport to Address BookSaving attachmentsDigest ScriptFile with samePOP window positionPosition of new windowsiCal and MailsmithEdit From LineModified Thread ScriptReply to SelectionTemporary Text WindowCompact gainTracking backupsEdit subjectGooglerAuto-rewrapMMASMTP serverOpen, fetch, and closeURL ManagerBrainForestThread by AuthorThread by subjectExport EmailGet SelectionRead AddressesExport EmailOrganize EmailAccount setupMailsmith 2 BBEditBBEdit 2 MailsmithSearch IICheck OneDelete EnclosureOpen, fetch, closeSet AnsweredSet RedirectedEmpty TrashList foundPrint SeveralDel. old. msg.Delete EnclosuresAccountsAddress BookEditingFiltersGeneralImport/ExportLinksMailboxesMemoryScriptingSpeedsend/receiveTips/TricksGetting URL from Safari | ||||
|
||||
|
What is this? I often want to send the URL of the page I'm viewing to a colleague. Here's a script that does that with Safari. It's pretty simple, but effective. While browsing, I just switch to Mailsmith when I want to send a URL and run this script from the Scripts Palette. |
||||
tell application "Safari"
set SubjectText to name of window 1
set URLtext to URL of document 1
end tell
tell application "Mailsmith 1.5"
activate
set mymail to make new message window
tell mymail
set subject to SubjectText
set the contents to URLtext
end tell
end tell