VBScript / CleverTap API / Create Campaign API - Target User Events & Properties
Back to Collection Items
Dim fso, outFile
Set fso = CreateObject("Scripting.FileSystemObject")
'Create a Unicode (utf-16) output text file.
Set outFile = fso.CreateTextFile("output.txt", True, True)
' This example assumes the Chilkat API to have been previously unlocked.
' See Global Unlock Sample for sample code.
' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.Http")
set http = CreateObject("Chilkat.Http")
' Use this online tool to generate code from sample JSON: Generate Code to Create JSON
' The following JSON is sent in the request body.
' {
' "name": "My Sms API campaign",
' "estimate_only": true,
' "target_mode": "sms",
' "where": {
' "event_name": "Charged",
' "from": 20171001,
' "to": 20171220,
' "common_profile_properties": {
' "profile_fields": [
' {
' "name": "Customer Type",
' "operator": "equals",
' "value": "Platinum"
' }
' ]
' }
' },
' "respect_frequency_caps": false,
' "content": {
' "body": "Sms body"
' },
' "when": "now"
' }
' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.JsonObject")
set json = CreateObject("Chilkat.JsonObject")
success = json.UpdateString("name","My Sms API campaign")
success = json.UpdateBool("estimate_only",1)
success = json.UpdateString("target_mode","sms")
success = json.UpdateString("where.event_name","Charged")
success = json.UpdateInt("where.from",20171001)
success = json.UpdateInt("where.to",20171220)
success = json.UpdateString("where.common_profile_properties.profile_fields[0].name","Customer Type")
success = json.UpdateString("where.common_profile_properties.profile_fields[0].operator","equals")
success = json.UpdateString("where.common_profile_properties.profile_fields[0].value","Platinum")
success = json.UpdateBool("respect_frequency_caps",0)
success = json.UpdateString("content.body","Sms body")
success = json.UpdateString("when","now")
http.SetRequestHeader "X-CleverTap-Passcode","{{passcode}}"
http.SetRequestHeader "X-CleverTap-Account-Id","{{id}}"
http.SetRequestHeader "Content-Type","{{type}}"
' resp is a Chilkat.HttpResponse
Set resp = http.PostJson3("https://api.clevertap.com/1/targets/create.json","{{type}}",json)
If (http.LastMethodSuccess = 0) Then
outFile.WriteLine(http.LastErrorText)
WScript.Quit
End If
outFile.WriteLine(resp.StatusCode)
outFile.WriteLine(resp.BodyStr)
outFile.Close
Curl Command
curl -X POST
-H "X-CleverTap-Account-Id: {{id}}"
-H "X-CleverTap-Passcode: {{passcode}}"
-H "Content-Type: {{type}}"
-d '{"name": "My Sms API campaign","estimate_only": true,"target_mode":"sms", "where":{"event_name":"Charged","from":20171001,"to":20171220,"common_profile_properties":{"profile_fields": [ {"name": "Customer Type","operator":"equals","value": "Platinum"}]}},"respect_frequency_caps": false,"content": { "body": "Sms body"},"when": "now"}'
https://api.clevertap.com/1/targets/create.json
Postman Collection Item JSON
{
"name": "Create Campaign API - Target User Events & Properties",
"request": {
"method": "POST",
"header": [
{
"key": "X-CleverTap-Account-Id",
"value": "{{id}}"
},
{
"key": "X-CleverTap-Passcode",
"value": "{{passcode}}"
},
{
"key": "Content-Type",
"value": "{{type}}"
}
],
"body": {
"mode": "raw",
"raw": " {\"name\": \"My Sms API campaign\",\"estimate_only\": true,\"target_mode\":\"sms\", \"where\":{\"event_name\":\"Charged\",\"from\":20171001,\"to\":20171220,\"common_profile_properties\":{\"profile_fields\": [ {\"name\": \"Customer Type\",\"operator\":\"equals\",\"value\": \"Platinum\"}]}},\"respect_frequency_caps\": false,\"content\": { \"body\": \"Sms body\"},\"when\": \"now\"}"
},
"url": {
"raw": "https://api.clevertap.com/1/targets/create.json",
"protocol": "https",
"host": [
"api",
"clevertap",
"com"
],
"path": [
"1",
"targets",
"create.json"
]
},
"description": "https://developer.clevertap.com/docs/create-campaign-api#section-create-campaign-api-target-user-events-properties"
},
"response": [
]
}