Re: Would like a script Enables to ask me if I want to "flag& set reminders" a new message I am about to send

[Allen Watson]

Title: Re: Would like a script Enables to ask me if I want to "flag & set reminders" a new message I am about to send

On or near 5/19/02 2:51 AM, SVEN AERTS at [EMAIL PROTECTED] observed:

> Ok, I understand, but,Diane, then you still have to go to the 'sent
> folder'-sometimes I forget-click the message,key combination you mention,
> write something intelligent in it,
> Wouldn't it be great if you could already do that when composing the
> message? I believe in outlook you have such a button in the 'new message'
> menu/ruler.
> Is it possible to have such a button added in the new message ruler ?

The answer to that is, it is up to Microsoft. As users, we can't modify the toolbar/ruler. It seems to make sense,  actually. I can't think of any real reason why it could NOT be placed there. If you can flag a message with Cmd-' and create a linked task with Cmd-shift-' there should be no reason that you can't do both at once. The question is, how important do they think this would be to users?

The message menu has an item, Flag for Follow-up (Cmd-Shift-') that is greyed out. So actually, Diane's advice does not work for unsent draft messages! However, there is a script called "Create Task from Message"; I think it comes with the installer. It fails on a draft message saying it can't get the subject, but if you save the message first, you can run the script and it works fine. It would be fairly trivial to modify this script to also set the flag, and you could then assign a keystroke to the script with a suffix. I enclose the script; copy to Script Editor, save into the Entourage Script Menu Items folder, and you have it. Assign a shortcut of control-option-F by adding the suffix "\coF" to the file name of the script.

tell application "Microsoft Entourage"
    if class of the front window is draft window then
        set m to save the front window
    end if
    -- get the currently selected message or messages
    set selectedMessages to current messages
    -- if there are no messages selected, warn the user and then quit
    if selectedMessages is {} then
        display dialog "Please select a message first and then run this script." with icon 1
        return
    end if
    repeat with theMessage in selectedMessages
        -- get the information from the message, and store it in variables
        tell theMessage
            set {theName, theCategory, thePriority, theContent} to {subject, category of theMessage, priority, content}
            set theName to "FO:" & theName
            set flagged to true
        end tell
        -- create a new task with the information from the message
        set newTask to make new task with properties {name:theName, content:theContent, category:theCategory, priority:thePriority}
        -- create a link between the message and the new task
        link theMessage to newTask
    end repeat
    -- if there was only one message selected, then open that new task
    if (count of selectedMessages) = 1 then open newTask
end tell

--
My web page: <http://home.earthlink.net/~allenwatson/>
My scripts page: <http:homepage.mac.com/allenwatson>
Microsoft MVP for Mac Entourage/Word--<[EMAIL PROTECTED]>