Manuel utilizo CopyFile() que funciona bem com os arquivos abertos. Ex.: CopyFile( "C:\CP300\TABCAT.DBF", aonde+"\"+"TABCAT.DBF", .f. ) aonde = diretorio destino //----------------------- DLL32 FUNCTION CopyFile( cExFile AS LPSTR, ; cNewFile AS LPSTR, ; lFailIfEx AS LONG ) ; ...