Re: AppleScript to create Entourage notes from Safari?

[Allen Watson]

Title: Re: AppleScript to create Entourage notes from Safari?

On or near 11/3/03 4:44 AM, SVEN AERTS at [EMAIL PROTECTED] observed:

> Can't find it either...

I'm not sure who you are addressing here and, as usual, I can't remember whether I wrote such a script or someone else did. Anyway, here is a script that creates a note from selected text. Ah! The Script itself contains a comment identifying the author...

-- Script from a message sent by Chris Stearns
-- on Monday, January 29, 2001 6:25:59 PM


tell application "Microsoft Entourage"
    activate
    set msgs to the current messages
    set aMsg to item 1 of msgs
    set theText to ""
    
    try
        set theText to the selection
        -- trigger error if no text
        if theText is "" then
            display dialog ¬
                "This script works on text selected in a message." buttons {"OK"}
            return
        end if
    on error
        display dialog ¬
            "This script works on text selected in a message." buttons {"OK"}
        return
    end try
    
    
    try
        if theText is not "" then
            
            -- get the information from the message, and store it in variables
            set theName to subject of aMsg
            set theCategory to category of aMsg
            
            -- create a new note with the information from the message
            set newNote to make new note with properties {name:theName, category:theCategory, content:theText}
            --Optional, uncomment next line if you want the note to be open
            open newNote
        end if
    on error theErr
        display dialog theErr buttons {"OK"}
    end try
    
end tell



--
Microsoft MVP for Entourage/OE/Word (MVPs are volunteers)
Allen Watson <[EMAIL PROTECTED]> Entourage FAQ site: <http://www.entourage.mvps.org/>
AppleScripts for Outlook Express and Entourage:
 <http://members.thinkaccess.net/[EMAIL PROTECTED]/Scripts/>
Entourage Help Pages: <http://www.entourage.mvps.org/>