钉钉接口 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 钉钉接口

共有13451人关注过本帖树形打印复制链接主题：钉钉接口

weibu

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：三尾狐帖子：659 积分：5357 威望：0 精华：0 注册：2018/5/19 22:27:00

钉钉接口

Post By：2020/12/29 21:26:00 [显示全部帖子]

老师论坛里面钉钉接口的项目打开报错，咋处理

此主题相关图片如下：报错.png

weibu

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：三尾狐帖子：659 积分：5357 威望：0 精华：0 注册：2018/5/19 22:27:00

Post By：2020/12/29 21:26:00 [显示全部帖子]

对于钉钉单点登陆和获取部门及人员信息的详细介绍还有咨询吗

weibu

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：三尾狐帖子：659 积分：5357 威望：0 精华：0 注册：2018/5/19 22:27:00

Post By：2021/2/15 11:38:00 [显示全部帖子]

地址不修改，则能调取钉钉部门信息，但修改为部门管理2.0的地址则，提升未引用对象实例；我重新下载了.net上午SDK中的dll文件，并替换仍然提升未引用对象实例。老师为什么？

Dim TX1 As WinForm.TextBox = e.Form.Controls("TextBox1")

Dim TX2 As WinForm.TextBox = e.Form.Controls("TextBox2")

Dim access_token As String = Functions.Execute("access_token",TX1.TEXT,TX2.TEXT)

Dim client As DingTalk.Api.IDingTalkClient = New DingTalk.Api.DefaultDingTalkClient("https://oapi.dingtalk.com/department/list")

‘老师这个连接我修改为部门管理2.0的接口请求地址；https://oapi.dingtalk.com/topapi/v2/department/listsub

Dim req As DingTalk.Api.Request.OapiDepartmentListRequest = New DingTalk.Api.Request.OapiDepartmentListRequest()

req.SetHttpMethod("GET")

Dim rsp As DingTalk.Api.Response.OapiDepartmentListResponse = client.Execute(req, access_token)

Dim s As String

For i As Integer = 0 To rsp.Department.count -1

s+= rsp.Department.Item(I).id & vbCrLf

MessageBox.Show(s)

weibu

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：三尾狐帖子：659 积分：5357 威望：0 精华：0 注册：2018/5/19 22:27:00

Post By：2021/2/18 9:13:00 [显示全部帖子]

蓝老师我都需要修改哪些地方？第一次弄这个，麻烦您了

weibu

小大 5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：三尾狐帖子：659 积分：5357 威望：0 精华：0 注册：2018/5/19 22:27:00

Post By：2021/2/18 11:54:00 [显示全部帖子]

老师2.0的获取方式变为POST；这个对代码有修改的地方吗？

weibu

小大 6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：三尾狐帖子：659 积分：5357 威望：0 精华：0 注册：2018/5/19 22:27:00

Post By：2021/2/19 11:55:00 [显示全部帖子]

老师，因为钉钉存在一个人在多个部门，deptid的存储是1,2,3这样的；这样我通过遍历部门获取的userid就会重复；请问有什么办法去重；

代码如下

Dim client2 As DingTalk.Api.IDingTalkClient = New DingTalk.Api.DefaultDingTalkClient("https://oapi.dingtalk.com/department/list")

Dim req2 As DingTalk.Api.Request.OapiDepartmentListRequest = New DingTalk.Api.Request.OapiDepartmentListRequest()

req2.SetHttpMethod("GET")

Dim rsp2 As DingTalk.Api.Response.OapiDepartmentListResponse = client2.Execute(req2, access_token)

Dim s2 As String

For i2 As Integer = 0 To rsp2.Department.count -1

s2= rsp2.Department.Item(I2).id

Dim client As DingTalk.Api.IDingTalkClient = New DingTalk.Api.DefaultDingTalkClient("https://oapi.dingtalk.com/user/getDeptMember")

Dim req As DingTalk.Api.Request.OapiUserGetDeptMemberRequest = New DingTalk.Api.Request.OapiUserGetDeptMemberRequest()

req.DeptId = s2

req.SetHttpMethod("GET")

Dim rsp As DingTalk.Api.Response.OapiUserGetDeptMemberResponse = client.Execute(req, access_token)

Dim s As String

If rsp.UserIDs IsNot Nothing Then

For i As Integer = 0 To rsp.UserIDs.count -1

s+ = rsp.UserIDs(i) & "|"

End If

MessageBox.Show(s)

MessageBox.Show(s2)

weibu

小大 7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：三尾狐帖子：659 积分：5357 威望：0 精华：0 注册：2018/5/19 22:27:00

Post By：2021/2/20 13:18:00 [显示全部帖子]

钉钉里面的入职时间是毫秒，老师我换算成入职时期是哪一天该如何换算？

weibu

小大 8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：三尾狐帖子：659 积分：5357 威望：0 精华：0 注册：2018/5/19 22:27:00

Post By：2021/2/21 15:15:00 [显示全部帖子]

老师，如果钉钉人员信息修改或新增，我这边如何知道钉钉做了新增或修改？还有能否具体知道是新增或修改了那几条数据？不能每次都遍历所有人员数据的所有字段吧，哪怕仅修改了一条数据？

weibu

小大 9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：三尾狐帖子：659 积分：5357 威望：0 精华：0 注册：2018/5/19 22:27:00

Post By：2021/2/22 16:27:00 [显示全部帖子]

https://developers.dingtalk.com/document/app/configure-event-subcription

老师钉钉这个事件订阅可以满足有修改用户信息是传递信息。但配置事件订阅我这边真不知道用狐表该怎么配置？我现在是狐表开发的c/s架构的

weibu

小大 10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：三尾狐帖子：659 积分：5357 威望：0 精华：0 注册：2018/5/19 22:27:00

Post By：2021/2/22 17:26:00 [显示全部帖子]

我的狐表是高级开发版

老师里面这个URL，必须通过狐表开启吗？我开发的是C/s架构，直接链接的服务器数据库。

我如何做啊

[此贴子已经被作者于2021/2/22 17:43:53编辑过]

下一主题 >> << 上一主题

总数 43 1 2 3 4 5 下一页

主题：钉钉接口