thanks in advance
Code: Select all
^numpad1::
Gosub, exittymode
ErrorCount2 := CopyFilesAndFolders("D:\*.*", "C:\Users\GSAB\Documents\Temp1")
if (ErrorCount2 != 0)
return
Return
exittymode:
sleep 2400000
ExitApp
return
CopyFilesAndFolders(SourcePattern, DestinationFolder, DoOverwrite = false)
{
FileCopy, %SourcePattern%, %DestinationFolder%, %DoOverwrite%
ErrorCount1 := ErrorLevel
Loop, %SourcePattern%, 2
FileCopyDir, %A_LoopFileFullPath%, %DestinationFolder%\%A_LoopFileName%, %DoOverwrite%
ErrorCount1 += ErrorLevel
}
return ErrorCount1
}