Thanks Madam, A little more confusion. As You told that I have to wait until ABC.DBF is copied. But there is not just one file ABC.DBF there are several other. So need to Wait for until my entire directory is being copied.
Is there any way that I could halt my next execution until the entire folder is being copied.
Harsh
>>Using the Following code, I am copying One Folder from Source to Destination Folder.
>>
>>LOCAL oShell, oSrcFolder, oDstFolder
>>CreateDirectory('&Destinationfolder',0)
>>oShell = CREATEOBJECT("Shell.Application")
>>oSrcFolder = oShell.NameSpace('&sDirectory')
>>oDstFolder = oShell.NameSpace('&Destinationfolder')
>>
>>IF VARTYPE(oDstFolder)="O" AND VARTYPE(oSrcFolder.Items)="O"
>> oDstFolder.CopyHere(oSrcFolder.Items)
>>ENDIF
>>****************
>>
>>*Afterwards, I am Using
>>
>>Set Default to ('&Destinationfolder')
>>Use ABC.DBF
>>
>>MY problem is while the copying process is Not yet completed the my next commands i,e Set Default to ('&Destinationfolder')
>> & Use ABC.DBF are executed and an error ABC.DBF does not exist is generated.
>
>First, you don't need the quotes and the macro in SET DEFAULT:
>
>
>Set Default to (Destinationfolder)
>
>
>Second, sounds like you need a loop to wait until the table exists:
>
>
>DO WHILE NOT FILE('ABC.DBF')
> DOEVENTS
>ENDDO
>
>
>Tamar
Harsh