[gora]

датазавтрашнегодня »

Рассчитать можно так:

Код:

@Echo Off
:: Процедуре передается число дней для смещения
:: Положительное число - в будущее, отрицательное в прошлое
Set N=1

Call :FromNow %N%
Echo %DATE:~-4%%DATE:~3,2%%DATE:~,2%
Echo %yyyymmdd%
Pause
Exit /B

:FromNow
	SetLocal
	Set /A yyyy=%DATE:~-4%, mm=100%DATE:~3,2%%%100-14, dd=100%DATE:~,2%%%100
	Set /A L=%~1+dd+36494+1461*(yyyy+4800+mm/12)/4+367*(mm+12-mm/12*12)/12-3*((yyyy+4900+mm/12)/100)/4
	Set /A N=4*L/146097, L=L-(146097*N+3)/4, I=4000*(L+1)/1461001
	Set /A L=L-1461*I/4+31, J=80*L/2447, dd=100+L-2447*J/80, L=J/11
	Set /A mm=100+J+2-12*L, yyyy=100*(N-49)+I+L
	EndLocal& Set yyyymmdd=%yyyy%%mm:~-2%%dd:~-2%
Exit /B