Dim hc As New HttpClient("https://api.weixin.qq.com/datacube/getuserread?access_token=33_YNQWBgI624ndBbYXLdsGK5NPsD8m6L2xb3cPV0_Ow7xeN-5DcGGZf2xnukHPCHlzAt5n3PudXYy_hvbFqfy38JUmOeFl_kqWpNFda5n1lCem2WTSqnz8m8fKd1_iMec_fzoXGipwbAX52SNMOOJbAHACCX")
hc.ContentType = "application/json"
hc.Content = "{ ""begin_date"": ""2014-12-08"", ""end_date"": ""2014-12-08""}"
Dim dt As String = hc.GetData()
output.Show(dt)
文档自己发出来的，都不仔细看看？!
接口调用请求说明
图文分析数据接口（包括接口列表中的所有接口）需要向相应接口调用地址POST以下示例数据包：
调用参数说明
| 参数 | 是否必须 | 说明 |
|---|
| access_token | 是 | 调用接口凭证 |
| begin_date | 是 | 获取数据的起始日期，begin_date和end_date的差值需小于“最大时间跨度”（比如最大时间跨度为1时，begin_date和end_date的差值只能为0，才能小于1），否则会报错 |
| end_date | 是 | 获取数据的结束日期，end_date允许设置的最大值为昨日 |
[此贴子已经被作者于2020/5/22 10:31:43编辑过]
加好友 
发短信
Post By：2020/5/22 10:31:00 [显示全部帖子]
