Foxtable(狐表)用户栏目专家坐堂 → [求助]请问WeChat.MPSendTemplate具体如何使用,帮助中没有找到实例


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

主题:[求助]请问WeChat.MPSendTemplate具体如何使用,帮助中没有找到实例

帅哥哟,离线,有人找我吗?
智友软件工作室
  1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:912 积分:7445 威望:0 精华:0 注册:2013/2/25 13:10:00
[求助]请问WeChat.MPSendTemplate具体如何使用,帮助中没有找到实例  发帖心情 Post By:2019/3/20 0:55:00 [显示全部帖子]

如题

 回到顶部
帅哥哟,离线,有人找我吗?
智友软件工作室
  2楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:912 积分:7445 威望:0 精华:0 注册:2013/2/25 13:10:00
  发帖心情 Post By:2019/3/20 9:17:00 [显示全部帖子]

我就是从这里找的,

 实体类型参考:WeChat.MPSendTemplate,属性有:

  • touser
    关注用户的Openid
  • template_id
    模板ID
  • url
    详情链接,可导向企业的详情页面
  • data
    模板内容,长度不能超过200个汉字,且必须有至少10个固定文字或标点
    WeChat.MPSendTemplateData类型
    • first 
      标题
    • keynote1 
      关键词1
    • keynote2
      关键词3
    • keynote3
      关键词3
    • remark
      备注

    以上属性均为WeChat.MPSendTemplateDataValue类型,有2个属性
    • value 
      值内容
    • color
      文字颜色





    这个配置要求不知道怎么用,请指教多谢
[此贴子已经被作者于2019/3/20 9:17:32编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
智友软件工作室
  3楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:912 积分:7445 威望:0 精华:0 注册:2013/2/25 13:10:00
  发帖心情 Post By: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" '向openido_0W1wG4xCDJTpdqlTfjSdVjlznQ的用户发送消息

text.AddContent("Hello Foxtable")

Dim weRet = wechatserv.SendMsgController.SendMessage(text.ToJson(True))

If weRet.Success Then

    msgbox("已发送消息")

Else

    msgbox("发送失败:" & weRet.ErrorMessage)

End If


 回到顶部
帅哥哟,离线,有人找我吗?
智友软件工作室
  4楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:912 积分:7445 威望:0 精华:0 注册:2013/2/25 13:10:00
  发帖心情 Post By:2019/3/20 10:44:00 [显示全部帖子]

你有空能时能否帮忙把这个变成一个完整的例子呢?确实整不明白了,真的

 回到顶部
帅哥哟,离线,有人找我吗?
智友软件工作室
  5楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:912 积分:7445 威望:0 精华:0 注册:2013/2/25 13:10:00
  发帖心情 Post By:2019/3/20 11:22:00 [显示全部帖子]

生成json我能明白,我是不明白下面这些是什么意思,不明白WeChat.MPSendTemplate这个怎么使用,你也别生气啊,呵呵,我再好好研究一下吧

 实体类型参考:WeChat.MPSendTemplate,属性有:

  • touser
    关注用户的Openid
  • template_id
    模板ID
  • url
    详情链接,可导向企业的详情页面
  • data
    模板内容,长度不能超过200个汉字,且必须有至少10个固定文字或标点
    WeChat.MPSendTemplateData类型
    • first 
      标题
    • keynote1 
      关键词1
    • keynote2
      关键词3
    • keynote3
      关键词3
    • remark
      备注

    以上属性均为WeChat.MPSendTemplateDataValue类型,有2个属性
    • value 
      值内容
    • color
      文字颜色

 回到顶部
帅哥哟,离线,有人找我吗?
智友软件工作室
  6楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:912 积分:7445 威望:0 精华:0 注册:2013/2/25 13:10:00
  发帖心情 Post By:2019/3/20 23:53:00 [显示全部帖子]


[此贴子已经被作者于2019/3/20 23:54:54编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
智友软件工作室
  7楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:912 积分:7445 威望:0 精华:0 注册:2013/2/25 13:10:00
  发帖心情 Post By:2019/3/21 0:02:00 [显示全部帖子]


{{first.DATA}}
工单来源:{{keyword1.DATA}}
工单联系人:{{keyword2.DATA}}
工单内容:{{keyword3.DATA}}
工单创建时间:{{keyword4.DATA}}
{{remark.DATA}}

Dim t As new WeChat.MPSendTemplate
Dim t1 As new WeChat.MPSendTemplateData
t.data = t1
Dim tt1 As new WeChat.MPSendTemplateDataValue
t1.first = tt1
Dim tt2 As new WeChat.MPSendTemplateDataValue
t1.keyword1 = tt2

t.touser = "aaa"
t.template_id = "123"
t.data.first.value = "xyz"
t.data.first.Color = "333"
t.data.keyword1.value = "xyz"
t.data.keyword1.Color = "333"

msgbox(t.ToJson)



提示WeChat.MPSendTemplateData中,没有keyword1




 回到顶部