[Lil Crazy]

amel27, спасибо вам огромное! Ещё один вопрос хотел задать только: как сделать чтобы бы в консоли выводились перемещаемые файлы и сохранить их в создаваемый автоматически текстовый файл как лог-файл, то есть:

C:\StartFolder\fle1.txt ------> C:\DestinationFolder\file1.txt

Код:

@Echo Off

:TXT
Set /P $TXT="Input word for search: "
If "%$TXT%"=="" GoTo TXT

Echo %$TXT%>"%~dpn0.tmp"
CHCP 1251 |>>"%~dpn0.tmp" Echo %$TXT%&CHCP 866 >Nul
CHCP 65001|>>"%~dpn0.tmp" Echo %$TXT%&CHCP 866 >Nul

:NUM
Set /P $NUM="Number of folders: "
Set $IDX=1& Set /A $NUM+=0
If %$NUM% EQU 0 GoTo NUM

:DIR
Set /P $_%$IDX%="Path to folder %$IDX% for search: "
Call Set $T=%%$_%$IDX%%%
If Exist %$T% Set /A $IDX+=1
If %$IDX% LEQ %$NUM% GoTo DIR

:MOVE
Set /P $MOVE="Input destinantion folder: "
If "%$MOVE%"=="" GoTo MOVE
If not Exist "%$MOVE%" MkDir "%$MOVE%"

For /F "Tokens=1* Delims==" %%a In ('Set $_') Do For /F "Delims=" %%i In (
'FindStr /SMG:"%~dpn0.tmp" "%%b\*"') Do Move "%%i" "%$MOVE%" >Nul& Echo "%%i"

Del "%~dpn0.tmp"

@pause

а то в этом скрипте выводятся просто файлы из начальной директории списком, без конечной папки