Foxtable(狐表)用户栏目专家坐堂 → 怎么获取通过普通个人微信关注企业微信的用户信息呢?并且给个人微信用户推送信息!


  共有3966人关注过本帖树形打印复制链接

主题:怎么获取通过普通个人微信关注企业微信的用户信息呢?并且给个人微信用户推送信息!

帅哥哟,离线,有人找我吗?
李孝春
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:九尾狐 帖子:2472 积分:17346 威望:0 精华:0 注册:2013/1/31 0:03:00
怎么获取通过普通个人微信关注企业微信的用户信息呢?并且给个人微信用户推送信息!  发帖心情 Post By:2020/7/13 15:59:00 [只看该作者]

在帮助中

成员接口

和公众号人人都能关注不同,企业号只有在通讯录中的用户才能关注,只能获取通讯录中的用户信息,对于非通讯录信息没有帮助内容……


那么怎么获取通过普通个人微信关注企业微信的用户信息呢?并且给个人微信用户推送信息!


 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106011 积分:539142 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/7/13 16:10:00 [只看该作者]

用户关注微信,会推送关注事件:http://www.foxtable.com/mobilehelp/topics/0216.htm

先过一遍微信的开发文档:https://work.weixin.qq.com/api/doc/90000/90135/92109

 回到顶部
帅哥哟,离线,有人找我吗?
李孝春
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:九尾狐 帖子:2472 积分:17346 威望:0 精华:0 注册:2013/1/31 0:03:00
回复:(有点蓝)用户关注微信,会推送关注事件:http...  发帖心情 Post By:2020/7/13 17:07:00 [只看该作者]

有点蓝老师

https://work.weixin.qq.com/api/doc/90000/90136/90515

通过agentConfig注入应用的权限    以下的代码怎么弄成狐表模式下的语句呢?

  1. wx.agentConfig({
  2. corpid: '', // 必填,企业微信的corpid,必须与当前登录的企业一致
  3. agentid: '', // 必填,企业微信的应用id (e.g. 1000247)
  4. timestamp: , // 必填,生成签名的时间戳
  5. nonceStr: '', // 必填,生成签名的随机串
  6. signature: '',// 必填,签名,见附录-JS-SDK使用权限签名算法
  7. jsApiList: ['selectExternalContact'], //必填
  8. success: function(res) {
  9. // 回调
  10. },
  11. fail: function(res) {
  12. if(res.errMsg.indexOf('function not exist') > -1){
  13. alert('版本过低请升级')
  14. }
  15. }
  16. });

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106011 积分:539142 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/7/13 17:12:00 [只看该作者]


 回到顶部
帅哥哟,离线,有人找我吗?
李孝春
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:九尾狐 帖子:2472 积分:17346 威望:0 精华:0 注册:2013/1/31 0:03:00
回复:(有点蓝)jssdk的用法参考:http://www.foxtab...  发帖心情 Post By:2020/7/13 18:13:00 [只看该作者]

命令窗口中运行如下代码
Dim hc As New HttpClient("https://qyapi.weixin.qq.com/cgi-bin/externalcontact/get?access_token=_Svs8u9LZw71zozNHwiGu3cWBFiaGIkCWrqd1bUwBOYFtGJeBW4Uy71Yt3jzFCth66A2Uj4KdOb6EH6tK35jrkMXOlzPnPT0-ZeKlfkoR_2viBS0W_AYVAJ4HvIzcz2M4WKnfBrVd71TsH37t57iSANN__z_M9jFNZ_BVyjXtSDs2beEjQ3DKaquheD-XgzJZZk9DihLKIA89ovNP89wTQ&external_userid=wmNgc2CwAA5zTob2HA_HS8IWSqqhU1-w")
Dim dt As String = hc.GetData()
output.Show(dt)
Dim jo As JObject = JObject.Parse(hc.GetData())
If jo("errcode") = "0" Then
    For Each jt As JToken In jo("external_contact")
        output.show(jt("external_userid"))
        output.show(jt("name"))
    Next
Else
    MessageBox.Show(jo.ToString)
End If


其中dt的值为
{"errcode":0,"errmsg":"ok","external_contact":{"external_userid":"wmNgc2CwAA5zTob2HA_HS8IWSqqhU1-w","name":"瓮安县百信办公设备有限公司 四哥","type":1,"avatar":"http://wx.qlogo.cn/mmhead/cGNScwnYvk7D3micjE6UyupT8ZvxJkgqsan4YKan8hROC7Ribn6QSmdw/0","gender":1},"follow_user":[{"userid":"LiXiaoChun","remark":"瓮安县百信办公设备有限公司 四哥","description":"","createtime":1561513866,"tags":[],"remark_mobiles":[]}]}

红色部分弹出如下错误提示:
想获取指定外部联系人详细信息  却提示
.NET Framework 版本:4.0.30319.42000
Foxtable 版本:2020.5.29.8
错误所在事件:
详细错误信息:
请求被中止: 连接被意外关闭。


获取客户详情


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

企业可通过此接口,根据外部联系人的userid(如何获取?),拉取客户详情。

请求方式:GET(HTTPS
请求地址:https://qyapi.weixin.qq.com/cgi-bin/externalcontact/get?access_token=ACCESS_TOKEN&external_userid=EXTERNAL_USERID

[此贴子已经被作者于2020/7/13 18:14:57编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106011 积分:539142 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/7/13 20:23:00 [只看该作者]

output.Show(dt)
Dim jo As JObject = JObject.Parse(dt)

 回到顶部
帅哥哟,离线,有人找我吗?
李孝春
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:九尾狐 帖子:2472 积分:17346 威望:0 精华:0 注册:2013/1/31 0:03:00
回复:(有点蓝)output.Show(dt)Dim jo As JObject =...  发帖心情 Post By:2020/7/14 8:50:00 [只看该作者]

老师  按楼上做了检查  还是报错
Dim hc As New HttpClient("https://qyapi.weixin.qq.com/cgi-bin/externalcontact/get?access_token=ARFBN1RjASm-wik2oNGiWyRnltnKbjKfnFqLVcu9SVQN2AKbfuqMUYA1HKA-Xi35CpbLwF85_1zsDHdEfFZ-TS-FyUwBho3x-F8oxb_owC0kJMa7E9LD2IhK_GUXEl5yeHkmLRu_8LSSbWC-N4-Yhrhpx8er7gYbugunmUcqVLexIlHTkySZIMq4kRqIqGBL85w__hLOlKmhyYD-beAYRw&external_userid=wmNgc2CwAA5zTob2HA_HS8IWSqqhU1-w")
Dim dt As String = hc.GetData()
output.Show(dt)
Dim jo As JObject = JObject.Parse(dt)
If jo("errcode") = "0" Then
    For Each jt As JToken In jo("external_contact")
        'output.show(jt("external_userid"))
        output.show(jt("name"))
    Next
Else
    MessageBox.Show(jo.ToString)
End If
注意:access_token两个小时内有效
在命令窗口运行上述代码后提示如下:

图片点击可在新窗口打开查看此主题相关图片如下:捕获.jpg
图片点击可在新窗口打开查看


 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106011 积分:539142 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/7/14 9:07:00 [只看该作者]


 回到顶部
帅哥哟,离线,有人找我吗?
李孝春
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:九尾狐 帖子:2472 积分:17346 威望:0 精华:0 注册:2013/1/31 0:03:00
回复:(有点蓝)json解析出错:http://www.foxtable....  发帖心情 Post By:2020/7/14 14:55:00 [只看该作者]

有点蓝老师  麻烦指导下哦   代码命令窗口运行得到的结果 不是很完美  麻烦老师指导下 怎么实现dt里面所有的内容都完美解析出来呢?谢谢

代码:
Dim hc As New HttpClient("https://qyapi.weixin.qq.com/cgi-bin/externalcontact/get?access_token=RL5_GndVovz1zPp3ktarEnHNEUf17i0bwJmWGmSQ337cTPh2-2UQZocx6-GWMPSxUvpKaF0GxSSaUq4UbR94C1_jbZGZQFMmAUV077F94WFZJ2JWjYHCg1M95nmB9-nycBS2AJwDHg7x1xjsSSmZlvo33XQuvAJWi_4sjW2yb6oyr4kMfiIc5WKoKZU52evPMTGMKJjpVzv9rgl0ifUh7A&external_userid=wmNgc2CwAA5zTob2HA_HS8IWSqqhU1-w")
Dim dt As String = hc.GetData()
output.Show(dt)
Dim jo As JObject = JObject.Parse(dt)
Output.Show("【外部联系人id】"  & jo("external_contact")("external_userid").Tostring)
Output.Show("【外部联系人姓名】"  & jo("external_contact")("name").Tostring)
Output.Show("【外部联系人类别】"  & jo("external_contact")("type").Tostring)
Output.Show("【外部联系人识别码】"  & jo("external_contact")("avatar").Tostring)
Output.Show("【组别】"  & jo("external_contact")("gender").Tostring)


运行结果:
{"errcode":0,"errmsg":"ok","external_contact":{"external_userid":"wmNgc2CwAA5zTob2HA_HS8IWSqqhU1-w","name":"瓮安县百信办公设备有限公司 四哥","type":1,"avatar":"http://wx.qlogo.cn/mmhead/cGNScwnYvk7D3micjE6UyupT8ZvxJkgqsan4YKan8hROC7Ribn6QSmdw/0","gender":1},"follow_user":[{"userid":"LiXiaoChun","remark":"瓮安县百信办公设备有限公司 四哥","description":"","createtime":1561513866,"tags":[],"remark_mobiles":[]}]}

【外部联系人id】wmNgc2CwAA5zTob2HA_HS8IWSqqhU1-w
【外部联系人姓名】瓮安县百信办公设备有限公司 四哥
【外部联系人类别】1
【外部联系人识别码】http://wx.qlogo.cn/mmhead/cGNScwnYvk7D3micjE6UyupT8ZvxJkgqsan4YKan8hROC7Ribn6QSmdw/0
【组别】1


 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106011 积分:539142 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/7/14 15:03:00 [只看该作者]

不就这样用么。还有什么问题!

 回到顶部
总数 12 1 2 下一页