Board logo

标题: 怎样实现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下执行结果正常删 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: www.cn-dos.net/forum ... 参考：www.cn-dos.net/forum ...
作者: 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下测试可行. 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 ]