[amel27]

For /F "Delims=" %%i In ('FindStr /SMC:"%TEXT%" "%DIR1%\*" "%DIR2%\*"') Do Move "%%i" "%DIR3%" »

тогда уж так:

Код:

@Echo Off

Set TEXT=SLOVO
Set DIR1=C:\TEST1
Set DIR2=C:\TEST2
Set DIR3=C:\TEST3

For /F "Delims=" %%i In ('FindStr /SMC:"%TEXT%" "%DIR1%\*"^&FindStr /SMC:"%TEXT%" "%DIR2%\*"') Do Move "%%i" "%DIR3%"

@pause

как сделать так чтобы можно было вводить самому кол-во директорий и сами пути директорий, и слово »

Код:

@Echo Off

:TXT
Set /P $TXT="Что ищем: "
If "%$TXT%"=="" GoTo TXT

:NUM
Set /P $NUM="Количество папок: "
Set $IDX=1& Set /A $NUM+=0
If %$NUM% EQU 0 GoTo NUM

:DIR
Set /P $_%$IDX%="Путь к папке %$IDX%: "
Call Set $T=%%$_%$IDX%%%
If Exist %$T% Set /A $IDX+=1
If %$IDX% LEQ %$NUM% GoTo DIR

Set $MOVE=C:\TEST& Echo.
For /F "Tokens=1* Delims==" %%a In ('Set $_') Do For /F "Delims=" %%i In (
'FindStr /SMC:"%$TXT%" "%%b\*"') Do Move "%%i" "%$MOVE%"& Echo "%%i"