如何用批处理文件写：获取当前日期的前一天

[kxghost]

如何用批处理文件写：获取当前日期的前一天？

时间格式为：２００９－０８－１７
今天是２００９－０８－１７，怎样写才能得到这个日期：２００９－０８－１６
到明天，就要获得这个日期：２００９－０８－１７

[colorskypig]

这方面高级语言确实占很大便宜，随便用个循环语句就能办到！

[ljc007]

test.bat

[code=BatchFile]@echo off
rem 计算指定天数之前的日期
set DaysAgo=1
rem 假设系统日期的格式为yyyy-mm-dd
call :DateToDays %date:~0,4% %date:~5,2% %date:~8,2% PassDays
set /a PassDays-=%DaysAgo%
call :DaysToDate %PassDays% DstYear DstMonth DstDay
set DstDate=%DstYear%-%DstMonth%-%DstDay%
echo %DaysAgo%天的日期是%DstDate%
pause
goto :eof

:DateToDays %yy% %mm% %dd% days
setlocal ENABLEEXTENSIONS
set yy=%1&set mm=%2&set dd=%3
if 1%yy% LSS 200 if 1%yy% LSS 170 (set yy=20%yy%) else (set yy=19%yy%)
set /a dd=100%dd%%%100,mm=100%mm%%%100
set /a z=14-mm,z/=12,y=yy+4800-z,m=mm+12*z-3,j=153*m+2
set /a j=j/5+dd+y*365+y/4-y/100+y/400-2472633
endlocal&set %4=%j%&goto :EOF

:DaysToDate %days% yy mm dd
setlocal ENABLEEXTENSIONS
set /a a=%1+2472632,b=4*a+3,b/=146097,c=-b*146097,c/=4,c+=a
set /a d=4*c+3,d/=1461,e=-1461*d,e/=4,e+=c,m=5*e+2,m/=153,dd=153*m+2,dd/=5
set /a dd=-dd+e+1,mm=-m/10,mm*=12,mm+=m+3,yy=b*100+d-4800+m/10
(if %mm% LSS 10 set mm=0%mm%)&(if %dd% LSS 10 set dd=0%dd%)
endlocal&set %2=%yy%&set %3=%mm%&set %4=%dd%&goto :EOF
[/code]

[kxghost]

[Quote=引用 7 楼 ljc007 的回复:]
test.bat

BatchFile code@echooffrem 计算指定天数之前的日期set DaysAgo=1rem 假设系统日期的格式为yyyy-mm-ddcall:DateToDays %date:~0,4% %date:~5,2% %date:~8,2% PassDaysset/a PassDays-=%DaysAgo%call:DaysToDate %PassDays% DstYear DstMonth DstDayset DstDate=%DstYear%-%DstMonth%-%DstDay%echo %DaysAgo%天的日期是%DstDate%pausegoto:eof:DateToDays %yy% %mm% %dd% dayssetlocal ENABLEEXTENSIONSset yy=%1&set mm=%2&set dd=%3if1%yy% LSS200if1%yy% LSS170(set yy=20%yy%)else(set yy=19%yy%)set/a dd=100%dd%%%100,mm=100%mm%%%100set/a z=14-mm,z/=12,y=yy+4800-z,m=mm+12*z-3,j=153*m+2set/a j=j/5+dd+y*365+y/4-y/100+y/400-2472633endlocal&set%4=%j%&goto:EOF:DaysToDate %days% yy mm ddsetlocal ENABLEEXTENSIONSset/a a=%1+2472632,b=4*a+3,b/=146097,c=-b*146097,c/=4,c+=aset/a d=4*c+3,d/=1461,e=-1461*d,e/=4,e+=c,m=5*e+2,m/=153,dd=153*m+2,dd/=5set/a dd=-dd+e+1,mm=-m/10,mm*=12,mm+=m+3,yy=b*100+d-4800+m/10(if %mm% LSS10set mm=0%mm%)&(if %dd% LSS10set dd=0%dd%)endlocal&set%2=%yy%&set%3=%mm%&set%4=%dd%&goto:EOF
[/Quote]
谢谢　００７　　这个就运行正确了

[Blaider]

好东西，收藏了，找了好久的东西

[pengjm111]

fdsfdsfdasfafding

[starsbaby]

好东西，顶了！~谢谢

[sutdy]

能写出这样的批处理，超强啊
我一直想自己写个

[plypanda]

赞一下7楼，同时谢谢！因为我也引用了您的代码

[iamdfccong]

这么强大的帖子，不顶过不了自己这关啊

[wuhener]

好厉害啊。多谢啦

[zdt2005]

谢谢七楼的分享

[icbc29]

七楼的,我看不到啊。。。。。

[icbc29]

能不能给我yyyymmdd格式，谢谢！

[clarkchiang]

7楼大虾太强大了，支持一下

[yyhakusu]

强大啊

[somebaby1]

支持

[yhl1979]

7楼大虾太强大了，支持一下

[xiaodongli]

谢谢！！！

[ygzeng]

厉害，cmd的功能确实弱了些，这么普遍的需求累死人啊

[qq24447678]

7楼，感谢你。不过估计你看不到我的感谢