标题: 求助：如何获取目录下1小时内更新的文件？ [打印本页]
作者: su2qi 时间: 2008-12-12 09:43 标题: 求助：如何获取目录下1小时内更新的文件？
基础：
今早刚接触dos批处理。
功能需求：
1 遍历目录的a，拷贝1小时内刷新的su2qi*.txt文件到目录b。
2 遍历目录b，删除6小时前的文件。
今天在线，边学习批处理边在网上与大家交流，希望得到大家的帮助。
正在根据这个脚本进行修改，希望各位有什么好建议，回帖讨论。
Thank u！
示例：假设今天是8月26日，我要删除2天以前的文件，也就是删除8月23日以前的文件，目标目录是d:\arch，那么用法如下：
DelOldFile 2005-08-23 d:\arch
:: DateDel2.bat - 删除指定路径下指定日数以前修改的文件
:: Will Sort - 2005-9-2 - CMD@WinXP
:: 注意事项：参数%1指定日数，昨天为1，前天为2，依次类推
:: 参数%1指定文件路径，省略时将处理当前路径
:: 核心算法：Ritchie Lawrence, updated 2002-08-13. Version 1.1
::
@echo off & setlocal ENABLEEXTENSIONS
call :Date2Day %date:~0,10% sdays
set /a sdays-=%1
call :Day2Date %sdays% difdate
echo 将删除 %cd% 下 %difdate% 前的修改的以下文件：
for /r %2 %%f in (*.*) do if "%%~tf" LEQ "%difdate%" echo "%%f"
goto :EOF
:Date2Day
setlocal ENABLEEXTENSIONS
for /f "tokens=1-3 delims=/-, " %%a in ('echo/%1') do (
set yy=%%a & set mm=%%b & set dd=%%c
)
set /a dd=100%dd%%%100,mm=100%mm%%%100
set /a z=14-mm,z/=12,y=yy+4800-z,m=mm+12*z-3,j=153*m+2
set /a j=j/5+dd+y*365+y/4-y/100+y/400-2472633
endlocal&set %2=%j%&goto :EOF
:Day2Date
setlocal ENABLEEXTENSIONS
set /a i=%1,a=i+2472632,b=4*a+3,b/=146097,c=-b*146097,c/=4,c+=a
set /a d=4*c+3,d/=1461,e=-1461*d,e/=4,e+=c,m=5*e+2,m/=153,dd=153*m+2,dd/=5
set /a dd=-dd+e+1,mm=-m/10,mm*=12,mm+=m+3,yy=b*100+d-4800+m/10
(if %mm% LSS 10 set mm=0%mm%)&(if %dd% LSS 10 set dd=0%dd%)
endlocal&set %2=%yy%-%mm%-%dd%&goto :EOF
[ Last edited by su2qi on 2008-12-12 at 14:05 ]
作者: su2qi 时间: 2008-12-12 10:01
正在试着写一个:DateTime2time
作者: su2qi 时间: 2008-12-12 11:40 标题: 这个获取60分钟前时间的脚本有问题，帮忙看看
echo 当前系统时间：%time:~0,5%
for /f "tokens=1,2 delims=:." %%a in ("%time%") do (
set /a t=100%%a%%100,h=100%%b%%100-60
)
set /a s=(t+h/60)%%24,f=h%%60
set s=0%s%&set "f=0%f%"
echo 60分钟前的时间：%s:~-2%:%f:~-2%
当前系统时间：16:40
60分钟前的时间：16:20
我觉得要对h和t做进一步判断和处理
[ Last edited by su2qi on 2008-12-12 at 17:10 ]
作者: su2qi 时间: 2008-12-12 14:05
能够获得1小时之前的时间了。如3楼。如何把这个时间与文件的修改时间%%~tf进行比较呢？
作者: yishanju 时间: 2008-12-12 14:12
现在我知道的批处理计算日期差有DATEX
要是计算时间就是一个头疼的事情，代码太繁杂，比较怀疑代码的可靠性。
可以考虑调用VBS可计算时间差。这样也许更好一点
作者: su2qi 时间: 2008-12-12 16:34 标题: "%%~tf:~12,5" 应该怎么写
for /r "D:\test\t\" %%f in (*.*) do if "%%~tf:~12,5" LEQ "%time%" echo "%%f"
这里"%%~tf:~12,5" 写的不对。%%~tf是"2008-12-11 09:11“，如何获取子串09:11？
作者: HAT 时间: 2008-12-12 16:55 标题: Re 6楼
开启变量延迟扩展
先把%%~tf赋值给一个临时变量
再对临时变量进行截取
作者: su2qi 时间: 2008-12-12 17:07 标题: 多谢tireless和 HAT
| Quote: | |
|
@echo off
for /r "D:\test\t\" %%f in (*.*) do (
set str=%%~tf
call echo "%%f" "%%str:~11,5%%"
)
###writen by tireless
作者: HAT 时间: 2008-12-12 17:08 标题: Re 8楼
用call会降低代码的执行效率，待处理的文件较多时，尤为明显。
作者: su2qi 时间: 2008-12-12 17:14 标题: 这个获取60分钟前时间的脚本有问题，帮忙看看
echo 当前系统时间：%time:~0,5%
for /f "tokens=1,2 delims=:." %%a in ("%time%") do (
set /a t=100%%a%%100,h=100%%b%%100-60
)
set /a s=(t+h/60)%%24,f=h%%60
set s=0%s%&set "f=0%f%"
echo 60分钟前的时间：%s:~-2%:%f:~-2%
当前系统时间：16:40
60分钟前的时间：16:20
我觉得要对h和t做进一步判断和处理
作者: HAT 时间: 2008-12-12 17:19 标题: Re 10楼
不知道你这个代码是从哪里找到的，日期时间的计算不是这么几行简单的代码就能搞定的。建议使用 Ritchie Lawrence 批处理函数库中的 DateToMins 进行转换然后计算。
作者: su2qi 时间: 2008-12-12 17:23 标题: 我是这样用的（目前获取xx分钟前时间的部分有问题）
| Quote: | |
|
@echo off & setlocal ENABLEEXTENSIONS
echo 当前系统时间：%time:~0,5%
for /f "tokens=1,2 delims=:." %%a in ("%time%") do (
set /a t=100%%a%%100,h=100%%b%%100-10
)
set /a s=(t+h/60)%%24,f=h%%60
set s=0%s%&set "f=0%f%"
echo 10分钟前的时间：%s:~-2%:%f:~-2%
for /r "D:\test\t\" %%f in (*.*) do (
set str=%%~tf
if "%%str:~11,5%%" LEQ "%s:~-2%:%f:~-2%" echo "%%f"
)
echo ===== ：
echo.&pause
goto :EOF
作者: su2qi 时间: 2008-12-12 17:25
| Quote: | |
|
…………在坛子里 搜索的结果，东拼西凑
作者: su2qi 时间: 2008-12-12 17:29
| Quote: | |
|
我去找找这个 DateToMins 。转换成分钟，比较起来就方便多了
作者: yishanju 时间: 2008-12-12 17:31
| Quote: | |
|
再麻烦贴个连接呗
忘记收藏到哪了，，，
作者: HAT 时间: 2008-12-12 17:37 标题: Re 15楼
http://www.commandline.co.uk/index.html
作者: su2qi 时间: 2008-12-12 17:48
| Quote: | |
|
http://www.cn-dos.net/forum/viewthread.php?tid=39843
作者: su2qi 时间: 2008-12-12 18:06
| Quote: | |
|
有其他的替代方式么？
作者: HAT 时间: 2008-12-12 21:03 标题: Re 18楼
7楼不是说了么？