[megaloman]

Код:

@Echo Off
cls

Set Where=F:\Директория
Set What=.exe .doc .xls .js .tif .ююю

Set W=%What:.=*.%

SetLocal EnableExtensions
SetLocal EnableDelayedExpansion

cd /D "%Where%"
Set First=Папка указана неверно
Set Second=%First%
 
IF %ERRORLEVEL%==0 (
   Echo %Where%
   FOR %%e IN (%What%) DO (
       FOR /F "usebackq tokens=*" %%m IN (`dir *%%e /s`) DO Set First=!Second! & Set Second=%%m
       Set M=!First:байт=!
       If Not "!M!"=="!First!" Echo *%%e  !First!
   )
   FOR /F "usebackq tokens=*" %%s IN (`dir %W% /s`) DO Set First=!Second! & Set Second=%%s
   Set M=!First:байт=!
   If Not "!M!"=="!First!" Echo %W%  !First!
)

If "%Second%"=="Папка указана неверно" Echo %Second%  %Where%
Pause