[原创]网易手机壁纸小偷VBS源码
'网易手机壁纸小偷程序
'该版本将下载最大尺寸图片，按照不同尺寸分目录保存
'Blue Art Studio - Gavin Kuo
'创建日期 2005-8-10
'最后修改 2005年10月28日 15:25:55
Sub Main
'彩图 http://mms.163.com/new_web/cm_lv2.jsp?type=0
picAllName = "灌篮高手||绝色美女||姿态撩人||手绘美女||制服诱惑||封面女郎||卡通美媚||真人美女秀||港台偶像||韩日红人馆||国内大腕||欧美明星||Q版明星||男欢女爱||两小无猜||爱情祝福||整蛊专家||搞怪BB||动物也疯狂||Q版卡通||手绘卡通||小美小美||家有贱狗||乱马1/2||火影忍者||圣斗士||暴暴牛||思思狗||绿豆蛙||水果部落||猪朋狗友||刀刀的世界||日本漫画系列||香港漫画系列||真情问候||生日祝福||春节||圣诞节||情人节||中秋节||元宵节||万圣节||劳动节||母亲节||端午节||绝色风光||四季花语||海底世界||手绘之美||校园风光||可爱宠物||奇趣动物||极品靓车||极速摩托||绿茵盛事||篮球风云||精彩瞬间||体坛明星||梦幻西游||大话西游||游戏精选||星球大战||偶像剧场||影视海报||广告精选||星座生肖||秀色可餐||时尚精品||水墨彩绘||纸醉金迷||怀旧情怀||地下铁||月亮忘记了||布瓜的世界||你们我们他们||听几米唱歌||我只能为你画一张小卡片||幸运儿||森林唱游||美食天堂||时尚精品||精品家居||另类一族||纸醉金迷||休闲生活||艺术名画||国画精粹||怀旧情怀||主题世界||枪林弹雨||武装天地||绚彩图片"
picAllUrl = "http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=217||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=34||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=201||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=33||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=35||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=36||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=37||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=198||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=39||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=104||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=40||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=43||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=222||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=119||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=120||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=60||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=94||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=93||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=110||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=112||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=152||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=62||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=63||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=111||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=181||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=182||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=202||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=221||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=151||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=240||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=121||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=179||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=65||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=166||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=175||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=59||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=50||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=58||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=52||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=57||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=51||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=54||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=183||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=189||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=195||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=90||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=91||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=89||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=200||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=92||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=87||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=88||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=97||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=108||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=99||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=100||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=102||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=246||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=75||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=76||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=78||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=85||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=149||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=84||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=86||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=146||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=248||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=249||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=251||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=250||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=252||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=107||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=160||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=161||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=170||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=171||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=172||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=173||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=190||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=44||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=45||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=46||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=48||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=136||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=150||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=80||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=81||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=82||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=83||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=95||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=96||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=123"
'动画 http://mms.163.com/new_web/cm_lv2.jsp?type=1
'picAllName = "美女工场||美女表情||刀刀专栏||港台明星||日韩明星||欧美明星||鬼马明星秀||日常祝福||生日祝福||新婚喜庆||财源滚滚||春节||元宵节||情人节||妇女节||愚人节||母亲节||五一节||六一节||万圣节||中秋节||国庆节||圣诞节||七月十四||七夕节||父亲节||元旦||3.15消费权益保护日||搞怪语音贺卡||端午节||七一建党节||浓情蜜意||真情告白||美丽心情||小美系列||恋爱物语||灌篮高手||火影忍者||新世纪福音战士EVA||乱马二分之一||冒泡的天然画板||哆啦A梦||相聚一刻||家有贱狗||水果部落||暴暴牛||猪高乐翻天||韩国漫画精选||手机月历||来电显示||关机画面||文字秀||屏幕保护||星座生肖||开机画面||童话世界||文传漫画系列||功夫秘诀||KAK方块猪||友情万岁||约会娱乐||晚安道别||动感汽车||动感车徽||超炫体育||体坛明星||幽默男女||搞笑泡泡系列||搞怪宝贝||街头搞笑文化||爆笑SHOW||海底世界||恋恋风景||花花世界||时尚美女||古典美女||清纯可人||大话西游||梦幻西游||可爱宠物||宠物情缘||奇趣动物||猫言狗语||动画世界||你们我们他们||地下铁||向左走向右走||布瓜的世界||我只能为你画一张小卡片||我的心中每天开一朵花||月亮忘记了||森林唱游||森林里的秘密||照相本子||几米圣诞||几米新年||黑白异境||履历表||微笑的鱼||幸运儿||遗失了一只猫||123木头人||星球大战||韩日作品||掌上mtv||绿豆蛙LEON||星座物语||3D美女||嘟嘟与乐乐"
'picAllUrl = "http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=14||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=122||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=83||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=18||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=19||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=118||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=152||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=20||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=21||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=22||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=87||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=23||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=24||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=25||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=26||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=27||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=28||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=29||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=30||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=31||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=32||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=33||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=34||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=78||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=79||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=84||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=117||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=86||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=120||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=137||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=138||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=35||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=36||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=37||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=38||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=115||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=40||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=133||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=141||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=43||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=147||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=74||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=103||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=114||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=151||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=153||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=156||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=157||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=44||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=45||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=46||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=48||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=49||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=47||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=88||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=106||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=111||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=121||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=123||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=50||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=51||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=52||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=54||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=55||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=57||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=75||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=59||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=60||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=61||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=131||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=132||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=67||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=112||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=130||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=127||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=128||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=129||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=139||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=140||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=69||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=107||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=71||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=80||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=72||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=93||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=94||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=95||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=96||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=97||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=98||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=99||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=100||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=101||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=102||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=116||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=119||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=142||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=143||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=144||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=145||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=146||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=148||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=125||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=126||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=134||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=136||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=150||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=154||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=155"
picAllNameArr = split(picAllName,"||")
picAllUrlArr = split(picAllUrl,"||")
msgBox("爬行开始！")
Dim Url
for i = 0 to ubound(picAllNameArr)
getPageCount picAllUrlArr(i),picAllNameArr(i)
next
msgBox("开始下载！")
savePath = "E:\切图\163_pic" '保存路径<<<<<<<<<<<<<<<<<<<<<<<<<<<
down_head = "http://mmsimg.163.com/new_web/loaditem.jsp/type=0/path=" '彩图<<<<<<<<<<<<<<<<<<<<<<<<<<<
'down_head = "http://mmsimg.163.com/new_web/loaditem.jsp/type=1/path=" '动画<<<<<<<<<<<<<<<<<<<<<<<<<<<
imageSize = "240x320||176x220||176x180||144x176||132x160||128x160||128x146||128x128||128x96||120x160||120x144||120x128||120x101||96x113||80x80"
imageSiezArr = split(imageSize ,"||")
'该版本将下载最大尺寸图片，按照不同尺寸分目录保存
'Blue Art Studio - Gavin Kuo
'创建日期 2005-8-10
'最后修改 2005年10月28日 15:25:55
Sub Main
'彩图 http://mms.163.com/new_web/cm_lv2.jsp?type=0
picAllName = "灌篮高手||绝色美女||姿态撩人||手绘美女||制服诱惑||封面女郎||卡通美媚||真人美女秀||港台偶像||韩日红人馆||国内大腕||欧美明星||Q版明星||男欢女爱||两小无猜||爱情祝福||整蛊专家||搞怪BB||动物也疯狂||Q版卡通||手绘卡通||小美小美||家有贱狗||乱马1/2||火影忍者||圣斗士||暴暴牛||思思狗||绿豆蛙||水果部落||猪朋狗友||刀刀的世界||日本漫画系列||香港漫画系列||真情问候||生日祝福||春节||圣诞节||情人节||中秋节||元宵节||万圣节||劳动节||母亲节||端午节||绝色风光||四季花语||海底世界||手绘之美||校园风光||可爱宠物||奇趣动物||极品靓车||极速摩托||绿茵盛事||篮球风云||精彩瞬间||体坛明星||梦幻西游||大话西游||游戏精选||星球大战||偶像剧场||影视海报||广告精选||星座生肖||秀色可餐||时尚精品||水墨彩绘||纸醉金迷||怀旧情怀||地下铁||月亮忘记了||布瓜的世界||你们我们他们||听几米唱歌||我只能为你画一张小卡片||幸运儿||森林唱游||美食天堂||时尚精品||精品家居||另类一族||纸醉金迷||休闲生活||艺术名画||国画精粹||怀旧情怀||主题世界||枪林弹雨||武装天地||绚彩图片"
picAllUrl = "http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=217||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=34||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=201||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=33||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=35||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=36||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=37||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=198||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=39||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=104||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=40||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=43||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=222||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=119||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=120||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=60||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=94||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=93||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=110||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=112||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=152||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=62||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=63||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=111||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=181||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=182||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=202||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=221||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=151||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=240||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=121||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=179||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=65||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=166||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=175||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=59||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=50||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=58||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=52||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=57||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=51||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=54||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=183||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=189||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=195||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=90||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=91||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=89||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=200||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=92||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=87||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=88||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=97||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=108||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=99||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=100||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=102||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=246||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=75||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=76||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=78||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=85||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=149||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=84||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=86||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=146||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=248||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=249||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=251||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=250||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=252||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=107||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=160||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=161||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=170||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=171||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=172||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=173||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=190||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=44||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=45||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=46||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=48||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=136||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=150||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=80||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=81||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=82||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=83||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=95||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=96||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=0&catID=123"
'动画 http://mms.163.com/new_web/cm_lv2.jsp?type=1
'picAllName = "美女工场||美女表情||刀刀专栏||港台明星||日韩明星||欧美明星||鬼马明星秀||日常祝福||生日祝福||新婚喜庆||财源滚滚||春节||元宵节||情人节||妇女节||愚人节||母亲节||五一节||六一节||万圣节||中秋节||国庆节||圣诞节||七月十四||七夕节||父亲节||元旦||3.15消费权益保护日||搞怪语音贺卡||端午节||七一建党节||浓情蜜意||真情告白||美丽心情||小美系列||恋爱物语||灌篮高手||火影忍者||新世纪福音战士EVA||乱马二分之一||冒泡的天然画板||哆啦A梦||相聚一刻||家有贱狗||水果部落||暴暴牛||猪高乐翻天||韩国漫画精选||手机月历||来电显示||关机画面||文字秀||屏幕保护||星座生肖||开机画面||童话世界||文传漫画系列||功夫秘诀||KAK方块猪||友情万岁||约会娱乐||晚安道别||动感汽车||动感车徽||超炫体育||体坛明星||幽默男女||搞笑泡泡系列||搞怪宝贝||街头搞笑文化||爆笑SHOW||海底世界||恋恋风景||花花世界||时尚美女||古典美女||清纯可人||大话西游||梦幻西游||可爱宠物||宠物情缘||奇趣动物||猫言狗语||动画世界||你们我们他们||地下铁||向左走向右走||布瓜的世界||我只能为你画一张小卡片||我的心中每天开一朵花||月亮忘记了||森林唱游||森林里的秘密||照相本子||几米圣诞||几米新年||黑白异境||履历表||微笑的鱼||幸运儿||遗失了一只猫||123木头人||星球大战||韩日作品||掌上mtv||绿豆蛙LEON||星座物语||3D美女||嘟嘟与乐乐"
'picAllUrl = "http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=14||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=122||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=83||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=18||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=19||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=118||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=152||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=20||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=21||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=22||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=87||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=23||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=24||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=25||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=26||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=27||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=28||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=29||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=30||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=31||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=32||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=33||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=34||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=78||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=79||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=84||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=117||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=86||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=120||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=137||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=138||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=35||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=36||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=37||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=38||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=115||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=40||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=133||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=141||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=43||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=147||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=74||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=103||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=114||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=151||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=153||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=156||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=157||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=44||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=45||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=46||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=48||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=49||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=47||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=88||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=106||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=111||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=121||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=123||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=50||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=51||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=52||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=54||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=55||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=57||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=75||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=59||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=60||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=61||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=131||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=132||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=67||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=112||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=130||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=127||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=128||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=129||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=139||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=140||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=69||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=107||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=71||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=80||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=72||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=93||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=94||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=95||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=96||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=97||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=98||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=99||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=100||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=101||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=102||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=116||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=119||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=142||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=143||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=144||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=145||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=146||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=148||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=125||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=126||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=134||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=136||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=150||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=154||http://mms.163.com/new_web/cm_lv2_pic.jsp?type=1&catID=155"
picAllNameArr = split(picAllName,"||")
picAllUrlArr = split(picAllUrl,"||")
msgBox("爬行开始！")
Dim Url
for i = 0 to ubound(picAllNameArr)
getPageCount picAllUrlArr(i),picAllNameArr(i)
next
msgBox("开始下载！")
savePath = "E:\切图\163_pic" '保存路径<<<<<<<<<<<<<<<<<<<<<<<<<<<
down_head = "http://mmsimg.163.com/new_web/loaditem.jsp/type=0/path=" '彩图<<<<<<<<<<<<<<<<<<<<<<<<<<<
'down_head = "http://mmsimg.163.com/new_web/loaditem.jsp/type=1/path=" '动画<<<<<<<<<<<<<<<<<<<<<<<<<<<
imageSize = "240x320||176x220||176x180||144x176||132x160||128x160||128x146||128x128||128x96||120x160||120x144||120x128||120x101||96x113||80x80"
imageSiezArr = split(imageSize ,"||")
'建立数据库连接
Set conn = CreateObject("ADODB.Connection")
DSNtemp = "DRIVER={SQL Server};SERVER=127.0.0.1;UID=sa;PWD=123456;DATABASE=datebase"
conn.open DSNtemp
sql = "select * from pic where fromSite='网易' and localPath is null order by id"
set rs = CreateObject("Adodb.recordset")
rs.open sql,conn,1,3
do while not rs.eof
url = rs("url")
if left(url,1) = "/" then url = right(url,len(url)-1)
urlArr = split(url,"/")
urlPathNum = ubound(urlArr) - 1 '有几级目录
localPath = ""
'第一种文件名命名方法,适用于一套图片放一个目录
for i = 0 to urlPathNum
localPath = localPath & "\" & urlArr(i)
next
fileName = urlArr(urlPathNum + 1) '文件名
'filePath = savePath & localPath '新路径
'fileExcArr = split(urlArr(urlPathNum + 1),".") 'fileExcArr(ubound(fileExcArr))=扩展名
'第二种文件名命名方法,适用于多套图片放同一目录,如a_01 a_02 b_01 b_02
'for i = 0 to urlPathNum - 1
' localPath = localPath & "\" & urlArr(i)
'next
'fileExcArr = split(urlArr(urlPathNum + 1),".")
'fileName = urlArr(urlPathNum) & "." & fileExcArr(1) '新文件名
'filePath = savePath & localPath '新路径
'msgbox("Path: " & filePath & chr(13) & "Name: " & fileName & "")
'msgbox("url: " & down_head & url_old & chr(13) & "local: " & filePath & "\" & fileName & "")
down = False
downSizeStatus = ""
for s = 0 to Ubound(imageSiezArr)
downUrl = down_head & "/" & replace(url,"128x128",imageSiezArr(s))
fileStream = GetBody(downUrl)
if len(fileStream) > 0 then
fileNameTemp = split(fileName,".")
fileName = imageSiezArr(s) & "." & fileNameTemp(ubound(fileNameTemp))
if not down then
localSavePath = savePath & "\" & imageSiezArr(s) & localPath
CreateDIR localSavePath
down = SaveToFile(fileStream , localSavePath & "\" & fileName) '返回True则下载成功
imageMaxSize = imageSiezArr(s)
end if
downSizeStatus = downSizeStatus & "1,"
else
downSizeStatus = downSizeStatus & "0,"
end if
next
if down then
imageMaxSizeTemp = split(imageMaxSize , "x")
imageWidth = imageMaxSizeTemp (0)
imageHeight = imageMaxSizeTemp (1)
rs("localPath") = localPath
rs("localName") = fileName
rs("maxWidth") = imageWidth
rs("maxHeight") = imageHeight
rs("downSizeStatus") = left(downSizeStatus , len(downSizeStatus)-1)
rs("downtime") = now()
rs.update
end if
rs.movenext
loop
rs.close
set rs = Nothing
msgBox("下载完成！")
End Sub
VBS，Windows系统都可以运行，保存为文本，扩展名vbs就可以，自己建数据库Set conn = CreateObject("ADODB.Connection")
DSNtemp = "DRIVER={SQL Server};SERVER=127.0.0.1;UID=sa;PWD=123456;DATABASE=datebase"
conn.open DSNtemp
sql = "select * from pic where fromSite='网易' and localPath is null order by id"
set rs = CreateObject("Adodb.recordset")
rs.open sql,conn,1,3
do while not rs.eof
url = rs("url")
if left(url,1) = "/" then url = right(url,len(url)-1)
urlArr = split(url,"/")
urlPathNum = ubound(urlArr) - 1 '有几级目录
localPath = ""
'第一种文件名命名方法,适用于一套图片放一个目录
for i = 0 to urlPathNum
localPath = localPath & "\" & urlArr(i)
next
fileName = urlArr(urlPathNum + 1) '文件名
'filePath = savePath & localPath '新路径
'fileExcArr = split(urlArr(urlPathNum + 1),".") 'fileExcArr(ubound(fileExcArr))=扩展名
'第二种文件名命名方法,适用于多套图片放同一目录,如a_01 a_02 b_01 b_02
'for i = 0 to urlPathNum - 1
' localPath = localPath & "\" & urlArr(i)
'next
'fileExcArr = split(urlArr(urlPathNum + 1),".")
'fileName = urlArr(urlPathNum) & "." & fileExcArr(1) '新文件名
'filePath = savePath & localPath '新路径
'msgbox("Path: " & filePath & chr(13) & "Name: " & fileName & "")
'msgbox("url: " & down_head & url_old & chr(13) & "local: " & filePath & "\" & fileName & "")
down = False
downSizeStatus = ""
for s = 0 to Ubound(imageSiezArr)
downUrl = down_head & "/" & replace(url,"128x128",imageSiezArr(s))
fileStream = GetBody(downUrl)
if len(fileStream) > 0 then
fileNameTemp = split(fileName,".")
fileName = imageSiezArr(s) & "." & fileNameTemp(ubound(fileNameTemp))
if not down then
localSavePath = savePath & "\" & imageSiezArr(s) & localPath
CreateDIR localSavePath
down = SaveToFile(fileStream , localSavePath & "\" & fileName) '返回True则下载成功
imageMaxSize = imageSiezArr(s)
end if
downSizeStatus = downSizeStatus & "1,"
else
downSizeStatus = downSizeStatus & "0,"
end if
next
if down then
imageMaxSizeTemp = split(imageMaxSize , "x")
imageWidth = imageMaxSizeTemp (0)
imageHeight = imageMaxSizeTemp (1)
rs("localPath") = localPath
rs("localName") = fileName
rs("maxWidth") = imageWidth
rs("maxHeight") = imageHeight
rs("downSizeStatus") = left(downSizeStatus , len(downSizeStatus)-1)
rs("downtime") = now()
rs.update
end if
rs.movenext
loop
rs.close
set rs = Nothing
msgBox("下载完成！")
End Sub
id,name,url,type,click,downtime,picType,maxWidth,maxHeight,localPath,localName,fromSite,downSizeStatus
