我尝试在Excel宏中调用web服务。该调用工作正常,但响应被截断(整个响应大约为2兆字节)。
这是我正在使用的程序
Sub CallWebService(xmlRequest As String)
Dim pRequest As New WinHttpRequest
pRequest.Open "GET", "http://my-url-here", True
pRequest.SetRequestHeader "SOAPAction", "groupRequest"
pRequest.SetRequestHeader "Content-Type", "text/xml; charset=""UTF-8"""
pRequest.Send xmlRequest
pRequest.WaitForResponse (100)
ActiveWorkbook.Sheets("Sheet1").Range("A1").value = pRequest.ResponseText
End Sub
如何获取整个回复文本?