Re: Contact to task doesn't work

[Allen Watson]

Title: Re: Contact to task doesn't work

On or near 8/8/04 9:12 AM, Paul Berkowitz at [EMAIL PROTECTED] observed:

> On 8/8/04 8:11 AM, "Richard Shane" <[EMAIL PROTECTED]> wrote:
>
>> Just installed Office 2004. In contact page, I select a contact, click
>> apple-option-T to use applescript to create new task. Get error message “You
>> must select just one contact in the address book.” In Ent X, those key
>> strokes
>> worked. What do I need to do? Thanks.
>
> There's no such built-in command - take a look at your menus from Entourage
> through Help. Yet you did get a result - an odd error message. What could
> this be? (I get absolutely nothing with that key combination.) Don't you
> think it just might be a script? I think you use some scripts, don't you?
> And scripts can have keyboard combos. So look in your Script menu for any
> menu item (script name) that has the key shortcut ââT. I wouldn't be
> surprised if it was called something like "Make Task from Contact" or
> "Create Task from Contact". (It's not one of mine, unless maybe something
> sent to the list here which I forgot about.) It's most likely by Barry or
> Allen, but could be by anyone. I don't think it's one of those that came
> with Entourage like "Make Task from Message".
>
> In any case when you find it in your list of scripts, hold down Option key
> as you select it. That will open it up in Script Editor. There you should
> see at the top the name and hopefully the email address of the person who
> wrote the script. Send that person an email asking them to fix it, or what
> you should do.
>
The script is called "New Task from contact". I don't know who wrote it, but I recognized the error message.

Richard, you probably had a contact record OPEN instead of selecting a contact in the Address Book list; that would result in the error you saw. I've modified the script so it will handle that situation; copy and paste the following into the script (replacing the entire script) after you locate it as Paul suggests:

--New Task (or event) from selected contact; assign to kbd shortcut
tell application "Microsoft Entourage"
    set windowClass to class of the front window
    if windowClass = contact window then
        set theSelection to {displayed feature of the front window}
    else
        try
            set theSelection to get selection -- may be none
            if class of theSelection ≠ list or (count theSelection) ≠ 1 or class of item 1 of theSelection ≠ contact then error number -128
        on error
            beep
            display dialog "You must select just one contact in the address book." buttons {"OK"} default button "OK" with icon 2
            return
        end try
    end if
    activate
    set theContact to item 1 of theSelection
    set theName to name of theContact
    if theName = "" then set theName to company of theSelection
    set n to make new task with properties {name:theName} -- or event
    link n to theContact
    open n
end tell
--------