我正在尝试下载MS Excel文件(二进制文件)。我甚至得到了正确的响应标题(参见附加的图像(httpfox和vbscript))。尝试使用以下函数保存objWinHttp.ResponseBody
时(在许多帖子中找到下载二进制文件):
Function SaveBinaryData (FileName, ByteArray)
adTypeBinary = 1
adSaveCreateOverWrite = 2
SET BinaryStream = CreateObject("ADODB.Stream")
BinaryStream.Type = adTypeBinary
BinaryStream.Open
BinaryStream.Write(ByteArray)
BinaryStream.SaveToFile FileName, adSaveCreateOverWrite
BinaryStream = 0
'BinaryStream.Close
'Return SaveBinaryData
End Function
该文件被保存为带有二进制内容的乱码。
以下是Excel文件,如果有人想看看内容的样子:https://dl.dropboxusercontent.com/u/17845471/mySrsExport.xls