[系统相关] 批处理如何提取当月星期六和星期日所在日期？

taozy

本人菜鸟，希望高手可以出手帮下忙，最好讲下代码的每一步含义，先谢谢了

caruko

咳,楼下的说法确实不错,要兼容不管区域设置是什么的话,跟4楼一样从某个已知日期开始计算.. 就不献丑了
或者用个getweekday.vbs,然后调用它 getweekday yyyy-mm-dd,可以得到任意日期的星期数..

dim wd
wd=WEEKDAY(WScript.Arguments(0),2)
wscript.echo wd
复制代码

[ 本帖最后由 caruko 于 2010-4-17 11:25 编辑 ]

GNU

如果是英文系统咋办？

hanyeguxing

@echo off&setlocal enabledelayedexpansion
for /f "tokens=1,2 delims=-:/ " %%a in ("%date%") do set Y=%%a&set M=%%b&if "!M:~0,1!"=="0" set M=!M:~1!
set/a "T=^!(M-2)","R=(^!(Y%%4)&^!^!(Y%%100))|^!(Y%%400)","C=^!(M-4)|^!(M-6)|^!(M-9)|^!(M-11)","E=T*(28+R)+C*30+(^!T&^!C)*31"
if %M% lss 3 set B=1
for %%i in (0 31 59 90 120 151 181 212 243 273 304 334) do set/a V+=1&if "%M%"=="!V!" set/a "W=7-(%%i+Y+Y/4-Y/100+Y/400-R*B)%%7"
echo.%Y%年%M%月所有的星期六和星期日依次是: 
for /l %%i in (%W%,7,%E%) do set/a B=%%i+1&(if !B! gtr %E% set "B= ")&set/p"=%%i !B! "<nul
pause>nul
复制代码

[ 本帖最后由 hanyeguxing 于 2010-4-18 20:28 编辑 ]

taozy

楼上大侠厉害，可是代码俺有点看不懂哈，能不能给加点注释啊