Ms access 从vba执行隐藏的http请求

Ms access 从vba执行隐藏的http请求,ms-access,vba,dll,Ms Access,Vba,Dll,我想从MS access执行一个隐藏的HTTP-GET请求, 尽可能简单,无需任何额外的库/组件 只要一个简单的声明就可以了 WinHttp已经离开大楼了吗?这里有一个关于它的例子。希望这能有所帮助 Dim xhr As Object Dim webServiceURL As String Dim actionType As String Dim thisRequest As String Dim targetWord As String WebServiceURL = "http

我想从MS access执行一个隐藏的
HTTP-GET
请求, 尽可能简单,无需任何额外的库/组件

只要一个简单的声明就可以了

WinHttp已经离开大楼了吗?

这里有一个关于它的例子。

希望这能有所帮助

 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

你看过这条线了吗?