VBA POST 请求
时间: 2024-02-11 13:56:16 浏览: 40
在 VBA 中进行 POST 请求可以使用 WinHttp.WinHttpRequest 对象。以下是一个简单的示例:
```vb
Sub postRequest()
Dim httpRequest As Object
Set httpRequest = CreateObject("WinHttp.WinHttpRequest.5.1")
'设置请求的 URL 和方法
httpRequest.Open "POST", "https://example.com/api", False
'设置请求头
httpRequest.setRequestHeader "Content-Type", "application/json"
'设置请求体
Dim requestBody As String
requestBody = "{""name"": ""John"", ""age"": 30}"
httpRequest.send requestBody
'获取响应
Dim responseBody As String
responseBody = httpRequest.responseText
'在控制台输出响应
Debug.Print responseBody
End Sub
```
在这个示例中,我们首先创建了一个 WinHttp.WinHttpRequest 对象,然后设置了请求的 URL 和方法。接下来,我们设置了请求头,指定了请求体的格式为 JSON。然后,我们设置请求体,并发送请求,将请求体作为参数传递给 send 方法。最后,我们获取响应,并将其作为字符串输出到控制台。