Цитата f0xh0und@vk:
|
для расчёта количества дней оставшихся до определённой даты »
|
Код:
@Echo Off
:: Дата дня Х в формате DD MM YYYY. Ведущие нули должны присутствовать. Пример записи для 9 мая 2013 года.
Set dateX=09 05 2013
:: Текущая дата
For /f "delims=" %%i In ('WMIC OS Get LocalDateTime^|Find "."') Do Set DT=%%i
Call :JDat %DT:~6,2% %DT:~4,2% %DT:~0,4% Day
Call :JDat %dateX% Day
Echo Осталось (дней) - %Day%
Pause>Nul
Exit
:JDat
Set /a %4=1%1+367*(1%2-102-(1%2-114)/12*12)/12-3*((%3+(1%2-114)/12)/100+49)/4+1461*(%3+(1%2-114)/12)/4-%4
GoTo:EOF
