标题: 我的自动下载论坛图片的批处理. [打印本页]
作者: tianzizhi 时间: 2007-1-24 08:11 标题: 我的自动下载论坛图片的批处理.
图片论坛有好多好看的图片,可一个一个另存为太麻烦了,做了下面的批处理,让机子在论坛里转一遍慢慢下去吧,我玩去了......我这经常间断性的断网,加上了这方面的内容,断网后也不用怕,网连好后自动接着下.
你也可用它专一性的下载图片或其它一类东西,具体情况自行修改一下即可....
@echo off
setlocal enabledelayedexpansion
:ji
for /f %%i in (d:\jilu.txt) do @set /a kai=%%i
for /f %%j in (d:\num.txt) do @set /a num=%%j
:xia
for /l %%a in (!kai!,1,135000) do (
call :zhang
curl -o %%a.txt http://*********/bbs/viewthread.php?tid=%%a
for /f "delims=" %%i in ('findstr "http://.*jpg" %%a.txt') do (
set /a num=num+1
set "var=%%i"
set "var=!var: src=☆!"
set "var=!var:.jpg"=☆!"
set "var=!var:*☆=!"
for /f "tokens=1 delims==☆" %%j in ("!var!") do (
set "yi=%%~j"
echo !yi!
for /f "tokens=2 delims=//" %%k in ("!yi!") do (
echo http://%%k>>xiazailianjie.txt
ping -n 5 http://%%k | find "reply from" /i
if errorlevel==1 set /a kai=!kai!+1 & echo %%k>>weilianji.txt & del %%a.txt & echo %%a>d:\jilu.txt & goto xia )
wget -t 8 -w 3 -c -T 30 -P d:\图片\tupian\ %%~j.jpg
ren d:\图片\tupian\%%~nj.jpg tupian-!num!.jpg
echo !num!>d:\num.txt
)
)
echo %%a>d:\jilu.txt
del %%a.txt /f
)
:zhang
ping -n 2 www.baidu.com | find "reply from" /i
if errorlevel==1 timeout /t 150 & goto ji
::pause
::wget代理用法:#-e "http_proxy=http://<ip>:<port>/"
::#set http_proxy=http://<ip>:<port>/
作者: vkill 时间: 2007-1-24 09:04
顶顶~~兄也喜欢wget+sed
作者: tianzizhi 时间: 2007-1-24 09:25
昨天搜索东西搜索到你的网志,内容很丰富,很不错,还发现你的网址是一级域名,很厉害呀,是你自己的服务器吗,羡慕啊!!!
http://vkill.net/
http://blog.vkill.net/
作者: vkill 时间: 2007-1-24 09:27
| Quote: | |
|
空间是买的了
作者: tsz2008 时间: 2007-4-3 05:12
刚学这些不久，不知楼主能不能演示一下这么批处理？
谢谢了
作者: zzghost 时间: 2007-4-3 11:07
jiu就是jilu.txt 和num里面放什么东西？
作者: jacklee83 时间: 2007-4-11 02:25
楼主能不能举个例子，我试了很多次还是不知道怎么用。