vbs xmlhttp 响应文本被截断？

Question

大家好，我有一个简单的 vbs 脚本，它正在抓取一个 url（使用 GET 获取值），我需要解析文本。然而，我收到的响应文本并不是完整的响应。我收到一个长度为 1000 的字符串，但我知道响应应该更像 5000。

Function getServer(server_hostname)
    Set objHTTP = CreateObject("msxml2.xmlhttp.3.0")
    objHTTP.open "GET", "http://someurl/ServerInfo.asp", False
    objHTTP.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
    objHTTP.send "B1=GO!!&Server=" + server_hostname 

    getServer = objHTTP.responseText
End Function

serverStr = getServer(server_hostname)
msgbox(Len(serverStr))

可以返回的数量是否有限制？感谢您的帮助。

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

所以我将我的功能更改为：

Function getServer(server_hostname)
    Set objHTTP = CreateObject("MSXML2.ServerXMLHTTP")
    objHTTP.open "GET", "http://someurl/ServerInfo.asp?B1=GO!!&Server=" + server_hostname , False
    'objHTTP.setRequestHeader "Content-Type", "text/html"
    'objHTTP.send "B1=GO!!&Server=" + server_hostname 
    objHTTP.send

    getServer = objHTTP.responseText
End Function

现在它可以工作了......不知道为什么。

Answer 1

MsgBox 的最大长度为 1024 个字符。

参考：http://www.w3schools.com/vbscript/func_msgbox.asp