Excel 求助各位大侠VBA代码如何抓取网页JSON数据
1个回答
展开全部
基本上和JS的代码差不多哦,使用XMLHTTP对象,下面是例子代码:
Option Explicit
Sub xxx()
Dim http
Set http = CreateObject("Microsoft.XMLHTTP")
http.Open "POST", "http://网址/PHP文件名.PHP", False
http.send ""
If http.Status = 200 Then
[a1] = http.responseText
MsgBox "成功。"
Else
MsgBox "调用失败,错误代码:" & http.Status
End If
End Sub
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询