2024年5月29日发(作者：撒奇思)
虚拟主机问题之 错误 '800c0005'系统未找到指定的资源
这个情况以前经常遇到过，一般出现在采集信息或用XMLHTTP静态更新网页的时候会出
现这个问题，以前出现类似的错误都是用
set objXmlHttp = Object("P") '一般在msxml2.6以下版本使
用
' set objXmlHttp = Object("P") '受+支持
替换着使用，现在却怎么都报错。
搜索了网上我所知道所有的技术论坛和搜索引擎，引起这样的问题可能存在多种情况，下面
总结一下：
（一）那就是最基本的了，你的服务器不支持xmlhttp或组件版本态低，需要下载相应的组
件。这个一般服务器都不需要的，大多数情况下都支持xmlhttp，所以这个情况较少。
（二） 文件可能损坏或该文件使用权限不够(权限这个情况可能性较小)，如果是
文件损坏的话，你可以到网上下载相应系统环境的文件替换下 (2003系统好像
在c:windowssystem32下)，需要关闭相应的服务例如iis等才能覆盖。
（三）防火强或杀毒软件禁用了相应的端口，具体该怎么设置要根据不同的软件而定，你可
以试着关闭防火墙或杀毒软件后再测试确定是否是这个问题。
（四）重新注册下该组件试试看。
（五）DNS解析错误，检查你的网络设置或正确的域名解析访问
（六）检查你的IP筛选的设置（这个不是太了解）
（七） 对方资源失效，比如采集某条信息时，对方该条信息不存在导致程序终止错误，也
可能是这种情况。这种错误都是出现在调用了 xmlhttp 组件的 Open方法，接着再用Send
方法后造成的。当open方法的的 url 参数无法访问时，就会造成 8000005 错误。并且一
旦产生这种错误，就会导致应用程序终止，无法继续操作。大多说的程序是这样写的:
Function functionName(pararm ...)
Dim Http
Set Http=Object("P.4.0")
With Http
.open "GET",HttpUrl,False
.Send
End With
If tate<>4 then
Set Http=Nothing
......
Exit function
End if
End Function
大 多数的程序都是运用xmlhttp的 Readystate 属性判断从服务器的返回状态。其实这样未
必适合，很多时候用ReadyState 属性判断并不能真正检测到程序流程中的错误。当遇到错
误的时候，仍然会致使程序终止。其实修改一下上面的代码，完全可以实现跳过程序执行过
程中遇到的错 误，使程序继续运行。修改代码如下:
Function functionName(pararm ...)
Dim Http
Set Http=Object("P.4.0")
With Http
.open "GET",HttpUrl,False
.Send
End With
On Error Resume Next
If <>200 then
Set Http=Nothing
......
Exit function
End if
End Function
Send 方法产生错误的时候，ReadyState的值或许为4，但Status的返回值就一定不是200
的。呵呵，我经过多次跟踪ReadyState和Status的值得到以前结果。可能会有差错，目前我
还没有发现。
希望以上程序解决方案能够帮到你!!如果朋友你有更好的解决方法，请一定告诉我哟。
我是以P.4.0为例说明的程序，也适合其它版本的XMLHTTP组件。想
检查的你系统中已经安装了哪些版本的XMLHTTP组件，请到注册表的
HKEY_CLASSES_ROOT 下查找。
（八）[size=2]进入服务器设置您的IE安全选项（把等级设中或低试试看），在受信任网站
里加入您要获取的域名即可。[/size]
（九） 以上方法我基本都看过之后也试过了，不过都没解决。于是去微软下载了
[url=/downloads
/?familyid=3144B72B-B4F2-46DA-B4B6-C5D7485F2B42&displaylang=zh-cn][color
=#3fa600]MSXML 4.0 Service Pack 2 (Microsoft XML Core Services)[/color][/url]和
[url=/downloads
/?familyId=341CAF5F-0CDD-47A8-AF5D-91E14FCF7A0D&displayLang=zh-cn
&oRef=http%3a%2f%2f[url][/url]%2fdownloads%%3ffamil
yId%3d3144b72b-b4f2-46da-b4b6-c5d7485f2b42%26displayLang%3dzh-cn%26oRef%3dhttp%2
53a%252f%252f[url][/url]%252fdownloads%%253fFamilyI
D%253d3144b72b-b4f2-46da-b4b6-c5d7485f2b42%2526DisplayLang%253den][color=#3fa600]
Hotfix for MSXML 4.0 Service Pack 2 - KB832414 - 简体中文
（KB832414_MSXML4.0_）[/color][/url]安装后，问题终于解决了！！！
（十）如果你的情况，在我上面方法都解决不了，你继续到网上找其它可能出现的情况吧，
如果不想继续找了就重装你的iis或干脆重装系统（做这个之前你可以试着重新启动一下系
统看看，或许可能大概仿佛幸运的话又可以使用了
2024年5月29日发(作者：撒奇思)
虚拟主机问题之 错误 '800c0005'系统未找到指定的资源
这个情况以前经常遇到过，一般出现在采集信息或用XMLHTTP静态更新网页的时候会出
现这个问题，以前出现类似的错误都是用
set objXmlHttp = Object("P") '一般在msxml2.6以下版本使
用
' set objXmlHttp = Object("P") '受+支持
替换着使用，现在却怎么都报错。
搜索了网上我所知道所有的技术论坛和搜索引擎，引起这样的问题可能存在多种情况，下面
总结一下：
（一）那就是最基本的了，你的服务器不支持xmlhttp或组件版本态低，需要下载相应的组
件。这个一般服务器都不需要的，大多数情况下都支持xmlhttp，所以这个情况较少。
（二） 文件可能损坏或该文件使用权限不够(权限这个情况可能性较小)，如果是
文件损坏的话，你可以到网上下载相应系统环境的文件替换下 (2003系统好像
在c:windowssystem32下)，需要关闭相应的服务例如iis等才能覆盖。
（三）防火强或杀毒软件禁用了相应的端口，具体该怎么设置要根据不同的软件而定，你可
以试着关闭防火墙或杀毒软件后再测试确定是否是这个问题。
（四）重新注册下该组件试试看。
（五）DNS解析错误，检查你的网络设置或正确的域名解析访问
（六）检查你的IP筛选的设置（这个不是太了解）
（七） 对方资源失效，比如采集某条信息时，对方该条信息不存在导致程序终止错误，也
可能是这种情况。这种错误都是出现在调用了 xmlhttp 组件的 Open方法，接着再用Send
方法后造成的。当open方法的的 url 参数无法访问时，就会造成 8000005 错误。并且一
旦产生这种错误，就会导致应用程序终止，无法继续操作。大多说的程序是这样写的:
Function functionName(pararm ...)
Dim Http
Set Http=Object("P.4.0")
With Http
.open "GET",HttpUrl,False
.Send
End With
If tate<>4 then
Set Http=Nothing
......
Exit function
End if
End Function
大 多数的程序都是运用xmlhttp的 Readystate 属性判断从服务器的返回状态。其实这样未
必适合，很多时候用ReadyState 属性判断并不能真正检测到程序流程中的错误。当遇到错
误的时候，仍然会致使程序终止。其实修改一下上面的代码，完全可以实现跳过程序执行过
程中遇到的错 误，使程序继续运行。修改代码如下:
Function functionName(pararm ...)
Dim Http
Set Http=Object("P.4.0")
With Http
.open "GET",HttpUrl,False
.Send
End With
On Error Resume Next
If <>200 then
Set Http=Nothing
......
Exit function
End if
End Function
Send 方法产生错误的时候，ReadyState的值或许为4，但Status的返回值就一定不是200
的。呵呵，我经过多次跟踪ReadyState和Status的值得到以前结果。可能会有差错，目前我
还没有发现。
希望以上程序解决方案能够帮到你!!如果朋友你有更好的解决方法，请一定告诉我哟。
我是以P.4.0为例说明的程序，也适合其它版本的XMLHTTP组件。想
检查的你系统中已经安装了哪些版本的XMLHTTP组件，请到注册表的
HKEY_CLASSES_ROOT 下查找。
（八）[size=2]进入服务器设置您的IE安全选项（把等级设中或低试试看），在受信任网站
里加入您要获取的域名即可。[/size]
（九） 以上方法我基本都看过之后也试过了，不过都没解决。于是去微软下载了
[url=/downloads
/?familyid=3144B72B-B4F2-46DA-B4B6-C5D7485F2B42&displaylang=zh-cn][color
=#3fa600]MSXML 4.0 Service Pack 2 (Microsoft XML Core Services)[/color][/url]和
[url=/downloads
/?familyId=341CAF5F-0CDD-47A8-AF5D-91E14FCF7A0D&displayLang=zh-cn
&oRef=http%3a%2f%2f[url][/url]%2fdownloads%%3ffamil
yId%3d3144b72b-b4f2-46da-b4b6-c5d7485f2b42%26displayLang%3dzh-cn%26oRef%3dhttp%2
53a%252f%252f[url][/url]%252fdownloads%%253fFamilyI
D%253d3144b72b-b4f2-46da-b4b6-c5d7485f2b42%2526DisplayLang%253den][color=#3fa600]
Hotfix for MSXML 4.0 Service Pack 2 - KB832414 - 简体中文
（KB832414_MSXML4.0_）[/color][/url]安装后，问题终于解决了！！！
（十）如果你的情况，在我上面方法都解决不了，你继续到网上找其它可能出现的情况吧，
如果不想继续找了就重装你的iis或干脆重装系统（做这个之前你可以试着重新启动一下系
统看看，或许可能大概仿佛幸运的话又可以使用了