lazygc520

C:\Documents and Settings\Admin\桌面>if 10 LSS 10 (set hh=00 )  else (set hh=10)

C:\Documents and Settings\Admin\桌面>echo 10
10
复制代码

这是运行结果。

Batcher

是的，分钟会自动补零。
现在是上午10点多钟，你确认这个代码能够获取正确的小时数？

lazygc520

if %time:~1,1% lss 10 (set hh=0%time:~1,1%) else (set hh=%time:~0,2%)
echo %hh%
pause
复制代码

我用echo命令查了下，纠正下batcher的错误。小时需要补零，分钟不需要补零，系统会自动补零。

[ 本帖最后由 lazygc520 于 2009-8-21 10:06 编辑 ]

Batcher

call ateToMins %date:~0,4% %date:~5,2% %date:~8,2% %time:~0,2% %time:~3,2% Mins

在调用函数的时候，使用补零之后的小时和分钟即可。

lazygc520

是不是这样？
for %%a in (%var%) do (if %%a lss 10 (set var0=!var0!,0%%a) else set var0=!var0!,%%a)
问题是我不知道怎么把它套到程序里。

Batcher

QQ群里面讨论的挺热闹啊，你不是说已经明白了么？如果还是想不清楚，就让zqz接着讲^_^

lazygc520

确实不知道怎么写。能不能举个例子？不会是在%date：～%这样形式的代码中插for循环吧？

Batcher

你既然已经知道了不补零算出来的时间肯定是错的，为何还要坚持这样呢？

lazygc520

贴出未补零的代码：

rem 假设本机日期格式为yyyy-mm-dd-hh-nn
set FileY=%date:~0,4%
call :DateToMins %date:~0,4% %date:~5,2% %date:~8,2% %time:~0,2% %time:~3,2% Mins 
set /a Mins-=MinsAgo
call :MinsToDate %Mins% DstYear DstMonth DstDay DstHour DstMin
复制代码

[ 本帖最后由 lazygc520 于 2009-8-27 15:30 编辑 ]

Batcher

我觉得转分钟比较合理、简单。
至于你为何无法获取到想要的文件，在没有看到最新代码的前提下，我也不好妄加猜测。

lazygc520

至于为什么用小时是因为这样的原因：
如果本机时间：10：28，我获取60分钟前的时间信息可以获得。但是只能获取在9：28生成包含时间信息的文件.
我的意思是说能不能获得9：28～10：28之内所有包含时间信息的文件？

Batcher

那个函数库里面没有现成的日期转小时的函数，你有兴趣的话可以自己发明一个出来。

至于补零，可以用“补零”作为关键字在论坛进行搜索，能找到现成的代码。

如果对搜索功能不太熟悉，可以参考：批处理之家论坛使用常见问题FAQ
http://bbs.bathome.net/thread-3473-1-1.html

lazygc520

找到一个补零的帖子：

@echo off & setlocal enabledelayedexpansion
set var=2,15,20,33,56,1,07,54,89,66,23,25,27,28,29,55,56,57,5,59,6,78,74,66,08,28,9,30,52,14,15,16,2,8,4,6,15,16,13,5,9
for %%a in (%var%) do (
  if 1%%a lss 20 (set var0=!var0!,0%%a) else set var0=!var0!,%%a
)
set var0=%var0:~1%
echo %var0%
pause
复制代码

但是有处不懂，if 1%%a lss 20 (set var0=!var0!,0%%a) else set var0=!var0!,%%a
为什么是lss 20啊？

lazygc520

程序我大概读懂了。但是我不清楚传参的时候怎么写？就是你说的补零的情况。还有一个问题，这个DateToMins是日期转分钟的函数，那我可以按小时处理么？怎么处理？

 
call :DateToMins %date:~0,4% %date:~5,2% %date:~8,2% %time:~0,2% %time:~3,2% //这个传参怎么补零？
复制代码

TempDown.txt的一部分结果：

 
C:\Documents and Settings\Admin\My Documents>(
setlocal enabledelayedexpansion  
 if "Jun" EQU "Jan" (set FileM=01 )  else if "Jun" EQU "Feb" (set FileM=02 )  else if "Jun" EQU "Mar" (set FileM=03 )  else if "Jun" EQU "Apr" (set FileM=04 )  else if "Jun" EQU "May" (set FileM=05 )  else if "Jun" EQU "Jun" (set FileM=06 )  else if "Jun" EQU "Jul" (set FileM=07 )  else if "Jun" EQU "Aug" (set FileM=08 )  else if "Jun" EQU "Sep" (set FileM=09 )  else if "Jun" EQU "Oct" (set FileM=10 )  else if "Jun" EQU "Nov" (set FileM=11 )  else if "Jun" EQU "Dec" (set FileM=12 )  
 set FileH=101  //不对，没有补0
 set FileH=!FileH:~-2!  
 if "!FileM!" EQU "01" (if "!FileH!" EQU "00"/×应该是08，我怎么得到的是00？×/ (echo get "F20090532F.SWM" "E:\\F20090532F.SWM" ) )  
 endlocal
) 
复制代码

[ 本帖最后由 lazygc520 于 2009-8-19 09:58 编辑 ]

Batcher

DateToMins函数说明里面写得很清楚，它对传入的参数是这样要求的：

::       %4 待转换的小时，范围是 1/01 到 12 （12小时制，分钟数以“a”或者
::          “p”结尾）或者 0/00 到 23 （24小时制）（传值调用）
::       %5 待转换的分钟，范围是 00-59 （12小时制需加 a/p 后缀）（传值调用）

你截取小时和分钟之后（以24小时制为例），对于小于10的情况（比如9点零5分），需要在左侧补零（比如09和05）