HTTPS POST-запрос для VBA (Excel) игнорирует аргументы

Question

Следующий короткий код всегда дает мне текущую страницу и не перезагружается для заданных аргументов. Это слишком старый метод? Что мне делать? Параметры выглядят так: «День = 28 & Месяц = ​​12 & Год = 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 - нужно ли менять библиотеку?