Thanks
But same thing
this action cannot be completed because the other program is busy...
I have to use taskmanger to exit VFP


Peter


>>I am trying to send contact info to Outlook
>>the following program imports about 200 or so out ot 4000+ and ten hangs with
>>the 'Swich to application' ole error dialog box...
>>What am I doing wrong?
>
>> oContact=oOutlook.CreateItem(2)
>> WITH oContact
>
>Peter
>
>i have a similar routine that uses the items.add() method.
>
>

>#DEFINE olFolderContacts 10
>oOutlook = CREATEOBJECT("Outlook.APPLICATION")
>oNameSpace = oOutlook.getnamespace('MAPI')
>oContactFolder=oNameSpace.GetDefaultFolder(olFolderContacts)
>oItems = oContactFolder.items
>scan
>	oContact = oitems.add()
>	with oContact
>		etc etc
>		.save()
>	endwith
>
>endscan
>

>
>
>worth a try ?
>
>n