Код тот же выше, только пути просто местами поменяны
UPD: Разобрался.
]]>A_Desktop "\*.*"ErrorCount := CopyFilesAndFolders ("%A_Desktop%\*.*", "test")
if ErrorCount <> 0
MsgBox %ErrorCount% files/folders could not be copied.
CopyFilesAndFolders(SourcePattern, DestinationFolder, DoOverwrite = true)
{
FileCopy, %SourcePattern%, %DestinationFolder%, %DoOverwrite%
ErrorCount := ErrorLevel
Loop, %SourcePattern%, 2
{
FileCopyDir, %A_LoopFileFullPath%, %DestinationFolder%\%A_LoopFileName%, %DoOverwrite%
ErrorCount += ErrorLevel
if ErrorLevel
MsgBox Could not copy %A_LoopFileFullPath% into %DestinationFolder%.
}
return ErrorCountПодскажите, как мне вот сюда > CopyFilesAndFolders ("%A_Desktop%\*.*", "test"), засунуть переменную рабочего стола?, потому как софт будет использоваться не только у меня на пк.
]]>Сложно пока что, можно пример, пожалуйста.
]]>Loop (файлы и папки)
Возвращает указанные файлы или папки по одному/одной.
Loop, FilePattern [, IncludeFolders?, Recurse?]
и создать условие, что при не обнаружении "себя" копировать текущий файл или папку, а при обнаружении - пропускать.
]]>Команда простая, но скорей всего ее как то нужно дополнить, потому что когда я переношу скрипт на диск С например, то весь рабочий стол копируется отлично.
FileCreateDir , test
FileCopyDir %A_Desktop%, test\test, 1