Выполнить скрытый http-запрос от vba

Question

Я хочу выполнить скрытый HTTP-GET запрос от MS-доступа, как можно проще, без каких-либо дополнительных библиотек / компонентов.

Просто объявите все необходимое.

WinHttp покинул здание ??

Answer 1

Вот отличная страница об этом.

Answer 2

Надеюсь, это поможет

 Dim xhr As Object
 Dim webServiceURL As String
 Dim actionType As String
 Dim thisRequest As String
 Dim targetWord As String

 WebServiceURL = "http://services.aonaware.com/DictService/DictService.asmx/"
 actionType = "Define?word="
 targetWord = "Marketplace"
 thisRequest = webServiceURL & actionType & targetWord

 'use late binding
 Set xhr = CreateObject("Microsoft.XMLHTTP")  

 xhr.Open "GET", thisRequest, False
 xhr.Send

 If xhr.status = 200 Then
   Debug.Print xhr.responseText
   MsgBox xhr.getAllResponseHeaders
 Else
   MsgBox xhr.status & ": " & xhr.statusText
 End If

 Set xhr = Nothing