Ms access 从vba执行隐藏的http请求
我想从MS access执行一个隐藏的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
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
你看过这条线了吗?