>>>>oFS = CREATEOBJECT([scripting.FileSystemObject]) >>>> >>>>SORCEFILE="C:\AA\ŠĆŠ.DOC" >>>>TARGETFILE="C:\TMP\AA\ŠĆŠ.DOC" >>>>TRY >>>> oFS.DeleteFile(TargetFile, .t.) >>>>CATCH >>>>ENDTRY >>>>oFS.CopyFile(SorceFile, TargetFile, .t.) >>>>>>>
>>DECLARE INTEGER CopyFile IN WIN32API STRING lpExistingFileName,; >> STRING lpNewFileName,; >> INTEGER bFailIfExists >> >>SORCEFILE="C:\AA\ŠĆŠ.DOC" >>TARGETFILE="C:\TMP\AA\ŠĆŠ.DOC" >> >>IF CopyFile(SORCEFILE, TARGETFILE, 0) # 0 >> *** Success >>ELSE >> *** Fail >>ENDIF >>>
DECLARE INTEGER DeleteFile IN WIN32API STRING lpFileName IF DeleteFile(The file name) # 0 ** Success ELSE ** Fail ENDIF