on 11/14/01 2:57 PM, Zachary Braverman at [EMAIL PROTECTED] wrote:

> Is there a way to select an email and directly open up the sender's contact
> info window with no intervening steps?

This will only work if the message itself is selected. Others here are
probably clever enough to make one that would work under other circumstances
as well. :)

tell application "Microsoft Entourage"
    activate
    copy the selection to theSelection
    repeat with theItem in theSelection
        try
            copy address of sender of theItem to theEmailAddy
            copy (find theEmailAddy) to theContacts
            if theContacts = {} then
                display dialog theEmailAddy & ": Not in address book."
buttons "OK" default button "OK"
            else
                repeat with theContact in theContacts
                    open theContact
                end repeat
            end if
        end try
    end repeat
end tell


-- 
To unsubscribe:           <mailto:[EMAIL PROTECTED]>
To search the archives: 
          <http://www.mail-archive.com/entourage-talk%40lists.boingo.com/>

Reply via email to