Создать кампанию MailChimp - PullRequest
       7

Создать кампанию MailChimp

1 голос
/ 10 ноября 2010
   Dim CCoptions As campaignCreateOptions = New campaignCreateOptions()
    CCoptions.from_email = "chimpmail12@gmail.com"
    CCoptions.from_name = "dummy"
    CCoptions.to_email = "vettr@gmail.com"
    CCoptions.subject = "HelloWorld"
    CCoptions.list_id = "0fd2345g"
    CCoptions.title = "who am i?"

    Dim CCcontent As Dictionary(Of String, String) = New Dictionary(Of String, String)
    CCcontent.Add("html", "some pretty html content  message")
    CCcontent.Add("text", "hdfjhfk000")

    Dim params As campaignCreateParms = New campaignCreateParms
    params.content = CCcontent
    params.options = CCoptions
    params.type = EnumValues.campaign_type.auto
    params.apikey = "xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx-us2"

    Dim CCinput As campaignCreateInput = New campaignCreateInput(params)

    Dim CCcmd As campaignCreate = New campaignCreate(CCinput)
    Dim CCoutput As campaignCreateOutput = CCcmd.Execute()

    Label1.Text = CCoutput.result       

Я не получаю никакого ответа, можете ли вы указать мою проблему?

1 Ответ

0 голосов
/ 10 ноября 2010

Если вы не получаете никаких ответов от людей, вы можете посмотреть, отправляются ли какие-либо электронные письма и отправляются ли они в нужное время нужным людям.

...