>Try this VB code. It displays everything like Windows while copying files. This code can be transformed to VFP.
>
>

<i>
>cDestin = "c:\test\"
>cSource = "c:\data\Examples.dbf"
>winShell = CreateObject("Shell.Application")
>winShell.NameSpace(cDestin).CopyHere cSource
></i>

Nevermind last message, got it working by a little trial & error. The last line should be:

winShell.NameSpace(cDestin).CopyHere(cSource)

But it works great! Thanks much, Igor.