[求助]关于企业微信接口使用 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

我要用获取打卡记录的接口。想问问怎么写？

Dim 开始,结束 As Date

开始=Date.Today.AddDays(-1)

结束=Date.Today

Dim 加密接口,开始时间戳,结束时间戳 As String

Dim st As New Date(1970,1,1,8,0,0)

开始时间戳=CInt((开始- st).TotalSeconds())

结束时间戳=CInt((结束- st).TotalSeconds())

加密接口="4AQ29OlA-d7U6Vo73w1hGDTqU1knS8Kpr24sRmbxLxk0TWmOXgnVWHcxhJaIGGvXkvDkif3gMzciqPtIOHZrrItbpneaai0XbbOF-26I-eN5D7Cld7qox4IBEiyHwtDesbmewCktQCvH1ISx_oFChJH0Pv2_B0Z9_x0wVr0PZiEZ914c9p1OvtiL6p251sgQwQ"

Dim hc As new HttpClient("https://qyapi.weixin.qq.com/cgi-bin/checkin/getcheckin_daydata?access_token=" & 加密接口 )

hc.C

hc.FormData.Add("access_token",加密接口)

'hc.FormData.Add("opencheckindatatype",1)

hc.FormData.Add("starttime",开始时间戳)

hc.FormData.Add("endtime",结束时间戳)

hc.FormData.Add("useridlist", "['YY001','YY002','YY003','YY004','YY005','YY006','YY007','YY008','YY009','YY010','YY011','YY12']" )

Output.Show(hc.GetData)

请求地址: https://qyapi.weixin.qq.com/cgi-bin/checkin/getcheckin_daydata?access_token=ACCESS_TOKEN

请求示例

{
    "starttime": 1599062400,
    "endtime": 1599062400,
    "useridlist": [
        "ZhangSan"
    ]
}

参数说明:

参数	必须	类型	说明
access_token	是	string	调用接口凭证，必须使用打卡应用的Secret获取access_token，获取方式参考：文档-获取access_token。
starttime	是	uint32	获取日报的开始时间。0点Unix时间戳
endtime	是	uint32	获取日报的结束时间。0点Unix时间戳
useridlist	是	string[]	获取日报的userid列表。单个userid不少于1字节，不多于64字节可填充个数：1 ~ 100

https://work.weixin.qq.com/api/doc/90000/90135/93374

我应该是哪里写错了，返回错误，怎么写？

主题：[求助]关于企业微信接口使用