以文本方式查看主题 - Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp) -- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2) ---- [求助]请问WeChat.MPSendTemplate具体如何使用,帮助中没有找到实例 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=132331) |
||
-- 作者:智友软件工作室 -- 发布时间:2019/3/20 0:55:00 -- [求助]请问WeChat.MPSendTemplate具体如何使用,帮助中没有找到实例 如题 |
||
-- 作者:有点蓝 -- 发布时间:2019/3/20 8:30:00 -- 参考:http://wechat.foxtable.com:9009/WebHelp/scr/we0198.htm |
||
-- 作者:智友软件工作室 -- 发布时间:2019/3/20 9:17:00 -- 我就是从这里找的, 实体类型参考:WeChat.MPSendTemplate,属性有:
[此贴子已经被作者于2019/3/20 9:17:32编辑过]
|
||
-- 作者:智友软件工作室 -- 发布时间:2019/3/20 9:23:00 -- 类似这样的例子; 代码示例: 发送视频消息 Dim sendmode As Integer = 0 \'这里必须设置为0 Dim video = WeChat.SendMessageHelper.GetSendMessage(WeChat.ApiType.MP, "video", sendmode) video.touser = "o_0W1wG4545454344lTfjSdVjlznQ" video.video.media_id = "AO9_Rt0R6isjl435454545cwR3EK9YrbbdCZvs4" \'之前上传视频获取的ID,可以是永久或者临时素材 video.video.title = "视频标题1" video.video.description= "视频描述1" video.video.thumb_media_id = "LDsmqwvPh543543543VXdZSTrOngBXzpH2qg" \'缩略图图片的media_id Dim weRet = wechatserv.SendMsgController.SendMessage(video.ToJson(True),sendmode,True) If weRet.Success Then msgbox("已发送消息") Else msgbox("发送失败:" & weRet.ErrorMessage) End If 发送其它消息 Dim text = WeChat.SendMessageHelper.GetSendMessage(WeChat.ApiType.MP, "text") text.touser = "o_0W1wG4445455345435jSdVjlznQ" \'向openid为o_0W1wG4xCDJTpdqlTfjSdVjlznQ的用户发送消息 text.AddContent("Hello Foxtable") Dim weRet = wechatserv.SendMsgController.SendMessage(text.ToJson(True)) If weRet.Success Then msgbox("已发送消息") Else msgbox("发送失败:" & weRet.ErrorMessage) End If |
||
-- 作者:有点甜 -- 发布时间:2019/3/20 10:00:00 -- 合成这样的json字符串啊
{
认认真真看看如何生成json http://www.foxtable.com/mobilehelp/scr/0167.htm
|
||
-- 作者:智友软件工作室 -- 发布时间:2019/3/20 10:44:00 -- 你有空能时能否帮忙把这个变成一个完整的例子呢?确实整不明白了,真的 |
||
-- 作者:有点甜 -- 发布时间:2019/3/20 10:47:00 -- 1、认认真真看看如何生成json http://www.foxtable.com/mobilehelp/scr/0167.htm
2、如果你不会合成,那就直接拷贝json发过去 |
||
-- 作者:智友软件工作室 -- 发布时间:2019/3/20 11:22:00 -- 生成json我能明白,我是不明白下面这些是什么意思,不明白WeChat.MPSendTemplate这个怎么使用,你也别生气啊,呵呵,我再好好研究一下吧 实体类型参考:WeChat.MPSendTemplate,属性有:
|
||
-- 作者:有点甜 -- 发布时间:2019/3/20 11:40:00 -- Dim t As new WeChat.MPSendTemplate t.touser = "aaa" msgbox(t.ToJson) |
||
-- 作者:有点蓝 -- 发布时间:2019/3/20 13:44:00 -- 以下是引用智友软件工作室在2019/3/20 11:22:00的发言: 生成json我能明白,我是不明白下面这些是什么意思,不明白WeChat.MPSendTemplate这个怎么使用,你也别生气啊,呵呵,我再好好研究一下吧 实体类型参考:WeChat.MPSendTemplate,属性有: |