首页 > Web开发 > 详细

MSXML2.ServerXMLHTTP responseText 获取的内容不完整,解决方案

时间:2015-08-21 15:13:47      阅读:469      评论:0      收藏:0      [点我收藏+]

今天无意发现一个问题, 有个别几个网页使用 MSXML2.ServerXMLHTTP 获取网页源代码的时候,.responseText 总是返回一部分内容,无法获取完整的内容。

经过搜索,找到解决方案: 使用 .responseBody (参考: http://blog.links.cn/asp/aspxmlhttp.html)

不过从参考的文章上看,他的问题与我不完全一样,我测试的时候,只需将 responseText 替换成 responseBody,问题就解决了

参考文章中还提到 adodb.stream的一个BUG,需要将 chr(0) 替换成 ""

 

‘httpGet = xmlhttp.responseText
httpGet = replace(BytesToBstr(xmlhttp.responseBody, "utf-8"), chr(0), "")

 

‘字节根据指定编码转换成字符
Function BytesToBstr(Body,Cset)
Dim Objstream
Set Objstream = Server.CreateObject("adodb.stream")
objstream.Type = 1
objstream.Mode =3
objstream.Open
objstream.Write Body
objstream.Position = 0
objstream.Type = 2
objstream.Charset = Cset
BytesToBstr = objstream.ReadText
objstream.Close
set objstream = nothing
End Function

 

MSXML2.ServerXMLHTTP responseText 获取的内容不完整,解决方案

原文:http://www.cnblogs.com/personnel/p/4747697.html

(0)
(0)
   
举报
评论 一句话评论(0
关于我们 - 联系我们 - 留言反馈 - 联系我们:wmxa8@hotmail.com
© 2014 bubuko.com 版权所有
打开技术之扣,分享程序人生!