Foxtable(狐表)用户栏目专家坐堂 → 企业微信发送消息报错48002?


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

主题:企业微信发送消息报错48002?

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


加好友 发短信
等级:小狐 帖子:322 积分:2662 威望:0 精华:0 注册:2014/6/24 17:29:00
企业微信发送消息报错48002?  发帖心情 Post By:2018/4/9 14:46:00 [只看该作者]

使用如下代码测试企业微信发送消息,

Dim ur As String = "https://qyapi.weixin.qq.com/cgi-bin/message/send?access_token={0}"
Dim
 hc As new HttpClient(Cexp(ur,Functions.Execute("GetQYAccessToken")))
Dim
 jo As New JObject
jo
("touser") = "003|001"
jo
("msgtype") = "text"
jo
("agentid") = 9
jo
("text") = New JObject
jo
("text")("content") = "您好,这是测试信息"
hc
.Content = jo.ToString
jo
 = JObject.Parse(hc.GetData)
If jo("errcode") = "0" Then
    MessageBox.show("消息发送成功!")

Else

    MessageBox.show(jo.ToString)

End
 If


报错信息如下:
---------------------------
{

  "errcode": 48002,

  "errmsg": "api forbidden, hint: [1523256126_4_ff4e6f2149b88d9bbff79367af81d166], more info at https://open.work.weixin.qq.com/devtool/query?e=48002"

}
---------------------------
确定   
---------------------------

已设置如CorpID 和Secret,请问这个报错是什么原因啊?



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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/4/9 16:08:00 [只看该作者]


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


加好友 发短信
等级:小狐 帖子:322 积分:2662 威望:0 精华:0 注册:2014/6/24 17:29:00
  发帖心情 Post By:2018/4/9 16:25:00 [只看该作者]

这个已经设置为编辑状态了


还是不行
[此贴子已经被作者于2018/4/9 16:25:16编辑过]

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/4/9 18:31:00 [只看该作者]

Secret 应该有错,认真核对。

 

https://www.baidu.com/baidu?wd=api+forbidden

 


 回到顶部
帅哥,在线噢!
有点蓝
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106089 积分:539550 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2018/4/9 21:47:00 [只看该作者]

不同应用的Secret是不一样的,请确认设置的是agentid9的应用Secret

 回到顶部