随风

这个问题用纯p来解决确实是费力不讨好，但既然楼主允许创建vbs临时文件来完成，就好办多了。
对vbs我也是一窍不通，但以前见过别人用vbs提取日期、星期，现借来一用。
对vbs进行了两次创建和读取，希望懂vbs的朋友能简化一下。

• @echo off&setlocal EnableDelayedExpansion
• echo.&echo  请输入日期：格式  2008-7-12 单数前面可以不需要加0
• echo.&set /p tian= &cls
• for %%a in (日 一 二 三 四 五 六) do (
•    set /a m+=1&set .!m!=%%a
• )
• >%tmp%\tmp.vbs echo wscript.echo Weekday(CDate("%tian%")+0)
• for /f "delims=" %%i in ('cscript /nologo %tmp%\tmp.vbs') do (
•    set /a n=^(8-%%i^)%%7
•    echo.&echo  %tian% 是星期!.%%i!
•    )
• >%tmp%\tmp.vbs echo wscript.echo dateadd("d",%n%,#%tian%#)
• for /f "tokens=* delims=" %%i in ('cscript /nologo %tmp%\tmp.vbs') do (
•    echo.&echo  %%i 是星期日
• )
• del/q %tmp%\tmp.vbs
• pause>nul

                小楼一夜听春雨  2008-07-19  21:22

[ 本帖最后由 随风 于 2008-7-19 22:06 编辑 ]