[数值计算] [已解决]批处理怎么使计算出来的日期规格化为yyyymmdd格式

@echo off&setlocal enabledelayedexpansion
call:D,33
echo.%D%
pause&exit
:D
for /f "tokens=1-3 delims=-:/ " %%a in ("%date%") do set Y=%%a&set M=%%b&set D=%%c
if "%M:~0,1%"=="0" set M=%M:~1%
if "%D:~0,1%"=="0" set D=%D:~1%
set/a D-=%1
if %D% gtr 0 goto:Y
:M
set/a M-=1
if !M!==0 set/a Y-=1,M=12
set/a "T=^!(M-2)","R=(^!(Y%%4)&^!^!(Y%%100))|^!(Y%%400)","C=^!(M-4)|^!(M-6)|^!(M-9)|^!(M-11)","D=T*(28+R)+C*30+(^!T&^!C)*31+D"
if %D% leq 0 goto:M
:Y
set M=0%M%&set D=0%D%&set D=%Y%-!M:~-2!-!D:~-2!
复制代码

::判断当前日期的前一天
::首先直接把天数减1天
::如果出来的是0天就把月减1天，天数是当月的最后一天。
::如果出来的是0月就把年减1年，月数是当年的最后一月。
@echo off&setlocal enabledelayedexpansion
set yyyy=%date:~0,4%
set mm=%date:~5,2%
set dd=%date:~8,2%
set /a nd=!dd!-30
::如果象3月1日减一天是0天就...
if !nd! lss 0 call :dd0
if !mm!==0 call :mm0
set yyyymmdd=!yyyy!-!mm!-!nd!
echo 今天是:%date:~0,10%
echo 30天前是：!yyyymmdd!
pause
:dd0
set /a mm=!mm!-1
for %%a in (1 3 5 7 8 10 12)do set %%add=31
set /a pddd=!yyyy!*10/4
set pd2d=!pddd:~-1,1!
set 2dd=28
if !pd2d!==0 set 2dd=29
for %%b in (4 6 9 11)do set %%bdd=30
set /a nd=!%mm%dd!+!nd!
goto :eof
:mm0
set /a yyyy=!yyyy!-1
set mm=12
set nd=31
goto :eof
复制代码