Командная строка, батники, сценарии (bat, cmd) 2 - [37] :: Программы

sk754800

Цитата:

Подскажите плс: как модифицировать предложенную команду, чтобы удалялись не "не-сегодняшние" файлы, а файлы датой на n дней старше, чем сегодня?

Этот код удалит все файлы *.txt старше 90 дней из текущей папки. Потестил, вроде нормально работает. Однако, прежде чем применять, советую дождаться комментариев других участников топика - возможно найдут косяки:

Код:

@echo off
setlocal enabledelayedexpansion
set N=90

call :raschet %date% days_to_today

for /f "tokens=*" %%a in ('dir /b *.txt') do (
set filedate=%%~ta
call :raschet !filedate:~0,10! days_to_date_of_file
set /a raznitsa=%days_to_today%-!days_to_date_of_file!
if !raznitsa! gtr %N% del /q "%%a"
)
goto :eof

:raschet
for /f "delims=. tokens=1-3" %%a in ('echo %~1') do (

set /a years=%%c*365+%%c/4
set /a prev_year=%%c-1
set /a result_year=%%c/4
set /a result_prev_year=!prev_year!/4
set /a vis=!result_year!-!result_prev_year!
if !vis!==1 (
if %%b==01 set /a years=!years!-1
if %%b==02 set /a years=!years!-1
)

if %%b==01 set months=0
if %%b==02 set months=31
if %%b==03 set months=59
if %%b==04 set months=90
if %%b==05 set months=120
if %%b==06 set months=151
if %%b==07 set months=181
if %%b==08 set months=212
if %%b==09 set months=243
if %%b==10 set months=273
if %%b==11 set months=304
if %%b==12 set months=334

set days=%%a
set firstsym=!days:~0,1!
if !firstsym!==0 set days=!days:~1,1!

set /a %~2=!years!+!months!+!days!
)

Изменяемые параметры выделены жирным - сколько дней выставлять, и какие именно файлы и из каких папок удалять.

Модерирует : gyra, Maz
Widok (10-03-2009 12:39): Лимит страниц. Продолжаем здесь.	Версия для печати • Подписаться • Добавить в закладки
Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108