vba http response code example

Example: vba http get

'VBA function to send HTTP GET to a server:

Function httpGet$(url$)
    With CreateObject("WinHttp.WinHttpRequest.5.1")
        .Open "GET", url, False
        .Send
        httpGet = .ResponseText
    End With
End Function

'-------------------------------------------------------------------------------------------

'Example usage:
response = httpGet(url)