hi,
thank you for reply,it works.
any idea about message AS..

at the same time"WAIT IT WORKS NOW"
COPY FILE "E:\NEWBASAM\TABLE1.DBF" TO "F:\"
after copy DON
</PRE
anyway ,
thanks again

>>hi all,
>>i try to copy myfile table1.dbf to usb via this code under
>>
>>i get error message OLE error code 0x800a004c unknown com status code
>>
>><pre>
>>oFSO = CREATEOBJECT("Scripting.FileSystemObject")
>>cSource = "E:\NEWBASAM\TABLE1.DBF"
>>cDestination = "F:\"
>>oFSO.CopyFolder(cSource, cDestination)
>>&& or
>>oFSO.CopyFolder(cSource, cDestination, .T.)
>>

>>thanks.
>
>....Folder#....File
>
>

>COPY FILE "E:\NEWBASAM\TABLE1.DBF" TO "F:\"
>