我的吐血之作
- 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] |