vbscript - VBscript XMLHTTP 获取网页返回空白

Question

我正在尝试合并几个 wiki 页面的部分以创建一个浓缩/摘要版本。以下代码适用于 google.com 等页面。但是，它为我想要的页面返回了一个空白结果。

有什么建议么？

Set o = CreateObject("MSXML2.ServerXMLHTTP.6.0")
o.open "GET", "http://stevescarts2.wikispaces.com/Modules", False
o.send
If err.number = 0 then    
    MsgBox o.responseText
Else
    MsgBox "error " & err.number & ": " & err.description
End If

Answer 1

没有响应文本。服务器以状态响应302 Found该请求。处理 XMLHTTP 请求时始终检查状态：

WScript.Echo o.status & " " & o.statusText

Answer 2

谢谢，安斯加尔。
非常感激。
这是适用于我的修改后的代码...

Set o = CreateObject("MSXML2.ServerXMLHTTP.6.0")
url = "http://stevescarts2.wikispaces.com/Modules"
Do
  o.open "GET", url, False
  o.send
  If o.Status = 302 Then
    url = o.GetResponseHeader("Location")
  End If
Loop Until err.number = 0 And o.Status <> 302
If err.number = 0 then  
  MsgBox o.responseText
ElseIf o.status & " " & o.statusText Then
  MsgBox "error " & err.number & ": " & err.description
End If