[pegasus]

Большое спасибо! После некоторых модификаций заработало!

[Exerion]

Всем доброго времени суток. Прошу прощения за некропостинг, но эта тема наиболее подходит под мою задачу.
Задача проще, чем у топикстартера: существует каталог, в котором много под-каталогов. Нужно отыскать все файлы *.mp3 в этих подкаталогах и скопировать их в другой каталог.
Попытался самостоятельно переделать вышерасположенные решения:

Код:

@Echo Off
SetLocal EnableExtensions

Set SrcDir=D:\games\other\osu!\Songs
For /F "Delims=" %%I In ('Dir "%SrcDir%\*" /AD /B /S') Do (
  If "%%~xI"=="" (
    If Exist "%%~I\*.mp3" (
      If Not Exist D:\mp3 MD D:\mp3
      Move "%%~I\*.mp3" D:\mp3\
    )
  )
)

Однако данный вариант не даёт результата. Что я делаю не так?

[megaloman]

Exerion, Для начала, формат команды For неверен - кавычки неправильные. Сделайте For /? >C:\_For_Help.txt В файле посмотрИте, какие нужны. Дальше копать поленился.
По Вашему коду видно, что Вы хотите не скопировать (Copy) файлы, а переместить их (Move). Вот вариант решения (при совпадении имени файл перемещен не будет, батник выдаст ошибку)

Код:

@Echo Off

Set From=E:\Над крылечком
Set To=E:\Дым колечком
Set Mask=*.mp3

Md "%To%" >Nul 1>Nul 2>Nul

For /F "usebackq delims=" %%f In (`Dir "%From%\%Mask%" /A:-D /B /S`) Do Move "%%f" "%To%\"

Вот еще вариант, при большом кол-ве файлов внутри директорий он будет работать быстрее, за счёт того, что групповые операции выполняются быстрее. Опять же, дубликаты по именам перемещены не будут

Код:

@Echo Off

Set From=E:\Над крылечком
Set To=E:\Дым колечком
Set Mask=*.mp3

Md "%To%" >Nul 1>Nul 2>Nul

Move "%From%\%Mask%" "%To%\" >nul 1>Nul 2>Nul
For /F "usebackq delims=" %%f In (`Dir "%From%" /A:D /B /S`) Do Move "%%f\%Mask%" "%To%\"  >nul 1>Nul 2>Nul

[kolik76]

Помогите сделать, чтобы батник перемещал файлы, которые в нем прописаны, но раскиданы они по разным папкам в одну

[Iska]

kolik76, теперь переведите на русский.