淘主机论坛

 找回密码
 成为淘友

QQ登录

只需一步,快速开始

KT服务器促销中 100M带宽 10T流量 超值传送门:会员注册及发帖规则 发帖看过来
查看: 3707|回复: 0

[经验] msxml3.dll 错误 '800c0005' 的几种原因[转帖]

[复制链接]
发表于 2008-7-2 14:21:26 | 显示全部楼层 |阅读模式
搜索了一下,产生msxml3.dll 错误 '800c0005'有以下几种原因:

引用内容:

1、url不存在
2、防火墙问题
3、没有启用Web服务扩展的
4、msxml3.dll损坏了
5、采集的时候配置采集规则没有配置好。


以上几个原因,第一点url不存在-----我的url肯定是存在的,而肯该程序我以前用过没有问题,也没有更改过程序,所以肯定不是这个原因。

第二点至第四点就是服务器的问题了,可能服务器的配置更改。

问题2的解决办法:关掉防火墙或在防火墙中将SYSTEM32目录中的DLLHOST.EXE文件加为信任文件,允许进入和出去的访问权限。
问题3的解决办法:启用  WebDev服务,把DNS client服务启动
问题4的解决办法:到其他机器上找同样版本的文件覆盖(要先停止iis)

另,在网上查到下面的解决方法,我试了但没有成功。

引用内容:

在运用xmlhttp组件编写程序中,会碰到 "msxml3.dll 错误 '800c0005' 系统未找到指定的资源。" 这种错误,网上对这种错误的产生原因有很多钟解释,大体说是因为防火墙或UDP站口权限造成了,也说了相应的解决办法。其它有时候也未必。其实错误的描述中就说出了主要的原因 "系统未找到指定的资源" 。这种错误都是出现在调用了 xmlhttp 组件的 Open方法,接着再用Send方法后造成的。当open方法的的 url 参数无法访问时,就会造成 8000005 错误。并且一旦产生这种错误,就会导致应用程序终止,无法继续操作。大多说的程序是这样写的:
Function functionName(pararm ...)
Dim Http
Set Http=Server.CreateObject("MSXML2.XMLHTTP.4.0")
With Http
.open "GET",HttpUrl,False
.Send
End With
If Http.Readystate<>4 then
Set Http=Nothing
......
Exit function
End if
End Function

大多数的程序都是运用xmlhttp的 Readystate 属性判断从服务器的返回状态。其实这样未必适合,很多时候用ReadyState 属性判断并不能真正检测到程序流程中的错误。当遇到错误的时候,仍然会致使程序终止。其实修改一下上面的代码,完全可以实现跳过程序执行过程中遇到的错误,使程序继续运行。

修改代码如下:
Function functionName(pararm ...)
Dim Http
Set Http=Server.CreateObject("MSXML2.XMLHTTP.4.0")
With Http
.open "GET",HttpUrl,False
.Send
End With
On Error Resume Next
If Http.Status<>200 then
Set Http=Nothing
......
Exit function
End if
End Function

Send 方法产生错误的时候,ReadyState的值或许为4,但Status的返回值就一定不是200的。呵呵,我经过多次跟踪ReadyState和Status的值得到以前结果。可能会有差错,目前我还没有发现。

希望以上程序解决方案能够帮到你!!如果朋友你有更好的解决方法,请一定告诉我哟。

我是以MSXML2.XMLHTTP.4.0为例说明的程序,也适合其它版本的XMLHTTP组件。想检查的你系统中已经安装了哪些版本的XMLHTTP组件,请到注册表的 HKEY_CLASSES_ROOT 下查找。
您需要登录后才可以回帖 登录 | 成为淘友

本版积分规则

小黑屋|手机版|Archiver|淘主机

GMT+8, 2024-12-23 17:44

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表