看下面的代码片段，主要完成的是获取返回的数据（实现股票功能）

var data=bytes2BSTR(xmlhttp.ResponseBody);

上述代码中，在处理返回数据的时候用到了bytes2BSTR方法，这是一个网络流行的编码转换方法，主要是将返回字符串中的中文乱码转换成正确的格式，这是一个vb脚本方法。我们需要在网站添加一个VBScript.vbs的文件，下面是VBScript.vbs中的内容：

Function bytes2BSTR(vIn)
strReturn = ""
For i = 1 To LenB(vIn)
ThisCharCode = AscB(MidB(vIn,i,1))
If ThisCharCode < &H80 Then
strReturn = strReturn & Chr(ThisCharCode)
Else
NextCharCode = AscB(MidB(vIn,i+1,1))
strReturn = strReturn & Chr(CLng(ThisCharCode) * &H100 + CInt(NextCharCode))
i = i + 1
End If
Next
bytes2BSTR = strReturn
End Function

在使用编码转换的方法时，返回的数据应为ResponseBody：因为服务器的响应包括head、body等全部信息，所以可以使用此属性只获取相应的body部分