1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22
|
@echo off
::On defini le nb de jour
set "Nb-jour=10"
::On crée le VBS avec le bon nombre de jour
call:construct
::On récupère la liste en sortie du VBS
for /f "delims=" %%a in ('cscript /nologo #.vbs') do set "$Liste=%%a"
::On boucle sur la liste pour faire la copy
for %%a in (%$Liste%) do echo copy "%%a*" "c:\rep_b"
del #.vbs 2>nul
exit/b
:construct
(
echo.i=%Nb-jour%&echo.while i ^> 0&echo.mdate = split(DateAdd("d",-i,(date^)^),"/"^)&echo.liste=liste^&mdate(2^)^&mdate(1^)^& mdate(0^)^&" "&echo.i=i-1&echo.wend&echo.wscript.echo(liste^)
)>#.vbs |