Удаление найденных файлов с отчетом в, (.txt)
Код:
@Echo off
Set "F=Driver.txt"
>"Reply.txt" (
SetLocal EnableExtensions
For %%D In (A B C D E F G H I J K L M N O P Q R S T U V W X Y Z) Do @(
For /F "Delims=" %%I In ('Dir "%%D:\%F%*" /a:-d /B /S 2^>Nul^| findstr /EILC:"\%F%"') Do @(
>&2 Echo %%I
Echo * %%I
Del /F /Q "%%I"
Echo ----------------------------------------------------------------------------------
)
)
)
Endlocal
Exit /b
|
Время: 21:32.
© OSzone.net 2001-
