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

Компьютерный форум OSzone.net (http://forum.oszone.net/index.php)

- Скриптовые языки администрирования Windows (http://forum.oszone.net/forumdisplay.php?f=102)

Поиск файлов и перемещение каталога

Подскажите!

Имеется проблемка: необходимо в некотором каталоге есть подкаталоги, которые содержат некие файлы, в одном подкаталоге могут содержаться файлы и txt и dbf и т.д.
так вот необходимо найти подкаталоги, кот. содержат хотя бы один файл txt, и переместить эти подкаталоги (вместе с содержимым) в некую папку KONTYNER.

набросал вот такую вещь, но она не работает

@echo on
cls
set mask="*.txt*"
rem Получение путей каталогов по маске
dir /b/s/o/n/a:-d "%~dp0Base\%mask%">ret.txt
rem Перемещение катологов
for /F "tokens=*" "%%i" in (%~dp0\ret.txt) do (
move "%~fi\*.*" "%~dp0KONTYNER\")
rem Удаление временного файла
del /q "%~dp0\ret.txt"
pause

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

Код:

@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

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

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

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

Цитата:

Цитата SendMessage

md "!OutSubDir!" »

Спасибо!

Цитата:

Цитата 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 !!!