[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
股浪遇

Rank: 1

帖子
7 
积分
31 
技术
0  
捐助
0  
注册时间
2012-5-26 
1楼 跳转到 » 倒序看帖
打印
tT
发表于 2012-5-27 00:04 | 只看该作者

[问题求助] [已解决]VBS下载网页如何一次性完成？

本帖最后由 股浪遇 于 2012-6-27 00:29 编辑 
  1. Set xPost = createObject("Microsoft.XMLHTTP")

  2. xPost.Open "GET"," http://***/****/DM",0 

  3. xPost.Send()

  4. Set sGet = createObject("ADODB.Stream")

  5. sGet.Mode = 3

  6. sGet.Type = 1

  7. sGet.Open()

  8. sGet.Write(xPost.responseBody)

  9. sGet.SaveToFile "d:\001\DM.txt",2 
复制代码
**************************************
DM内容如下
A0001
A0002
A0003
..
B0001
************************************
请教如何才能一次性完成，谢谢！
收藏 分享

broly

Rank: 7Rank: 7Rank: 7

帖子
881 
积分
2103 
技术
95  
捐助
55  
注册时间
2010-5-23 
2楼
发表于 2012-5-28 17:13 | 只看该作者
没理解你的意思。
DM.TXT不是就一个文件吗？
看不出哪里有很多个文件要一次性下载
---学无止境---

TOP

股浪遇

Rank: 1

帖子
7 
积分
31 
技术
0  
捐助
0  
注册时间
2012-5-26 
3楼
发表于 2012-5-28 17:20 | 只看该作者
本帖最后由 股浪遇 于 2012-5-28 19:37 编辑

DM.TXT是一个文件
网页分别是：
http://***/****/A0001
http://***/****/A0002
http://***/****/A0003
...
下载后，分别保存为DM.TXT文件中对应的文件名（A0001...)
不知道我说清楚了没
谢谢broly版主！

TOP

powerbat

Rank: 7Rank: 7Rank: 7

帖子
752 
积分
4553 
技术
139  
捐助
0  
注册时间
2010-8-24 
4楼
发表于 2012-5-28 23:03 | 只看该作者
你的真的没说清楚，吼吼。。。
script56
新加坡Google

TOP

broly

Rank: 7Rank: 7Rank: 7

帖子
881 
积分
2103 
技术
95  
捐助
55  
注册时间
2010-5-23 
5楼
发表于 2012-5-29 22:24 | 只看该作者
回复 3# 股浪遇


    http://***/****/A0001
http://***/****/A0002
http://***/****/A0003

这部分的网页，如果没有规律就不好搞了。
没规律只能自己一个个下载。O_o
---学无止境---

TOP

返回列表