xmlHttp msxml3.dll 错误 '800c0008' 解决办法

最近经常遇到xmlHttp组件的问题, 今天终于有空将解决过程中的经验整理下来了! ^o^

一、在运用xmlhttp组件编写程序中，会碰到 "msxml3.dll 错误 '800c0005' 系统未找到指定的资源。" 这种错误，网上对这种错误的产生原因有很多种解释，大体说是因为防火墙或UDP端口权限造成了，也说了相应的解决办法。

二、其实错误的描述中就说出了主要的原因 "系统未找到指定的资源" 。这种错误都是出现在调用了 xmlhttp 组件的 Open方法，接着再用Send方法后造成的。当open方法的的 url 参数无法访问时，就会造成 8000005 错误。并且一旦产生这种错误，就会导致应用程序终止，无法继续操作。
源程序修改如下：

Function GetBody(weburl)  
    '创建对象 
    set xml1 = server.createObject("Microsoft.XMLHTTP") 

    xml1.open "get",weburl,False 
    xml1.send 
    if xml1.status<>200 then 
       '释放对象 
       GetBody = "" 
       Set xml1 = Nothing  
       Exit Function 
   end if 
   GetBody = xml1.ResponseBody 
   Set xml1 = Nothing  
End Function