[导入]msxml3.dll 错误 '800c0005'

regsvr32 msxml3.dll msxml3.dll 错误 '800c0005'

msxml3.dll 错误 '800c0005' 系统未找到指定的资源。
本文Tag：web开发(脚本和动态语言) 通讯 web开发 端口
 
 
找了一上午资料，都没搞定，结果发现竟然是因为McAfee把端口封掉了，  被端口阻挡规则阻挡  w3wp.exe 禁止 IRC 通讯  打开控制台，访问保护，禁止IRC通讯，加入w3wp.exe,再次访问，OK！无语了，浪费那么长时间

 
<%Dim xml
 Set xml = Server.CreateObject("Microsoft.XMLHTTP")
 xml.Open "GET", "http://www.qz123.com/newsxp/content/bdxx/zh/200532391521.htm", false
 xml.Send
%>

用ASP运行时在xml.Send报这个错误，
msxml3.dll 错误 '800c0005'
系统未找到指定的资源。
 
URL换成局域网内部WEB页面不出错，通过代理服务器访问INTERNET网页时就出该错，
有谁知道如何解决？更新了xml3 sp5,更新了XML4.0SP2均无法解决该问题，是不是代理服务器上的哪个设置不对，造成出该错。网上有些朋友说没有该问题，我想大多数人上网方式与我相同，为什么不会有这个问题呢？

在运用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 下查找。

文章来源:http://bbs.fzonet.com/rcds/ShowPost.asp?ThreadID=1399