![]() |
#2
约定的童话2021-12-24 19:31
|
病急乱投医,仿写了一段VBA代码,怎么得到返回的数据呢?
Sub zyl()
Set http = CreateObject("MSXML2.XMLHTTP")
URLNAME = "https://biz.
lcRq = "2021.12.17"
lcCode = "300415"
response = http.Open("POST", URLNAME, False)
response = http.SETREQUESTHEADER("Content-Type", "application/x-www-form-urlencoded")
response = http.SEND("queryDate=" + lcRq + "&secCde=" + lcCode)
Rem 可以运行到这里,下面出现错误
Print (response.Status())
Print (respons.RESPONSEBODY)
End Sub