请帮助我解决我的问题:VBA(Excel)的HTTPS POST请求忽略参数。以下简短代码始终为我提供当前页面,并且不会为给定参数重新加载。太老了吗?我该怎么办?参数如下:“ Day = 28&Month = 12&Year = 2019”
当然,当我手动输入其他参数时,我已经在该网站上更新了数据。
Dim oHttp As Object
Dim Parameters As String, strDate As String
Dim I As Long
Set oHttp = CreateObject("Microsoft.XMLHTTP")
I = InStr(1, Url, "?")
Parameters = Mid$(Url, I + 1)
Url = Left$(Url, I - 1)
oHttp.Open "POST", Url, False
oHttp.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
oHttp.send CStr(Parameters)
UseXMLHTTP = oHttp.responseText
测试后的新信息:1. Win7和Excel 2010-确定,一切正常!2. Win10和MS Excel 2016中的问题-可能我必须更改库-请帮助...