以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  关于企业微信消息推送  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=158422)

--  作者:hnguang
--  发布时间:2020/11/19 17:02:00
--  关于企业微信消息推送

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

图片点击可在新窗口打开查看此主题相关图片如下:1.png
图片点击可在新窗口打开查看
如上图,我有在企业微信添加了应用管理,在用代码向某个应用推送消息时,一定要带jo("touser") ,否则就推送不出去,我是想能看到这个应用的所有人都可以接受到消息

--  作者:有点蓝
--  发布时间:2020/11/19 17:08:00
--  
做微信开发,先把微信的开发文档都看一遍:https://work.weixin.qq.com/api/doc/90000/90135/90250

参数是否必须说明
touser成员ID列表(消息接收者,最多支持1000个)。每个元素的格式为: corpid/userid,其中,corpid为该互联成员所属的企业,userid为该互联成员所属企业中的帐号。如果是本企业的成员,则直接传userid即可
toparty部门ID列表,最多支持100个。partyid在互联圈子内唯一。每个元素都是字符串类型,格式为:linked_id/party_id,其中linked_id是互联id,party_id是在互联圈子中的部门id。如果是本企业的部门,则直接传party_id即可。
totag本企业的标签ID列表,最多支持100个。
toall1表示发送给应用可见范围内的所有人(包括互联企业的成员),默认为0

--  作者:hnguang
--  发布时间:2020/11/19 17:38:00
--  
  1. {
  2. "chatid": "CHATID",
  3. "msgtype":"textcard",
  4. "textcard":{
  5. "title" : "领奖通知",
  6. "description" : "<div class=\\"gray\\">2016年9月26日</div> <div class=\\"normal\\"> 恭喜你抽中iPhone 7一台,领奖码:520258</div><div class=\\"highlight\\">请于2016年10月10日前联系行 政同事领取</div>",
  7. "url":"https://work.weixin.qq.com/",
  8. "btntxt":"更多"
  9. },
  10. "safe":0
  11. }

这一段不会改,能给个例子吗

--  作者:有点蓝
--  发布时间:2020/11/19 20:13:00
--  
Dim jo As New JObject
jo
("chatid") = "xxxxx"
jo("msgtype") = "textcard"
jo("textcard") = New JObject
jo("textcard")("title") = "领奖通知"
……