如果取得ServerXmlHttp错误
msxml3.dll 错误 '80072ee2'
The operation timed out
想取得上边的错误信息,方便显示自己定义的出误内容.
我的代码是:
Dim HTTP
Set Http = CreateObject("MSXML2.ServerXMLHTTP")
dim xAction
xAction ="http://podcast.bokee.com/podcast.xml"
dim lResolve,lConnect,lSend,lReceive
lResolve = 1 * 1000
lConnect = 1 * 1000
lSend = 16 * 1000
lReceive = 6 * 1000
Http.setTimeouts lResolve, lConnect, lSend, lReceive
Http.open "GET", xAction, FALSE
Http.send
While Http.readyState <> 4
Http.waitForResponse 1000
Wend
if err.number = 0 then
response.Write http.responseXML.xml
else
response.Write("错误")
end if
问题点数：100、回复次数：4Top
1 楼KimSoft（革命的小酒天天醉-http://blog.csdn.net/kimsoft/）回复于 2006-03-06 17:01:45 得分 100
if err.number = 0 then
response.Write http.responseXML.xml
else
response.Write http.statusText '用这个试试
end ifTop
2 楼epjack（笨蛋一个）回复于 2006-03-06 17:05:00 得分 0
谢谢.
不过不行.一样是显示IIS的错误信息.而不是
response.Write http.statusText '用这个试试
这个出来的东西!
证明err.number不能取得这个错误Top
3 楼epjack（笨蛋一个）回复于 2006-03-06 17:24:06 得分 0
这问题找了很多遍google了,没有找到答案.再顶顶.Top
4 楼KimSoft（革命的小酒天天醉-http://blog.csdn.net/kimsoft/）回复于 2006-03-07 08:16:53 得分 0
if http.parseError.errorCode == 0 then
response.Write http.responseXML.xml
else
response.Write http.statusText
end ifTop
