inittab

利用Ritchie Lawrence日期函数计算

@echo off&setlocal enabledelayedexpansion
for %%a in (一 二 三 四 五 六 日) do set/an+=1&set #!n!=%%a
set/p date=请输入正确日期(格式yyyymmdd):
set yy=!date:~0,4!&set mm=!date:~4,2!&set dd=!date:~6,2!
:::输入合法性判断略
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,dow=153*m+2
set /a dow=dow/5+dd+y*365+y/4-y/100+y/400-2472630,dow%%=7,dow+=1
call echo !yy!年!mm!月!dd!日是星期%%#%dow%%%&pause
复制代码

[ 本帖最后由 inittab 于 2010-3-1 23:48 编辑 ]