- ·上一篇文章:for语句中的几种分隔符形式
- ·下一篇文章:Norton Ghost批处理命令用法详细介绍
hitme批处理集合
:~3,2!!c_day:~6,2!" lss "%t_day:~2,6%" del /q "%%i" endlocal cls @echo @echo 删除完毕. @echo 30. “” 以明星写真为例;http://www.imagegarden.net/material/index.php?s 保存为.cmd运行,albumid从595到2210 @echo off set /a _n_=595 :loop curl -A "Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.0)" -o tmp.txt http://www.imagegarden.net/viewimage.php?s=^&cataid=4^&albumid=2202^ &imageid=8^&type=jpeg for /f "tokens=4 delims &" %%i in ('findstr "cataid=4&albumid=2202&imageid=8&type=jpeg" tmp.txt') do ( set _session_=%%i ) set /a _n_=%_n_%+1 if %_n_% 2210 goto :clean md %_n_% del /q *.jpg 2>nul :dl for /l %%a in (1,1,9) do ( curl -A "Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.0)" -o %_n_%_00%%a.jpg http://www.imagegarden.net/image_a.php?imagesession=%_session_%^&cat aid=4^&albumid=%_n_%^&imageid=%%a^&type=jpeg for %%i in (%_n_%_*.jpg) do ( if %%~zi 11527 (goto :loop) else move *.jpg %_n_% ) ) for /l %%a in (10,1,99) do ( curl -A "Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.0)" -o %_n_%_0%%a.jpg http://www.imagegarden.net/image_a.php?imagesession=%_session_%^&cat aid=4^&albumid=%_n_%^&imageid=%%a^&type=jpeg for %%i in (%_n_%_*.jpg) do ( if %%~zi 11527 (goto :loop) else move *.jpg %_n_% ) ) for /l %%a in (100,1,999) do ( curl -A "Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.0)" -o %_n_%_%%a.jpg http://www.imagegarden.net/image_a.php?imagesession=%_session_%^&cat aid=4^&albumid=%_n_%^&imageid=%%a^&type=jpeg for %%i in (%_n_%_*.jpg) do ( if %%~zi 11527 (goto :loop) else move *.jpg %_n_% ) ) :clean for /r %%i in (.) do rd /q "%%i" del /q *.jpg del /q tmp.txt dl-1.rar 31. 对象: http://www.sophoto.cn/photopost/showgallery.php?si=&perpage=24&sort 1&cat=501&ppuser 目标:得到图片url,方便flashget批量下载 简单看下页面:连接有分大中小图,规模为12*41张左右 思路: curl抓取41个缩略页面,分析出缩略图url 由于图片命名具有规律,缩掠与大图的区别在于结尾 thumb.gif -thumb.jpg =缩略图 .gif .jpg =大图 med.jpg =中图 这下更简单了,抓取时,替换部分url内容即可 保存为.cmd运行 需要curl @echo off curl -o #1.htm http://www.sophoto.cn/photopost/showgallery.php?cat=501^&si=^&page=[ 1-41]^&sort=1^&perpage=12^&password=0^&ppuser=^&what=^&name=^& setlocal ENABLEDELAYEDEXPANSION for /f "tokens=9 delims " %%i in ('findstr /r "http://www\.sophoto\.cn/photopost/data/" *.htm') do ( set n=%%i set n=!n:-thumb.gif" alt=.gif! set n=!n:-thumb.jpg" alt=.jpg! set n=!n:-thumb.jpeg" alt=.jpeg! set n=!n:"=! echo !n! >>list.txt ) endlocal del *.htm start list.txt list.txt 32. 下载www.sky-fire.com的100多部漫画 毛估有几十万张的漫画图片 需要curl 33. 述求:批量下载http://www.wulffmorgenthaler.com/中的每日图片 图片都是这个格式 http://www.wulffmorgenthaler.com/log/xxxxxxxxx.gif 开工: 1.找文件名规律,gif文件名有两位随机位,碰壁 2.查看htm文件 ,http://www.wulffmorgenthaler.com/thestrip.asp?cDay=09&cMonth=05&cY ear=2005,带年月日,有规律真好 3.列表年月日,备用 4.出动curl,下载htm,分析htm,下载gif 5.收工 保存为get_gif.cmd运行,自行修改红色部分,现表示下载前10天的gif文件 需要curl @echo off ::/ * list date */ set /a n=0 :loop set /a n+=1 >t_day.vbs echo ' Yesterday.vbs, Version 1.01 >>t_day.vbs echo ' >>t_day.vbs echo ' Written by Rob van der Woude >>t_day.vbs echo ' http://www.robvanderwoude.com >>t_day.vbs echo ' >>t_day.vbs echo ' Calculate yesterday's date >>t_day.vbs echo dtmYesterday = DateAdd("d",-%n%,Date) >>t_day.vbs echo ' >>t_day.vbs echo ' Get yesterday's year >>t_day.vbs echo strYear = DatePart("yyyy",dtmYesterday) >>t_day.vbs echo ' >>t_day.vbs echo ' Get yesterday's month, add leading zero if necessary >>t_day.vbs echo If DatePart("m",dtmYesterday) ^< 10 Then >>t_day.vbs echo strMonth = 0 ^& DatePart("m",dtmYesterday) >>t_day.vbs echo Else >>t_day.vbs echo strMonth = DatePart("m",dtmYesterday) >>t_day.vbs echo End If >>t_day.vbs echo ' >>t_day.vbs echo ' Get yesterday's day, add leading zero if necessary >>t_day.vbs echo If DatePart("d",dtmYesterday) ^< 10 Then >>t_day.vbs echo strDay = 0 ^& DatePart("d",dtmYesterday) >>t_day.vbs echo Else >>t_day.vbs echo strDay = DatePart("d",dtmYesterday) >>t_day.vbs echo End If >>t_day.vbs echo ' >>t_day.vbs echo ' Format output for yesterday >>t_day.vbs echo strYest = strYear ^& strMonth ^& strDay >>t_day.vbs echo ' >>t_day.vbs echo ' echo >>t_day.vbs echo Wscript.echo( strYest ) for /f "delims=" %%i in ('cscript.exe //nologo t_day.vbs') do echo %%i>>tmp.txt if %n% neq 10 goto :loop ::/ * get htm&gif * / for /f "delims=" %%i in (tmp.txt) do ( setlocal ENABLEDELAYEDEXPANSION set n=%%i curl -o !n!.htm http://www.wulffmorgenthaler.com/thest
上一页 [1] [2] [3] [4] [5] [6] [7] [8] [9] [10] [11] [12] [13] [14] 下一页
hitme批处理集合