MTIsur, До кучи
Цитата MTIsur:
|
Остальные файлы с данным расширением можно удалить за ненадобностью. »
|
Код:
@Echo Off
cls
Set "Fold=Z:\Box_In"
Set "Mask=*.exe"
For /f "delims=" %%d in ('2^>nul Dir /A:D /B /S "%Fold%\"') Do (
For /f "delims=" %%f in ('2^>nul Dir /A:-D /B /O:-D "%%d\%Mask%"') Do (
If Exist "%%d\%%~nxd%%~xf" Del "%%d\%%f"
If Not Exist "%%d\%%~nxd%%~xf" Ren "%%d\%%f" "%%~nxd%%~xf"
)
)
Pause
GoTo :Eof
