批处理提取IE缓存的指定文件

Wingl83

1. echo off
   
2. set file_num=0
   
3. cls
   
4. echo 请选择要提取的文件类型
   
5. echo 1(swf) 2(flv) 3(jpg) 4(gif) 5(mp3) 6(wma) 7(htm) 8(其它类型) 9(清除IE缓存)
   
6. set /p type=
   
7. if %type%==1 (set filetype=swf)
   
8. if %type%==2 (set filetype=flv)
   
9. if %type%==3 (set filetype=jpg)
   
10. if %type%==4 (set filetype=gif)
    
11. if %type%==5 (set filetype=mp3)
    
12. if %type%==6 (set filetype=wma)
    
13. if %type%==7 (set filetype=htm)
    
14. if %type%==8 (echo 请输入文件类型,例如bmp
    
15. set /p filetype=)
    
16. if %type%==9 (goto :clear_cache)
    
17. 
    
18. :select_del_or_not
    
19. echo 提取后是否删除原文件？(y/n)
    
20. set /p delornot=
    
21. if %delornot%==y (goto startcopy)
    
22. if %delornot%==n (goto startcopy)
    
23. goto select_del_or_not
    
24. :startcopy
    
25. echo 正在提取文件，请稍候……
    
26. md %filetype%
    
27. for /f "delims=" %%i in ('dir "%userprofile%\Local Settings\Temporary Internet Files\*.%filetype%" /s/b') do if not exist "%CD%\%filetype%\%%~nxi" (
    
28. copy /y "%%i" "%CD%\%filetype%") else (
    
29. call :copy_same_name_file "%%~i" "%%~ni" "%%~xi")
    
30. if %delornot%==y (for /f "delims=" %%i in ('dir "%userprofile%\Local Settings\Temporary Internet Files\*.%filetype%" /s/b') do del /f/q "%%i")
    
31. goto :eof
    
32. 
    
33. :copy_same_name_file
    
34. set file_n=%2
    
35. set file_x=%3
    
36. set /a file_num+=1
    
37. ::变量file_num自加1
    
38. echo %file_num%
    
39. if not exist "%CD%\%filetype%\%file_n%_%file_num%%file_x%" (
    
40. copy %1 "%CD%\%filetype%\%file_n%_%file_num%%file_x%">nul
    
41. ) else call :copy_same_name_file %1 %2 %3
    
42. set file_num=0
    
43. goto :eof
    
44. :clear_cache
    
45. for /f "delims=" %%i in ('dir "%userprofile%\Local Settings\Temporary Internet Files\*.*" /s/b') do del /f/q "%%i"
    
46. goto :eof

复制代码

试验了一下，发现若按9——清除IE缓存时并不能做到，我是一个小菜鸟，希望可以帮我修改一下。

Batcher

是倒数第二句的问题吧，这样可以吗？

1. rd /s /q "%userprofile%\Local Settings\Temporary Internet Files\Content.IE5">nul 2>nul

复制代码

Wingl83

不清楚嘢，是将什么改成

1. rd /s /q "%userprofile%\Local Settings\Temporary Internet Files\Content.IE5">nul 2>nul

复制代码

呢？

Batcher

2楼不是说了吗？倒数第二句^_^

Wingl83

不行嘢，加油……

Batcher

我行嘢，加油……

Wingl83

晕倒中……

[ 本帖最后由 Wingl83 于 2008-8-6 10:57 编辑 ]

52mn998

晕晕哦,还是出错啊,我看了好久还是不知道那里有问题

chinaweike

太强了，能教教我吗？我才学的，行的话加我QQ：125350211，谢谢

lxzzr

还请楼主注明出处....