Turn on suggestions
Auto-suggest helps you quickly narrow down your search results by suggesting possible matches as you type.
Menu
Turn on suggestions
Auto-suggest helps you quickly narrow down your search results by suggesting possible matches as you type.
About NCJTC
NCJTC
Member
since
06-19-2014
08-08-2022
12
Posts
5
Kudos
1
Solution
Badges
02-03-2021
02:10 PM
I'm still wrestling with this. The enhancements in V3 over V2 are great, but not if I can't test these out properly. With V2 I can put everything into a VB.net desktop app. This is lightweight and portable. What are my options for V3?
... View more
03-11-2020
01:57 PM
Has anyone had luck setting up token retrieval in Postman API? I can get the token when going through the folder authorization steps, but not when trying to create POST/GET requests. Using the "Get New Access Token" method in the folder authorization, I am required to login every time. This is not sustainable. For anyone with experience with this, I am attempting to follow the steps here. 1. In Postman, I create a GET request. GET https://api.cc.email/v3/idfed? Params: client_id: {{clientid}} (same as in the Get New Access Token process) redirect_uri: https://localhost (same is in the Get New Access Token process) response_type: code scope: contact_data+campaign_data 2. This returns an HTML form that does not seem to work in Postman. 3. I am expecting to get an authorization code, but I do not see where this comes from. 4. Attempting to send a POST request to the https://idfed.constantcontact.com/as/token.oath2?code=????&redirect_uri= https%3A%2F%2flocalhost&grant_type=authorization_code Headers: Authorization: Basic (base64 {{clientid}}:{{API Secret}}) Content-Type: application/x-www-form-urlencoded Response is: {
"error_description": "unable to parse Authorization header javax.security.auth.login.LoginException: No credentials provided with BasicAuthorization",
"error": "invalid_client"
}
... View more
Labels:
- Labels:
-
authentication
-
postman
08-20-2018
04:20 PM
Is there any reason that my contact count for a list when logging in to Constant Contact would not match the count when using the API? In this example, I have a list called "Not Identified." When I use the API, it returns 61,207 contacts. When I login to Constant Contact, I see 63,438. What accounts for the discrepancy?
... View more
09-28-2017
01:00 PM
Thank you for the reply. This would be a very nice add to the API.
... View more
09-28-2017
10:26 AM
Is there a way to update a registration status for an event via the API? For example, I pull a list of active registrations from event 123456789123 into a spreadsheet. I'd like to be able to put a button to cancel someone's registration.
... View more
09-05-2017
01:55 PM
1 Kudo
This requires VBA-JSON (https://github.com/VBA-tools/VBA-JSON). In Excel, open Visual Basic (alt+F11). Select tools -> References and select Microsoft XML, v6.0 Create a new module and paste this. You can customize it as needed. Public Sub GetRegistrations()
Application.ScreenUpdating = False
Application.Calculation = xlCalculationManual
Dim strURL, strRURL, eID As String
eID = {your event ID}
strEURL = "https://api.constantcontact.com/v2/eventspot/events/" & eID & "/registrants?limit=500&api_key={Your API Key}"
Dim objrequest As New MSXML2.XMLHTTP60
With objrequest
.Open "Get", strEURL, False
.setRequestHeader "Authorization", "Bearer " & "{Your Token}"
.send
End With
strPostResponse = objrequest.responseText
Dim eParsed As Dictionary
Set eParsed = JsonConverter.ParseJson(strPostResponse)
For a = 1 To eParsed("results").Count
rID = eParsed("results")(a)("id")
strRURL = "https://api.constantcontact.com/v2/eventspot/events/" & eID & "/registrants/" & rID & "?api_key={Your API Key}"
Dim objrequest2 As New MSXML2.XMLHTTP60
With objrequest2
.Open "Get", strRURL, False
.setRequestHeader "Authorization", "Bearer " & "{Your Token}"
.send
End With
strPostResponse2 = objrequest2.responseText
Dim rParsed As Dictionary
Set rParsed = JsonConverter.ParseJson(strPostResponse2)
Debug.Print JsonConverter.ConvertToJson(rParsed, Whitespace:=2)
For b = 2 To rParsed("sections").Count
Cells(LR + a + 1, 1).Value = eParsed("results")(a)("first_name")
Cells(LR + a + 1, 2).Value = eParsed("results")(a)("last_name")
Cells(LR + a + 1, 3).Value = eParsed("results")(a)("email")
Cells(LR + a + 1, 4).Value = rParsed("sections")(3)("fields")(1)("value") 'these can be updated depending on your requirements
Cells(LR + a + 1, 5).Value = rParsed("sections")(2)("fields")(6)("value")
Cells(LR + a + 1, 6).Value = rParsed("sections")(2)("fields")(7)("value")
Cells(LR + a + 1, 7).Value = rParsed("sections")(3)("fields")(2)("value")
Cells(LR + a + 1, 8).Value = rParsed("sections")(3)("fields")(3)("value")
Cells(LR + a + 1, 9).Value = rParsed("sections")(3)("fields")(6)("value")
Cells(LR + a + 1, 10).Value = rParsed("sections")(3)("fields")(7)("value")
Next
Next
Range("M1").Value = "Last Updated " & Format(Now(), "MM/DD/YYYY")
Application.ScreenUpdating = True
Application.Calculation = xlCalculateAutomatic
End Sub In this particular event, the rParsed sections look like this: rParsed("sections")(1) is Custom1 rParsed("sections")(2) is Personal Information rParsed("sections")(3) is Business Information rParsed("sections")(4) is Custom2 I don't know if that will be true for every event. In my case, I have this running in a spreadsheet -- I call the sub on open, and I added a button to process it on demand.
... View more
08-29-2017
09:32 AM
1 Kudo
Ultimately Jimmy recommended I switch to v2 of the API. This produced the file in JSON, and I was able to pull the information I needed using the code below. This code is dependent on VBA-JSON (https://github.com/VBA-tools/VBA-JSON) and the reference Microsoft XML, v6.0 Sub GetSelfIdentified()
Dim strNext, strCode, strList, strListName As String
Dim LR As Long
Range("A2").Select
ActiveWorkbook.Sheets("ContactLists").Activate
Dim intPageCount As Long
For rr = 3 To 16 'rows where the list IDs are located
strNext = "start"
intPageCount = 1
Do While strNext <> ""
If intPageCount = 1 Then
Cells(rr, 1).Activate
strListName = ActiveCell.Value
Cells(rr, 2).Activate
strList = "/v2/lists/" & ActiveCell.Value & "/contacts?limit=500&api_key={API KEY}"
Else
strList = strNext & "&api_key={API KEY}"
End If
LR = Range("H65000").End(xlUp).Row 'find the bottom row of the column where the email addresses will go
' this could be skipped if the addresses get put into a text file
strPostURL = "https://api.constantcontact.com" & strList
Dim objrequest As New MSXML2.XMLHTTP60
With objrequest
.Open "Get", strPostURL, False
.setRequestHeader "Authorization", "Bearer " & "{token}"
.send
End With
strPostResponse = objrequest.responseText
Dim Parsed As Dictionary
Set Parsed = JsonConverter.ParseJson(strPostResponse)
Debug.Print JsonConverter.ConvertToJson(Parsed, Whitespace:=2)
For a = 1 To Parsed("results").Count 'loops through all of the results
For b = 1 To Parsed("results")(a)("email_addresses").Count 'loops through all of the email_addresses in each result
Cells(LR + a, 8).Value = Parsed("results")(a)("email_addresses")(b)("email_address")
Next
Next
strNext = Parsed("meta")("pagination")("next_link") 'this gets the URL code for the next page
Set objrequest = Nothing
intPageCount = intPageCount + 1
Loop 'Now loop back through and put strNext in the URL
Next 'Keep doing this until strNext <> "next"
'Remove those email addresses from "Not Identified" list
'Be a hero
'Get the girl
'Win the day
End Sub
... View more
08-22-2017
10:30 AM
Thanks in advance!
... View more
08-21-2017
09:48 AM
Using VBA to run loop and get XML files of contacts within specific contact lists following this procedure: Call https://api.constantcontact.com/ws/customers/NCJTCemail/contacts?listid={listid}&api_key={api key} Create XML file with results of this get If a next URL exists, then loop and repeat until there is no next URL The list I am pulling has only 3 contacts (verified when running this in the Test API functionality, JSON file has only 3 entries). Therefore, this should run once, and quit. However, the results file has more than 3 contacts, and none of them are actually on the list. The process runs, and it does not quit. I've attempted this with other lists as well, similar results (ex. list with 500 contacts should produce 10 files of 50 contacts, instead results in 100's of files). What is going on? Sanitized Code below: strPostURL = "https://api.constantcontact.com/ws/customers/NCJTCemail/contacts?listid=[list id]&api_key=[api key]" Dim objrequest As New MSXML2.XMLHTTP60 With objrequest .Open "Get", strPostURL, False .setRequestHeader "Authorization", "Bearer " & {access token} .send End With strpostresponse = objrequest.responseText Dim lngFreeFile As Long lngFreeFile = FreeFile Open "C:\EmailAnalytics\Lists\" & ListName & "_" & intFileCount & ".xml" For Output As #lngFreeFile Print #lngFreeFile, strpostresponse Close #lngFreeFile Dim splitArray splitArray = Split(strpostresponse, """") Dim lineNum As Integer lineNum = 11 Debug.Print splitArray(lineNum) Debug.Print splitArray(lineNum + 2) If splitArray(lineNum + 2) = "next" Then strNext = splitArray(lineNum) Else strNext = "" End If
... View more
01-22-2016
02:54 PM
I would like to see an updated feature on campaign reports as follows. Issue: If I send a single campaign to multiple lists, I have to way to determine which lists were most effective. Workaround: Create a copy of the campaign for each list I am testing. Drawback is that contacts may exist on both lists. This results in receiving the emails multiple times. Recommended solution: In the campaign report, where each list is presented, provide a table which includes the list name, sends, opens, clicks, forwards, bounces, opt-outs, spam reports, and did-not opens. It is understood that these numbers will not reconcile to 100%, as contacts may be present in multiple lists. This solution will provide important data about list effectiveness.
... View more
06-05-2015
11:10 AM
After a year, I have nearly 200 campaigns. I still pull up numbers from previous campaigns. It would be ideal to be able to file these into folders (ie. "Active", "Program Name", or "Complete") in order to aid in sorting and locating information. The current options are too limited to be useful for high frequency campaigns.
... View more
