0

URL がどの Web ブラウザーでも有効であるのに、Excel vba から呼び出すと突然無効になる理由がわかりません。API を呼び出そうとしていますが、コード内の API は 2005 年を返すはずです。URL が機能することを示す応答を表示したいだけですが、Excel では機能しませんが、これは問題なく機能します。ブラウザ。私がここに欠けているものはありますか?

Sub testingstuff()


Dim URL As String: URL = "https://api.pentondata.com?request_type=vinserial&make=Vermeer&serialnumber=1VRY1119351005665"
Dim Http As New WinHttpRequest
Dim Resp As String


    Http.Open "GET", URL, False
    Http.Send
    Resp = Http.ResponseText
    Debug.Print Resp

End Sub
4

1 に答える 1