中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名：www.cn-dos.net 论坛域名：www.cn-dos.net/forum
DOS，代表着自由开放与发展，我们努力起来，学习FreeDOS和Linux的自由开放与GNU精神，共同创造和发展美好的自由与GNU GPL世界吧！

中国DOS联盟论坛 » DOS批处理 & 脚本技术（批处理室） » 自动更改月份设置，帮忙看看

hyh8100
新手上路

积分 13
发帖 8
注册 2006-7-22
状态离线

『楼主』: 自动更改月份设置，帮忙看看

帮帮忙，为什么处理到8月份就处理不了了，到8月就反回到1月了

+++++++++++++++++++++++++++++++++++++++++++++
@ECHO OFF
setlocal enabledelayedexpansion

for /f "tokens=1,2,3,4,5 delims=- " %%a in ('date /t') do (
set n=%%a
set y=%%b
set r=%%c
)
set num1=y
set num2=1
call :lineup num1
call :lineup num2
set/a flag=0
for /l %%i in (1 1 2) do (
set/a var=!num1:~-%%i,1!+!num2:~-%%i,1!+!flag!
set var=0!var!
set flag=!var:~-2,1!
set str=!var:~-1!!str!
)
ECHO ON
for /f "delims=0 tokens=*" %%i in ("!str!") do ECHO | DATE %n%-%%i-%r%

PAUSE

:lineup obj
for /l %%i in (1 1 2) do set %1=0!%1!
call set %1=!%1:~-2!

2009-8-4 10:27