问答文章1 问答文章501 问答文章1001 问答文章1501 问答文章2001 问答文章2501 问答文章3001 问答文章3501 问答文章4001 问答文章4501 问答文章5001 问答文章5501 问答文章6001 问答文章6501 问答文章7001 问答文章7501 问答文章8001 问答文章8501 问答文章9001 问答文章9501

VB6.0:如何通过xmlhttp对象,获取多个URL的HTML代码?

发布网友 发布时间:2022-04-12 12:47

我来回答

2个回答

热心网友 时间:2022-04-12 14:16

建议采用异步方式调用xmlhttp,然后通过轮询的方式不断检测xmlhttp的readyState属性,等于4的时候就可以读取数据,完毕后就可以继续读取下一个页面了。
读取数据的时候,还应该检测xmlhttp的status属性,只有200才表示返回的是正确的网页数据,而其他如404表示未找到网页、500表示服务器错误等等。
轮询的时候可以加个计数器,达到某个数值时就跳出继续读取下个网页或结束读取,这样就可避免某个网页打开速度过慢而影响整个读取过程。

更好的解决办法是一次性声明多个xmlhttp对象变量(建议用数组),这样就可以同时获取多个网页的代码。当然这种情况下就必须使用异步调用方式。追问额...
不好意思了,之前没看到你的答案...

热心网友 时间:2022-04-12 15:34

给你推荐一个:

Function getHtmlStr(strUrl As String) '获取源码
On Error Resume Next
Dim XmlHttp As Object, stime, ntime
Set XmlHttp = CreateObject("Microsoft.XMLHTTP")
XmlHttp.open "GET", strUrl, True
XmlHttp.send
stime = Now '获取当前时间
While XmlHttp.ReadyState <> 4
DoEvents
ntime = Now() '获取循环时间
If DateDiff("s", stime, ntime) > 3 Then getHtmlStr = "": Exit Function ‘3秒获取不到就退出获取
Wend
getHtmlStr = StrConv(XmlHttp.responseBody, vbUnicode)
Set XmlHttp = Nothing
End Function
使用:
abc=getHtmlStr("http://www.baidu.com")
1、判断是否获取到内容,判断abc的值就可以了
2、加载慢超时问题,只能重复获取,时间太长,容易造成软件假死不稳定等问题。
声明声明:本网页内容为用户发布,旨在传播知识,不代表本网认同其观点,若有侵权等问题请及时与本网联系,我们将在第一时间删除处理。E-MAIL:11247931@qq.com
十亿韩元折合人民币是多少阿? 邮政银行卡余额查询 邮政储蓄查询余额怎么查 艰难 的国运与雄健的国民读后感500(把以前与现在作对比) 初一下册人教版 艰难的国运与雄健的国民 读后感300字 今日头条哪个版本的有电脑版电脑版今日头条怎么下载 今日头条在电脑上如何安装今日头条怎样就安装到电脑上了 如何评价武庙? 武经总要前集概述 武经总要军事思想 为什么有巢湖东站到深圳北的动车,而没有深圳北到巢湖东的车呢? 米白色油漆怎么调出来 无为到铜陵的车终点站在哪,是长途汽车站吗? 米白色怎么调 怎么才检查汽车钥匙摇控芯片坏? 从合肥都无为县襄安镇怎么坐车? 凤台有到合肥新桥机场的大巴车吗? 米白色漆怎么调配 无为到巢湖的车最早几点 颜料调色中,米白色应该怎么调制 安徽芜湖无为到宿州的车有吗?多少钱?什么时间?求解,,, 芜湖市无为县有没有到安徽阜阳的汽车?在哪坐? 请问无为新沟或姚沟到合肥的汽车是几点? 无为到合肥坐大巴要几个小时? 哈尔滨银行卡插到交通银行提款机上记不清操作转账了最高转一1000元没有了转哪去了? 哈尔滨银行给邮政储蓄银行里汇两万元人民币需要多少费用 哈尔滨银行卡支付宝转账限额为什么有的是五千有的是五万 vb 中用xmlhttp 怎么样刷新获取网页数据 哈尔滨银行转出50000还能取吗 哈行手机银行不能转账,为什么?提示超出每日单笔限额,但我转几百也提示这个 怎么判断STC15W404芯片坏了 刷米白色墙面,怎么调色表 怎么知道护照芯片坏了 在电路中怎么去判别芯片坏啦 微博红包没人领多久退回,已经过了5天了! 马盘金双子会觉得对方好看吗 电脑主板上怎么判别是哪个芯片坏了 芯片坏了怎么测出来它坏了啊? 苹果12怎么关闭低电量模式 ios怎么关闭低数据模式 中国大陆的茶叶蛋做法具体是怎样 generic打印机是什么牌子 彩色打印复印一体机什么牌子的好? 求XMLHTTP攫取网页表格数据的代码。 如何设置百度为主页? 同在一个省,不在一个市,可以在当地打印以前参保的社保清单吗? 怎么打印社保卡清单? 怎样设置双首页的搜索引擎? 还不知道怎么购买意外死亡保险?手把手教你其中小窍门 意外死亡保险怎么买