Re: Can anyone get Swap Addresses script to work?

[Allen Watson]

Title: Re: Can anyone get Swap Addresses script to work?

On or near 5/27/02 8:33 PM, Donald Chin at [EMAIL PROTECTED] observed:

Hi,

It doesn’t report any error. The script just doesn’t move the addresses around.  May be you can send me the script you use and I can compare it to the one I have.

Donald

Quoting Entourage:mac Talk:

> I am trying to get the Microsoft supplied script "Swap Work and Home
> Addresses" to work. It works in Entourage 2001, but it doesn't work in
> Entourage V.x. Can anyone suggest a modification to the script so it can
> work?

It works fine for me in X. What error are you getting?

Works for me in X. Here's the entire script:

-- Swap Work and Home Addresses
-- © Microsoft Corporation, 2000. All rights reserved.

tell application "Microsoft Entourage"
    set theItems to selection
   repeat with i in the theItems
       if class of i is contact then
           set StartAddress to the (home address of i)
            set DestinationAddress to the (business address of i)
            set the home address of i to DestinationAddress
           set the business address of i to StartAddress
       end if
   end repeat
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]>