[系统相关] [分享]批处理提取ie缓存文件

ptsdy

我的吐血之作

echo 潜水好长时间。学习了不少东东。感谢批处理之家这个网站！
echo 只提取大于350k的网页文件。只提取打开当天网站的网页缓存文件！朋友们也可自己发挥，自己修改。
echo  我的qq: 670150281  网名：菩提萨朵愿。希望对当初和我一样有求知的人有帮助。好资源应该大家分享！
echo 布施钱财得钱财，布施智慧得智慧。本人是一个佛教信仰者，呵呵。
echo 南无七俱胝佛母大圣准提王菩萨！ 南无七俱胝佛母大圣准提王菩萨！ 南无七俱胝佛母大圣准提王菩萨！
@echo off
title
%1 %2 
start /min  "" "%~nx0" goto min&&goto :eof 
:min
:entrance
endlocal
setlocal enabledelayedexpansion
set  choice=two
set e=%date%
set f=%e:~,10%
set g=%f:-=%
set h=%g:~3,1%
set num=0 & set cnum=0
if "%choice%" equ "two" goto :two
:main
if not exist "%copdes%" md "%copdes%"
for %%u in (%road%) do cd /d %%u\ 2>nul & for /r %%v in (%name%) do (
     if exist %%v (set a=%%~tv            
        set b=!a:~,10!
        set c=!b:-=!
        if !c! geq %date1% if !c! leq %date2% if  %%~zv geq %size1% if  %%~zv leq %size2% (
           set /a num+=1 
           if "%copdel%" equ "det" (echo %%~ftzv 
                   echo %%~ftzv >>"%copdes%\1st.txt") else rem echo %%~sv 
           if "%copdel%" equ "cop" (if not exist "%copdes%\%%~nxv" (
                   set /a cnum+=1
                   copy /y "%%v" "%copdes%"   >nul 2>nul
                    del /f /s /q "%%v"
                    echo "%%v"                    ) else  (
                   (for /r  "%copdes%" %%m in (%%~nv*%%~xv) do set /p =if "%%~zv" neq "%%~zm" <nul
                       echo call :ren ) > "%copdes%\ren.txt" 
                   for /f "usebackq delims=" %%n in ("%copdes%\ren.txt") do  call :abc "%%n" "%copdes%\%%~nxv" "%%~nv" %%~xv "%%v"  
                   del /f /q "%copdes%\ren.txt" >nul 2>nul)                                 
                                                         )                           
           if "%copdel%" equ "del" del /f /s /q /a  "%%v"   >nul 2>nul                                     ) 
                               )
            )                
if exist "%copdes%\1st.txt" attrib +h +s "%copdes%\1st.txt" 2>nul >nul
::echo.&echo Total %num% files meet the requirements ^!
if "%copdel%" equ "cop" echo.&echo Copy  %cnum% files ^!
::if "%copdel%" equ "del" echo.&echo  Delete %num% files ^!
::echo. &echo Task has been finished ^!^!^!
ping -n 3 127.1  >nul 2>nul
pushd .
cd\&cd %temp%
del /f /s /q . 2>nul
cd.. &cd tempor~1
del /f /s /q . 
popd
exit
goto :entrance
:two
set  name=*.swf *.jpg *.wmv *.flv *.hlv *.mp3 *.wav *.wma 
set  date1=%g%
set  date2=30000000
set size1=350000
set  size2=5000000000
set road="%userprofile%\Local Settings"
set copdel=cop
set copdes=%~dp0box
goto :main 
:ren
set rennum=0
:loop
set /a rennum+=1
ren %1 %2%rennum%%3  2>nul 
if "%errorlevel%" neq  "0"  (goto :loop) else (
copy /y %4 "%copdes%"   >nul 2>nul)
goto :eof
:abc
%~1 %2 %3 %4 %5
:eof
echo 谢谢提醒，我知道了。
复制代码

[/code]

Batcher

8# Bearxy


有问题的话，直接发个帖子出来大家一起讨论吧。

Bearxy

4# Bearxy
呵呵，大家共同学习。我的邮箱[email]ptsdy@163.com[/email]
我可以把资料传给你。
去年这个时候我正研究批处理。从不懂到慢慢的学习。
不过现在已经有好几个月没有研究这个了。现在正在学习vb6.0. 现在又遇到了难题 ...
ptsdy 发表于 2011-5-25 11:50

那真是太感谢了,论坛教程是做的不错.但是在看某些比较深奥的批教程的时候,还是有些不懂.例如定位可移动盘之类的,就完全不明白.
我马上E_mail你,感谢!

ptsdy

去年这个时候我正研究批处理。从不懂到慢慢的学习。
不过现在已经有好几个月没有研究这个了。现在正在学习vb6.0. 现在又遇到了难题。
我现在把我以前费思心思做的批处理，公示大家。
希望我的vb也能够上水平。

Bearxy

5# batman
额，抱歉。
不过还是谢谢

batman

4# Bearxy
以后请另发贴咨询，这样予楼主是很不礼貌的。。。
字符截取练习工具：
http://www.bathome.net/viewthrea ... hlight=%BD%D8%C8%A1

Bearxy

刚在想这个问题。你就送来了，batman 老大。我就想就这个问题问下你。。

set f=%e:~,10%
set g=%f:-=%
set h=%g:~3,1%
复制代码

论坛方面好像没有讲解这种的教程哦。我每次在处理问题的时候，例如说。我需要删除两个特定字符之间的字符串。通常我就是用for,delims=将其分开，然后取值进行操作。可看到好多高手都直接用的是上面那种形式，我很无奈啊。完全不懂……

我列举个例子：
将125.46.15.46:1433/sasa
变成125.46.15.46/sasa


我只会这个

@echo off
for /f "tokens=1-3 delims=:/" %%a in (1.txt) do (
 echo %%a/%%c>>new.txt 
)
start "" "new.txt"
pause
复制代码

高手们写的

@echo off
setlocal enabledelayedexpansion
for /f "delims=" %%a in (1.txt) do (
set t=%%a
set t=!t::1433=!
echo !t!>>new.txt
) 
复制代码

能看懂，但是不太懂set t=!t::1433=!的含义。我也不清楚这种写法应该叫什么，百度都不好找。

求指教……（又给你添麻烦了，如果不空的话就告诉我个地址也成………^_^谢谢batman 老大）

ptsdy

对不起，超级版主，我不知道，用code括起代码！请指点！

batman

怎么又发错，还没用code括起代码！