@echo fora
EnableExtensions setlocal EnableDelayedExpansion
O REM define posições da fonte e do destino, e arquiva testes padrões para copiar
ajustar SourceDir= c:\temp\EE26352923\source
ajustar DestDir= c:\temp\EE26352923\dest
ajustar MatchExts=*.trn *.bak
O REM começ a data de hoje e converte-á juliano
para /F “tokens=2-4 delims=/” %%A dentro (“%DATE%") ajustam TodaysDate=%%C%%A%%B
chamada: jdate TodaysJDate %TodaysDate%
O REM move-se para o diretório de fonte, encontra todas as limas combinar o teste padrão desejado
pushd “%SourceDir%”
para %%A dentro (%MatchExts%) fazer (
O REM começ a data da modificação das limas, converso a juliano
ajustar FileDate=%%~nA
chamada: jdate FileJDate! FileDate: ~-12.8!
O REM calcula a idade da lima nos dias, se mais velha de 7 dias se movem para o destino
ajustar /A FileAge=%TodaysJDate%-! FileJDate!
se! FileAge! 7 GTR movem “%%~A” “%DestDir%”
)
popd
O REM move-se para o diretório de destino, encontra todas as limas combinar o teste padrão desejado
pushd “%DestDir%”
para %%A dentro (%MatchExts%) fazer (
O REM começ a data da modificação das limas, converso a juliano
ajustar FileDate=%%~nA
chamada: jdate FileJDate! FileDate: ~-12.8!
O REM calcula a idade da lima nos dias, se uma supressão de mais velha de 28 dias do destino
ajustar /A FileAge=%TodaysJDate%-! FileJDate!
se! FileAge! 28 del GTR “%%~fA”
)
popd
retirar /b
Sub-rotina do REM para calcular a data juliana
: data-corda retornar-variável do jdate (YYYYMMDD)
ajustar DateStr=%~2
ajustar yy=%DateStr: ~0.4%
ajustar /A mm=1%DateStr: ~4.2%-100
ajustar /A dd=1%DateStr: ~6.2%-100
ajustar /a “yy=10000%yy% %%10000, mm=100%mm% %% 100, dd=100%dd% %% 100”
ajustar /a %~1=dd-32075+1461* (yy+4800+ (mm-14) /12) /4+367* (mm-2- (mm-14) /12*12) /12-3* ((yy+4900+ (mm-14) /12) /100) de /4
retirar /b
|