&&因一个兄弟的求助贴，突然想到写一个任意时间回溯的批处理(非vbs)，因为
知道要对分时日月年进行判断相当复杂，开始也做好了思想准备，可写到中间才
真正明白此中的难处，难就难在怎么把别人输入的任意时间进行转换计算，如输
入0 0 0 0 100000(指100000分钟)，怎么把之转代成要回溯的年月日时分，我
脑壳想破了也没想清楚，望大家帮理一下思路，因问题的意思也难以描述清楚，
特在下面贴出我的部分代码：
[ Last edited by zw19750516 on 2008-6-2 at 12:39 AM ]
知道要对分时日月年进行判断相当复杂，开始也做好了思想准备，可写到中间才
真正明白此中的难处，难就难在怎么把别人输入的任意时间进行转换计算，如输
入0 0 0 0 100000(指100000分钟)，怎么把之转代成要回溯的年月日时分，我
脑壳想破了也没想清楚，望大家帮理一下思路，因问题的意思也难以描述清楚，
特在下面贴出我的部分代码：
@echo off&color 1f&mode con lines=10&setlocal enabledelayedexpansion
title ***时间回溯批处理*** by cn-dos zw19750516
:begin
cls&echo.&echo ===============================================================================
echo 请输入要回溯的时间，请按年 月 日 时 分的格式正确输入，无数值的请输入0，中间请用空格格开，请不要在数值前补0，如：10 6 1 19 44(10年6个月1天19个小时44分钟)，0 0 0 0 400(400分钟)，而10 06 01 19 44和10 6以及10 6 0 0 0 0均为错误输入。
echo ===============================================================================
echo.&set /p times=请在此输入：
echo %times: =%|findstr ""&&goto wrong
for %%i in (%times%) do (
set /a n+=1&set str=%%i
if "!str:~,1!" equ "0" goto wrong
)
if !n! neq 5 goto wrong
set n=0
for /f "tokens=1-5 delims= " %%a in ("%times%") do set /a ys=%%a,ms=%%b,ds=%%c,hs=%%d,mis=%%e
set /a y=%date:~,4%,m=100%date:~5,2%%%100,d=100%date:~8,2%%%100,mi=100%time:~3,2%%%100
if "%time:~,1%"=="" (set h=%time:~1,1%) else (set h=%time:~,2%)
set /a a=%y%%%4,b=%y%%%100,c=%y%%%400
if %c% equ 0 (set yun=A) else (if %a% equ 0 if %b% neq 0 set yun=A)
if defined yun (set n=29) else (set n=28)
set /a mi-=mis,h-=hs,d-=ds,m-=ms,h-=hs
............................
:wrong
cls&echo.&echo.&echo 错误的数值，请正确输入&ping /n 2 127.1>nul&goto begin
[ Last edited by zw19750516 on 2008-6-2 at 12:39 AM ]
批处理之家新域名：www.bathome.net
