try creating a VBS file, like bkup.vbs and include the following:
function copyfile(xfile, yfile)
Set fso = CreateObject("Scripting.FileSystemObject")
fso.CopyFile xfile, yfile,TRUE
set fso = Nothing
end function
then call it to copy the files in the main() part of your code...