msxml3.dll 错误 '80070005' 拒绝访问。

最新推荐文章于 2022-05-01 10:26:35 发布

原创最新推荐文章于 2022-05-01 10:26:35 发布 · 3.4k 阅读

0 ·

CC 4.0 BY-SA版权

本文介绍了一种解决因网页跳转导致无法正确获取页面内容的方法。通过更换使用的HTTP请求对象，从Microsoft.XMLHTTP改为MSXML2.ServerXMLHTTP，可以有效避免跳转带来的问题。此外还提供了一个使用CDO.Message创建MHTMLBody的示例代码。

代码如下：
PostUrl=http://www.xxx.com/
Server.ScriptTimeOut=20
Set oXMLHttp = createObject("Microsoft.XMLHTTP")
Call oXMLHttp.Open("get", PostUrl, false)
Call oXMLHttp.Send("")
sHtmlStr = oXMLHttp.responseBody
Set oXMLHttp = nothing

初步判定可能是打开的页面有跳转的原因，解决办法是用
MSXML2.ServerXMLHTTP
替换掉
Microsoft.XMLHTTP
即可解决。

另外在优快云上找到这么一段代码
ServerURL=PostUrl
Set   Mail1   =   Server.CreateObject("CDO.Message")
Mail1.CreateMHTMLBody   ServerURL,31
AA=Mail1.HTMLBody
Set   Mail1   =   Nothing
Response.Write   AA

试了一下，也可以用，拷过来收藏