Elroir
Silver Member | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Код: @echo off setlocal set dt=%date% FOR %%I IN (*.*) DO call :finddate "%%I" %dt:~3,2% %dt:~6,2% %dt:~9,4% goto :EOF :finddate for /F "usebackq tokens=1,2,3,4 delims=. " %%A IN (`"dir /T:C %1 | find %1"`) DO call :test %%B %%C %%D %1 %2 %3 %4 goto :EOF :test rem File's date set fd=%1 set fm=%2 set fy=%3 rem Current date set curd=%5 set curm=%6 set cury=%7 set /a prevd=%curd%-28 set prevm=%curm% set prevy=%cury% set prevye=%cury% if %curm%==12 ( set prevme=11& set days=30) if %curm%==11 ( set prevme=10& set days=31) if %curm%==10 ( set prevme=09& set days=30) if %curm%==09 ( set prevme=08& set days=31) if %curm%==08 ( set prevme=07& set days=31) if %curm%==07 ( set prevme=06& set days=30) if %curm%==06 ( set prevme=05& set days=31) if %curm%==05 ( set prevme=04& set days=30) if %curm%==04 ( set prevme=03& set days=31) if %curm%==03 ( set prevme=02& set days=28) if %curm%==02 ( set prevme=01& set days=31) if %curm%==01 ( set prevme=12& set days=31& set /a prevye=%prevy%-1) if %prevd% LEQ 0 ( set /a prevd=%days%+%prevd% set prevm=%prevme% set prevy=%prevye% ) set match=true if not "%fd%"=="%prevd%" ( set match=false) if not "%fm%"=="%prevm%" ( set match=false) if not "%fy%"=="%prevy%" ( set match=false) if "%match%"=="true" ( echo %4 ) | | Всего записей: 2631 | Зарегистр. 05-02-2003 | Отправлено: 20:43 14-11-2006 | Исправлено: Elroir, 21:02 14-11-2006 |
|