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

合成这样的json字符串啊

 {
   "touser":"OPENID",
   "template_id":"ngqIpbwh8bUfcSsECmogfXcV14J0tQlEpBO27izEYtY",
   "url":"http://weixin.qq.com/download",           
   "data":{
    "first": {
     "value":"恭喜你购买成功！",
     "color":"#173177"
    },
    "keynote1":{
     "value":"巧克力",
     "color":"#173177"
    },
    "keynote2": {
     "value":"39.8元",
     "color":"#173177"
    },
    "keynote3": {
     "value":"2014年9月22日",
     "color":"#173177"
    },
    "remark":{
     "value":"欢迎再次购买！",
     "color":"#173177"
    }
   }
}

认认真真看看如何生成json http://www.foxtable.com/mobilehelp/scr/0167.htm

2、如果你不会合成，那就直接拷贝json发过去

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.keynote1 = tt2

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

msgbox(t.ToJson)