Dim HttpReq作為對象
字符串形式的Dim請求
HttpReq = CreateObject("MSXML2。XMLHTTP.3.0”)
HttpReq.open("GET ",uri,False)
HttpReq.send()
解析返回值
request = HttpReq.responseBody
request = Split(Split(StrConv(request,vbUnicode,& ampH804)," = "(1),";")(0)