Http.open "GET",HttpUrl,false请问这个应该怎么办

Question

Http.open "GET",HttpUrl,false请问这个应该怎么办建的网站采集信息的时候出现错误错误： '80004005' /admin/inc/function.asp，行 70 “/admin/inc/function.asp，行 70 ”正是 “Http.open "GET",HttpUrl,false”  请问出现这个问题怎么办啊 ？相关函数：'==================================================
'函数名：GetHttpPage
'作  用：获取网页源码
'参  数：HttpUrl ------网页地址
'==================================================
Function GetHttpPage(HttpUrl)
 dim http
 Set http=server.createobject(Msxml)
 Http.open "GET",HttpUrl,false
 'On Error Resume Next
 Http.send()
 If Http.readystate<>4 Then Exit Function
 GetHttpPage=BytesToBstr(Http.ResponseBody,"GB2312")
 If InStr(Lcase(getHTTPPage), "charset=utf-8") Then  getHTTPPage=Http.responseText
 Set http=nothing
 if err.number<>0 then err.Clear 
End Function

Answer 1

建议去查查 Msxml 对象的 open 方法.
可能是你的 HttpUrl 参数传送得不对.