中国DOS联盟论坛

中国DOS联盟

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

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

游客:  注册 | 登录 | 命令行 | 会员 | 搜索 | 上传 | 帮助 »
中国DOS联盟论坛 » DOS批处理 & 脚本技术（批处理室） » 求助：如何获取目录下1小时内更新的文件？
« [1] [2] » ›
作者:
标题: 求助：如何获取目录下1小时内更新的文件？ 上一主题 | 下一主题
su2qi
新手上路





积分 14
发帖 14
注册 2008-12-11
状态 离线
『楼 主』:  求助：如何获取目录下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 ]

2008-12-12 09:43
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
su2qi
新手上路





积分 14
发帖 14
注册 2008-12-11
状态 离线
『第 2 楼』:  

正在试着写一个:DateTime2time

2008-12-12 10:01
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
su2qi
新手上路





积分 14
发帖 14
注册 2008-12-11
状态 离线
『第 3 楼』:  这个获取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 ]

2008-12-12 11:40
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
su2qi
新手上路





积分 14
发帖 14
注册 2008-12-11
状态 离线
『第 4 楼』:  

能够获得1小时之前的时间了。如3楼。如何把这个时间与文件的修改时间%%~tf进行比较呢？

2008-12-12 14:05
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
yishanju
银牌会员

[b]看你妹啊[/b]


积分 1488
发帖 1357
注册 2006-5-20
状态 离线
『第 5 楼』:  

现在我知道的批处理计算日期差有DATEX

要是计算时间就是一个头疼的事情，代码太繁杂，比较怀疑代码的可靠性。

可以考虑调用VBS可计算时间差。这样也许更好一点




有问题请发论坛或者自行搜索,再短消息问我的统统是SB
2008-12-12 14:12
查看资料  发短消息 网志   编辑帖子  回复  引用回复
su2qi
新手上路





积分 14
发帖 14
注册 2008-12-11
状态 离线
『第 6 楼』:  "%%~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？

2008-12-12 16:34
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
HAT
版主





积分 9023
发帖 5017
注册 2007-5-31
状态 离线
『第 7 楼』:  Re 6楼

开启变量延迟扩展
先把%%~tf赋值给一个临时变量
再对临时变量进行截取



2008-12-12 16:55
查看资料  发短消息 网志   编辑帖子  回复  引用回复
su2qi
新手上路





积分 14
发帖 14
注册 2008-12-11
状态 离线
『第 8 楼』:  多谢tireless和 HAT



  Quote:
Originally posted by HAT at 2008-12-12 16:55:
开启变量延迟扩展
先把%%~tf赋值给一个临时变量
再对临时变量进行截取

@echo off
for /r "D:\test\t\" %%f in (*.*) do (
  set str=%%~tf
call  echo "%%f" "%%str:~11,5%%"
)
###writen  by  tireless

2008-12-12 17:07
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
HAT
版主





积分 9023
发帖 5017
注册 2007-5-31
状态 离线
『第 9 楼』:  Re 8楼

用call会降低代码的执行效率，待处理的文件较多时，尤为明显。

   此帖被 +1 点积分    点击查看详情   
评分人：【 tireless 】分数： +1  时间：2008-12-12 17:49




2008-12-12 17:08
查看资料  发短消息 网志   编辑帖子  回复  引用回复
su2qi
新手上路





积分 14
发帖 14
注册 2008-12-11
状态 离线
『第 10 楼』:  这个获取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做进一步判断和处理

2008-12-12 17:14
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
HAT
版主





积分 9023
发帖 5017
注册 2007-5-31
状态 离线
『第 11 楼』:  Re 10楼

不知道你这个代码是从哪里找到的，日期时间的计算不是这么几行简单的代码就能搞定的。建议使用 Ritchie Lawrence 批处理函数库中的 DateToMins 进行转换然后计算。



2008-12-12 17:19
查看资料  发短消息 网志   编辑帖子  回复  引用回复
su2qi
新手上路





积分 14
发帖 14
注册 2008-12-11
状态 离线
『第 12 楼』:  我是这样用的（目前获取xx分钟前时间的部分有问题）



  Quote:
Originally posted by HAT at 2008-12-12 17:08:
用call会降低代码的执行效率，待处理的文件较多时，尤为明显。

@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

2008-12-12 17:23
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
su2qi
新手上路





积分 14
发帖 14
注册 2008-12-11
状态 离线
『第 13 楼』:  



  Quote:
Originally posted by HAT at 2008-12-12 17:19:
不知道你这个代码是从哪里找到的，日期时间的计算不是这么几行简单的代码就能搞定的。建议使用 Ritchie Lawrence 批处理函数库中的 DateToMins 进行转换然后计算。

…………在坛子里  搜索的结果，东拼西凑

2008-12-12 17:25
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
su2qi
新手上路





积分 14
发帖 14
注册 2008-12-11
状态 离线
『第 14 楼』:  



  Quote:
Originally posted by HAT at 2008-12-12 17:19:
不知道你这个代码是从哪里找到的，日期时间的计算不是这么几行简单的代码就能搞定的。建议使用 Ritchie Lawrence 批处理函数库中的 DateToMins 进行转换然后计算。

我去找找这个 DateToMins 。转换成分钟，比较起来就方便多了

2008-12-12 17:29
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
yishanju
银牌会员

[b]看你妹啊[/b]


积分 1488
发帖 1357
注册 2006-5-20
状态 离线
『第 15 楼』:  



  Quote:
Originally posted by HAT at 2008-12-12 17:19:
不知道你这个代码是从哪里找到的，日期时间的计算不是这么几行简单的代码就能搞定的。建议使用 Ritchie Lawrence 批处理函数库中的 DateToMins 进行转换然后计算。

再麻烦贴个连接呗
忘记收藏到哪了，，，




有问题请发论坛或者自行搜索,再短消息问我的统统是SB
2008-12-12 17:31
查看资料  发短消息 网志   编辑帖子  回复  引用回复
« [1] [2] » ›
请注意：您目前尚未注册或登录，请您注册或登录以使用论坛的各项功能，例如发表和回复帖子等。


可打印版本 | 推荐给朋友 | 订阅主题 | 收藏主题



论坛跳转:  



[ 联系联盟系统管理团队 - 中国DOS联盟 ]

Sponsored by ifanr Inc | © 2001-2023