[megaloman]

Код:

@Echo Off
cls
	Set "BoxIn=R:"
	Set "MaskIn="*КЖ*.*" "*КМ*.*""
 
	Set "BoxOut=Z:\Box_Out" 

	Pushd "%BoxIn%\"
	FOR /F "usebackq delims=" %%d IN (`2^>nul Dir %MaskIn% /B /A:D`) DO (
		Echo %%d
		>nul xcopy "%BoxIn%\%%d\*.*" "%BoxOut%\%%d\" /E /Q /Y /R /H /Z
	)
	Popd
pause
GoTo :Eof