FileCopy -Autohotkey

FileCopy, SourcePattern, DestPattern [, Flag]

FileCopy, C:\My Documents\List1.txt, D:\Main Backup\ ; Копирование с сохранением оригинальных имён файлов. FileCopy, C:\My File.txt, C:\My File New.txt ; Копирование файла в ту же папку под новым именем. FileCopy, C:\Folder1\*.txt, D:\New Folder\*.bkp ; Копирование в другое место и с другим расширением. ; Следующий пример копирует все файлы и папки внутри папки в другую папку. ; Прим. переводчика: папка-приёмник уже должна существовать. ErrorCount := CopyFilesAndFolders("C:\My Folder\*.*", "D:\Folder to receive all files & folders") if ErrorCount <> 0 MsgBox %ErrorCount% файлов/папок не удалось скопировать. CopyFilesAndFolders(SourcePattern, DestinationFolder, DoOverwrite = false) ; Копирует все файлы и папки, совпадающие с заданными в SourcePattern в папку, чьё имя указано ; в DestinationFolder и возвращает количество файлов/папок, которые не удалось скопировать. { ; Сначала копируем все файлы (но не папки): FileCopy, %SourcePattern%, %DestinationFolder%, %DoOverwrite% ErrorCount := ErrorLevel ; Теперь копируем все папки: Loop, %SourcePattern%, 2 ; 2 означает "возвращать только папки". { FileCopyDir, %A_LoopFileFullPath%, %DestinationFolder%\%A_LoopFileName%, %DoOverwrite% ErrorCount += ErrorLevel if ErrorLevel ; Сообщать о каждой проблемной папке. MsgBox Не удалось скопировать %A_LoopFileFullPath% в %DestinationFolder%. } return ErrorCount }