Enter code here...{
"key": "xxxxxxxxxxxxx",
"template_name": "30-july-daily-report",
"template_content": [
],
"message": {
"html": null,
"from_name": "Example Name",
"to": [
{
"email": "ke...@deckmonitoring.com",
"name": "keith"
}
],
"headers": {
"Reply-To": "pdp@deckmonitoring"
},
"important": false,
"merge": true,
"global_merge_vars": [
{
}
],
"merge_vars": [
{
"rcpt": "ke...@deckmonitoring.com",
"vars": [
{
"name":"COMPANY",
"content": "ABC Motors"
},
{
"name" : "GENDATE",
"content" : "7/27/2013"
}
}
]
}
],
"tags": [
"password-resets"
]
}
}
Public Sub testMandrillMailCJ()
Dim Jemail As New cJobject
Dim sTempl, sFromE, sFromN As String
sTempl = "Charity"
sFromE = "ke...@deckmonitoring.com"
sFromN = "Keith"
With Jemail.init(Nothing)
.add "key", "qJulWGSl5DioRmUiNWId_w"
.add "template_name", sTempl
.add("template_content").addArray
.add "tags"
With .add("message")
.add "from_email", 10
.add "from_name", sFromN
.add("to").addArray
.add "track_opens", "true"
.add "auto_text", "true"
With .init(Nothing).add("merge_vars").addArray
.add "rcpt", semailTo
With .add("vars").addArray
.add("vars").addArray
End With
End With
End With
End With
Debug.Print Jemail.stringify
Jemail.tearDown
End Sub
{
"key": "qJulWGSl5DioRmUiNWId_w",
"template_name": "Charity",
"template_content": [{
}],
"tags": null,
{
"merge_vars": [null,
"vars": [[]]]
}
}
--
You received this message because you are subscribed to the Google Groups "Excel Liberation" group.
To unsubscribe from this group and stop receiving emails from it, send an email to excel-ramblin...@googlegroups.com.
For more options, visit https://groups.google.com/groups/opt_out.