[решено] Удаление файлов - Компьютерный форум OSzone.net

Компьютерный форум OSzone.net (http://forum.oszone.net/index.php)

- Скриптовые языки администрирования Windows (http://forum.oszone.net/forumdisplay.php?f=102)

- - [решено] Удаление файлов (http://forum.oszone.net/showthread.php?t=320617)

Удаление файлов

Возможно ли удалить в папке все .ico файлы кроме самого большого по размеру.
Скрипт должен быть с указанием пути к папке.

Код:

@echo off

set "sdir=papka"& if not "%~1"=="" set "sdir=%~1"

::set "sdir=papka"& if "%~1"=="" set /p sdir="Введите путь к папке: "

for /f "delims=" %%a in ('dir /a-d/b/o-s "%sdir%\*.ico"^|more +1') do del /q "%sdir%\%%a"

exit

alpap, не удаляет не одного файла в папке.

vickt,
Поехали
- в коде имя папки "papka" по умолчанию, если не задана параметром или вручную, если используется закомментированная строка, находится она (папка "papka") в той же директории где bat с кодом иначе вместо "papka" надо написать set "sdir=Диск:\путь\имя папки" и она должна существовать, я предполагал что эти вещи не придеться объяснять человеку, вытягивающему что-то из .exe
- возможно в папке у вас файлы с расширением не .ico, как вы указали, тогда поменять на нужное
- а, собственно, более вариантов нет :)

alpap, Спасибо большое.

alpap, Не понимаю, зачем здесь More, когда можно в For применить Skip

Код:

@Echo Off



Set "Where=Z:\Temp"

Set "Mask=*.ico"



FOR /F "usebackq skip=1 delims=" %%i IN (`Dir "%Where%\%Mask%" /B /A:-D /O:-S 2^>nul`) DO Del "%Where%\%%i"

Цитата:

Цитата megaloman

alpap, Не понимаю, зачем здесь More, когда можно в For применить Skip »

Я скромно промолчал ;).