微信模版消息发送失败 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 微信模版消息发送失败

共有3091人关注过本帖树形打印复制链接主题：微信模版消息发送失败

有点蓝

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

加好友

发短信

等级：超级版主帖子：110810 积分：563988 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2023/12/12 10:48:00 [显示全部帖子]

提示AccessToken有问题，没有获取到，或者过期了。

1、检查一下appID和appsecret是不是填错了。

2、检查执行代码的电脑外网IP是不是没有添加到公众号白名单

有点蓝

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

加好友

发短信

等级：超级版主帖子：110810 积分：563988 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2023/12/14 8:57:00 [显示全部帖子]

一次只能给一个用户发送，遍历所有用户名称发送

比如

Dim url As String = "https://api.weixin.qq.com/cgi-bin/message/template/send?access_token={0}"

for each s as string in {"openid1","openid2"}

Dim hc As New HttpClient(CExp(url, Functions.Execute("GetAccessToken")))
Dim jo As New JObject
Dim ja As New JArray
jo("touser") = s
jo("template_id") = "WPpt3ki1Haq-ERpQvWXAgT7IZbfO07mbKtjnRt1Kiek" '模板ID
jo("url") = http://www.foxtable.com

有点蓝

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

加好友

发短信

等级：超级版主帖子：110810 积分：563988 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2023/12/14 20:05:00 [显示全部帖子]

类型不匹配，改为

jo("touser") = cstr(dr2("openid"))

有点蓝

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

加好友

发短信

等级：超级版主帖子：110810 积分：563988 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2023/12/16 9:27:00 [显示全部帖子]

报什么错？

试试
jo("data")("thing2")("value") = CStr(dr("船舶代理") & dr("用户姓名") & "已申报船名:" & e.PostValues("中文船名") & ",请按要求进行后续工作。")

有点蓝

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

加好友

发短信

等级：超级版主帖子：110810 积分：563988 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2023/12/16 10:25:00 [显示全部帖子]

https://developers.weixin.qq.com/doc/offiaccount/Getting_Started/Global_Return_Code.html

43003

需要 HTTPS 请求

47003

参数值不符合限制要求，详情可参考参数值内容限制说明

https://developers.weixin.qq.com/doc/offiaccount/Message_Management/Template_Message_Operation_Specifications.html

这些和代码没有什么关系，都是微信的问题，如果上面链接看不懂，建议去咨询微信客服

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

主题：微信模版消息发送失败