中国DOS联盟

如下代码在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 ]

用RAR.EXE 实现。。。
用DATEX 处理时间。

[ Last edited by yishanju on 2008-11-5 at 16:52 ]

rar +datex有代码吗

论坛里都能搜到有用法，自己搜吧

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 ]