看看是不是有防火墻或者殺毒軟件正監(jiān)視這個進程。

不是的話看看下邊別的網(wǎng)友的解釋：

在運用xmlhttp組件編寫程序中，會碰到 "msxml3.dll 錯誤 '800c0005' 系統(tǒng)未找到指定的資源。" 這種錯誤，網(wǎng)上對這種錯誤的產(chǎn)生原因有很多鐘解釋，大體說是因為防火墻或UDP站口權(quán)限造成了，也說了相應的解決辦法。其它有時候也未必。其實錯誤的描述中就說出了主要的原因 "系統(tǒng)未找到指定的資源" 。這種錯誤都是出現(xiàn)在調(diào)用了 xmlhttp 組件的 Open方法，接著再用Send方法后造成的。當open方法的的 url 參數(shù)無法訪問時，就會造成 8000005 錯誤。并且一旦產(chǎn)生這種錯誤，就會導致應用程序終止，無法繼續(xù)操作。大多說的程序是這樣寫的: 
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 
大多數(shù)的程序都是運用xmlhttp的 Readystate 屬性判斷從服務器的返回狀態(tài)。其實這樣未必適合，很多時候用ReadyState 屬性判斷并不能真正檢測到程序流程中的錯誤。當遇到錯誤的時候，仍然會致使程序終止。其實修改一下上面的代碼，完全可以實現(xiàn)跳過程序執(zhí)行過程中遇到的錯誤，使程序繼續(xù)運行。修改代碼如下: 
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 方法產(chǎn)生錯誤的時候，ReadyState的值或許為4，但Status的返回值就一定不是200的。呵呵，我經(jīng)過多次跟蹤ReadyState和Status的值得到以前結(jié)果?？赡軙胁铄e，目前我還沒有發(fā)現(xiàn)。 
希望以上程序解決方案能夠幫到你!!如果朋友你有更好的解決方法，請一定告訴我喲。 
我是以MSXML2.XMLHTTP.4.0為例說明的程序，也適合其它版本的XMLHTTP組件。想檢查的你系統(tǒng)中已經(jīng)安裝了哪些版本的XMLHTTP組件，請到注冊表的 HKEY_CLASSES_ROOT 下查找。