You can use code from http://www.berezniker.com/content/pages/visual-foxpro/file-operations-progressbar with small modification

...
lnFlag = FOF_NOCONFIRMATION + FOF_NOCONFIRMMKDIR + FOF_NOERRORUI
* Add folloeing line
lnFlag = lnFlag + FOF_FILESONLY

lcDestinationFolder = "h:\aaa\TmpCopy"
lcSourceFolder = "h:\tmp\"
IF FileOpWithProgressbar(ADDBS(lcSourceFolder) + "*.*", lcDestinationFolder, "Copy")
  * Success
ENDIF

>
>Can someone help me with code to copy only the files between folders and not copy folders.
>
>Code below copies folders and files
>
>lcSourceFolder = cTxt2
>lcDestinationFolder = cTxt3
>
>#define OverWriteFiles .t.
>loFSO = CreateObject("Scripting.FileSystemObject")
>loFSO.CopyFolder (lcSourceFolder , lcDestinationFolder , OverWriteFiles)
>
>
>Thanks.