CMD/BAT - [решено] Поиск файлов и перемещение каталога

SendMessage · Отправлено: **18:10, 03-02-2011** | #2

Попробуй так:

Код:

@echo of
setlocal enabledelayedexpansion

set "MainDir=%~dp0Base"
set "OutDir=%~dp0KONTYNER"

for /f "tokens=*" %%a in ('dir /a-d/s/b "%MainDir%\*.txt"') do (
   set "TxtDirPath=%%~dpa"
   set "OutSubDir=%OutDir%\!TxtDirPath:%MainDir%\=!"
   if not exist "!OutSubDir!" (
      md "!OutSubDir!" && move "!TxtDirPath!*.*" "!OutSubDir!" && rd "!TxtDirPath!"
   ) 
)

djvall · Отправлено: **09:00, 04-02-2011** | #3

пояснить можете эту строчку:

Цитата SendMessage:

set "OutSubDir=%OutDir%\!TxtDirPath:%MainDir%\=!" »

как это работает и можете подробнее про вот такие логические выражения:
=%OutDir%\!TxtDirPath:%MainDir%\=!"

и еще, не могу нигде найти почему выделяется !...!

Цитата SendMessage:

md "!OutSubDir!" »

Спасибо!

djvall · Отправлено: **09:32, 04-02-2011** | #4

Цитата SendMessage:

@echo of
setlocal enabledelayedexpansion
set "MainDir=%~dp0Base"
set "OutDir=%~dp0KONTYNER"
for /f "tokens=*" %%a in ('dir /a-d/s/b "%MainDir%\*.txt"') do (
set "TxtDirPath=%%~dpa"
set "OutSubDir=%OutDir%\!TxtDirPath:%MainDir%\=!"
if not exist "!OutSubDir!" (
md "!OutSubDir!" && move "!TxtDirPath!*.*" "!OutSubDir!" && rd "!TxtDirPath!"
)
) »

Работает просто ИДЕАЛЬНО. Еще раз спасибо SendMessage !!!