Ошибка при использовании Xmlhttprequest для входа на сайт

Question

Я бы хотел зайти на сайт, используя xmlhttprequest. Мой код

  Dim xmlreq As New MSXML2.XMLHTTP60
  Dim htmldoc As New MSHTML.HTMLDocument
  Dim htmlmsg As MSHTML.IHTMLElement
  xmlreq.Open "GET", "https://yyy.com/main.php?pid=406&action=zz", False, "user", "password"
  xmlreq.send
  htmldoc.body.innerHTML = xmlreq.responseText
  Set htmlmsg = htmldoc.getElementById("search-btn")
  Debug.Print htmlmsg.innerText

Этот код не позволяет мне пройти страницу входа, застрял там. Помимо «имени пользователя» и «пароля», мне нужно будет предоставить третье поле, которое представляет собой раскрывающийся список перед отправкой.

Я не знаю, как передать это поле в мой код. Ниже приведен скриншот формы входа в систему.