|
qwertl
中级用户
积分 461
发帖 243
注册 2007-10-14
状态 离线
|
『楼 主』:
怎样实现win2000下的自动删除几天前文件?
如下代码在win2003及XP下执行正常: set desfolder=e:\rardata
setlocal enabledelayedexpansion
>"%tmp%\MyDel.vbs" echo dt=date()-11
>>"%tmp%\MyDel.vbs" echo s=right(year(dt),4) ^& right("0" ^&
month(dt),2) ^& right("0" ^& day(dt),2)
>>"%tmp%\MyDel.vbs" echo wscript.echo s
for /f %%a in ('cscript /nologo "%tmp%\MyDel.vbs"') do set DateFlag=%%a
echo %DateFlag%
pause
for /f "tokens=*" %%a in ('dir /s /b /a-d "%desfolder%"') do (
set FileDate=%%~ta
set FileDate=!FileDate:-=!
set FileDate=!FileDate:~0,8!
if !FileDate! lss %DateFlag% (
echo "%%a"
)
)
pause
在win2003下执行结果正常删
set FileDate=2008-10-27 22:20
set FileDate=!FileDate:-=!
set FileDate=!FileDate:~0,8!
if !FileDate! LSS 20081018 (echo ....)
在win2000下执行时不正常,可能是set FileDate=%%~ta 这句取得的文件日期与xp 及2003不同. 要怎样改这个代码呢?
set FileDate=08-10-22 17:56
set FileDate=!FileDate:-=!
set FileDate=!FileDate:~0,8!
if !FileDate! LSS 20081023 (echo ....)
[ Last edited by qwertl on 2008-11-6 at 09:21 ]
|
|
 2008-11-5 16:16 |
|
|
yishanju
银牌会员
[b]看你妹啊[/b]
积分 1488
发帖 1357
注册 2006-5-20
状态 离线
|
『第
2 楼』:
用RAR.EXE 实现。。。
用DATEX 处理时间。
[ Last edited by yishanju on 2008-11-5 at 16:52 ]
|
有问题请发论坛或者自行搜索,再短消息问我的统统是SB |
|
|
2008-11-5 16:18 |
|
|
HAT
版主
积分 9023
发帖 5017
注册 2007-5-31
状态 离线
|
『第
3 楼』:
|
|
|
|
2008-11-5 18:00 |
|
|
qwertl
中级用户
积分 461
发帖 243
注册 2007-10-14
状态 离线
|
『第
4 楼』:
rar +datex有代码吗 
|
|
|
2008-11-5 18:36 |
|
|
yishanju
银牌会员
[b]看你妹啊[/b]
积分 1488
发帖 1357
注册 2006-5-20
状态 离线
|
『第
5 楼』:
论坛里都能搜到有用法，自己搜吧
|
有问题请发论坛或者自行搜索,再短消息问我的统统是SB |
|
|
2008-11-5 19:08 |
|
|
qwertl
中级用户
积分 461
发帖 243
注册 2007-10-14
状态 离线
|
『第
6 楼』:
setlocal enabledelayedexpansion
set desfolder=e:\rardata
for /f %%a in ('e:\soft\datex.exe -f "yymmdd" -o-11') do set DateFlag=%%a
echo %DateFlag%
pause
for /f "tokens=*" %%a in ('dir /s /b /a-d "%desfolder%"') do (
set FileDate=%%~ta
set FileDate=!FileDate:-=!
set FileDate=!FileDate:~0,6!
if !FileDate! lss %DateFlag% (
del /f /q "%%a"
)
)
pause
以上代码在win2000下测试可行. 
win2003&XP用以下的代码可以: setlocal enabledelayedexpansion
set desfolder=e:\rardata
for /f %%a in ('d:\datex.exe -f "yyyymmdd" -o-11') do set DateFlag=%%a
echo %DateFlag%
pause
for /f "tokens=*" %%a in ('dir /s /b /a-d "%desfolder%"') do (
set FileDate=%%~ta
set FileDate=!FileDate:-=!
set FileDate=!FileDate:~0,8!
if !FileDate! lss %DateFlag% (
del /f /q "%%a"
)
)
pause
[ Last edited by qwertl on 2008-11-6 at 12:17 ]
|
|
|
2008-11-6 10:25 |
|
