Серый форум — AHK: Копирование файлов и папок исключая самого себя

Re: AHK: Копирование файлов и папок исключая самого себя

null@example.com (Logonius) — Fri, 03 Jun 2022 03:50:35 +0000

Такой еще вопрос, почему с рабочего стола копируются все в папку, а с папки, обратно потом на рабочий стол эти же папки/файлы не копируются, если указать что файлы/папки будут копироваться в папку на рабочем столе, то все ок, а чисто на рабочий стол не может.

Код тот же выше, только пути просто местами поменяны

UPD: Разобрался.

Re: AHK: Копирование файлов и папок исключая самого себя

null@example.com (Logonius) — Fri, 03 Jun 2022 03:10:16 +0000

Phoenixxx_Czar
Огромное спасибо.

Re: AHK: Копирование файлов и папок исключая самого себя

null@example.com (Phoenixxx_Czar) — Fri, 03 Jun 2022 02:27:17 +0000

A_Desktop "\*.*"

Re: AHK: Копирование файлов и папок исключая самого себя

null@example.com (Logonius) — Fri, 03 Jun 2022 01:21:19 +0000

Нашел код, делает то, чо мне нужно.

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"), засунуть переменную рабочего стола?, потому как софт будет использоваться не только у меня на пк.

Re: AHK: Копирование файлов и папок исключая самого себя

null@example.com (Logonius) — Thu, 02 Jun 2022 14:29:24 +0000

Foma

Сложно пока что, можно пример, пожалуйста.

Re: AHK: Копирование файлов и папок исключая самого себя

null@example.com (Foma) — Thu, 02 Jun 2022 14:14:43 +0000

Наверное над сначала использовать

Loop (файлы и папки)
Возвращает указанные файлы или папки по одному/одной.
Loop, FilePattern [, IncludeFolders?, Recurse?]

и создать условие, что при не обнаружении "себя" копировать текущий файл или папку, а при обнаружении - пропускать.

AHK: Копирование файлов и папок исключая самого себя

null@example.com (Logonius) — Thu, 02 Jun 2022 11:51:29 +0000

Добрый день
Такая проблема, нужно скопировать все из рабочего стола в папку, которая создается рядом со скриптом, сам скрипт находиться тоже на раб. столе.
Дело в том, что если запустить скрипт с рабочего стола и нажать кнопку чтоб он все скопировал, то он копирует до того момента "Как я понял" когда натыкается на себя и тем самым, копируются не все папки и файлы с рабочего стола, а до того момента.

Команда простая, но скорей всего ее как то нужно дополнить, потому что когда я переношу скрипт на диск С например, то весь рабочий стол копируется отлично.


FileCreateDir , test
FileCopyDir %A_Desktop%, test\test, 1