创建MailChimp广告系列

时间:2010-11-10 00:36:46

标签: vb.net mailchimp

   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 :(得分:0)

如果您没有从别人那里得到任何答案,您可能希望查看是否有任何电子邮件被发送,以及是否在适当的时间将这些电子邮件发送给合适的人员。