标题: 怎样实现win2000下的自动删除几天前文件? [打印本页]
作者: qwertl 时间: 2008-11-5 16:16 标题: 怎样实现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下执行结果正常删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
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 ]
作者: yishanju 时间: 2008-11-5 16:18
用RAR.EXE 实现。。。
用DATEX 处理时间。
[ Last edited by yishanju on 2008-11-5 at 16:52 ]
作者: HAT 时间: 2008-11-5 18:00
Q: 如何给代码加code标签？
A: http://www.cn-dos.net/forum/viewthread.php?tid=43735#pid304733
参考：http://www.cn-dos.net/forum/faq.php?page=misc#1
作者: qwertl 时间: 2008-11-5 18:36
rar +datex有代码吗
作者: yishanju 时间: 2008-11-5 19:08
论坛里都能搜到有用法，自己搜吧
作者: qwertl 时间: 2008-11-6 10:25
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下测试可行.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
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 ]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