Rest API in VBA Macros

Question

当我在 vba 中编写一个 http get 请求来获取会话 id 时，而不是获取会话 ID，我在即时窗口中得到一个 HTML 代码？ 为什么会这样？

Answer 1

所以基本上，当你在浏览器上打开链接时，它会首先要求用户输入他的用户名和密码，然后它会向他显示会话ID。 但是当我选择 vba 代码中的链接时，它向我显示了 html 代码

子Button1_Click((

Dim objRequest As Object
Dim strUrl As String
Dim blnAsync As Boolean
Dim strResponse As String
Set objRequest = CreateObject("MSXML2.XMLHTTP")
strUrl = "url to be entered"
blnAsync = True
With objRequest
.Open "GET", strUrl, blnAsync
.SetRequestHeader "Content-Type", "application/json"
.Send
'spin wheels whilst waiting for response
While objRequest.readyState <> 4
DoEvents
Wend
strResponse = .ResponseText
End With
Debug.Print strResponse

结束子