Chilkat HOME .NET Core C# Android™ AutoIt C C# C++ Chilkat2-Python CkPython Classic ASP DataFlex Delphi ActiveX Delphi DLL Go Java Lianja Mono C# Node.js Objective-C PHP ActiveX PHP Extension Perl PowerBuilder PowerShell PureBasic Ruby SQL Server Swift 2 Swift 3,4,5... Tcl Unicode C Unicode C++ VB.NET VBScript Visual Basic 6.0 Visual FoxPro Xojo Plugin
(PowerBuilder) SendRawEmail (HTML Email with PDF Attachment)IMPORTANT: This example requires Chilkat v9.5.0.61 or greater. If this version is not yet available, send email to support@chilktasoft.com. Chilkat will provide the new version upon request. Demonstrates how to use the SES SendRawEmail action to send an email with an attachment. Note: The total size of an SES email cannot exceed 10MB. See SES SendRawEmail for more information.
integer li_rc oleobject loo_Email string ls_ContentType string ls_MimeStr oleobject loo_Crypt string ls_MimeBase64 oleobject loo_Rest integer li_BTls integer li_Port integer li_BAutoReconnect integer li_Success oleobject loo_AuthAws string ls_ResponseXml oleobject loo_Xml // This example requires the Chilkat API to have been previously unlocked. // See Global Unlock Sample for sample code. // Let's first prepare the email to be sent.. loo_Email = create oleobject li_rc = loo_Email.ConnectToNewObject("Chilkat_9_5_0.Email") if li_rc < 0 then destroy loo_Email MessageBox("Error","Connecting to COM object failed") return end if loo_Email.Subject = "Test email with PDF attachment." loo_Email.SetHtmlBody("<html><body><p>This is a test <b>HTML email with a PDF attachment</b></p></body></html>") // The AddFileAttachment method returns the content-type selected based on the // file extension. This example has no need of using the return value.. ls_ContentType = loo_Email.AddFileAttachment("qa_data/pdf/fishing.pdf") if loo_Email.LastMethodSuccess <> 1 then Write-Debug loo_Email.LastErrorText destroy loo_Email return end if // Add the From header, and some recipients. // The From address should be an email address verified for use // as a sender for your Amazon SES account. // The From address will also be the Source parameter for the SES SendRawEmail request. loo_Email.From = "Chilkat Software <admin@chilkatdownload.com>" // Add recipients... // Note: We DO NOT add BCC recipients to the email. A BCC address should not be // present in the MIME header of the email (otherwise it would not be "blind" because // other recipients would be able to see it). // These same addresses will be added as parameters to the SendRawEmail request. // (BCC addresses are added as parameters at that time.) loo_Email.AddTo("Mr. Simulator","success@simulator.amazonses.com") loo_Email.AddCC("Chilkat Support","support@chilkatsoft.com") loo_Email.AddCC("Some Yahoo","somebody@yahoo.com") // Get the MIME of the email to be sent. ls_MimeStr = loo_Email.GetMime() // We'll need the MIME base64 encoded for the SES REST request.. loo_Crypt = create oleobject li_rc = loo_Crypt.ConnectToNewObject("Chilkat_9_5_0.Crypt2") ls_MimeBase64 = loo_Crypt.EncodeString(ls_MimeStr,"utf-8","base64") // OK.. our MIME email is prepared. Now use Chilkat REST to send it.. loo_Rest = create oleobject li_rc = loo_Rest.ConnectToNewObject("Chilkat_9_5_0.Rest") // Connect to the Amazon AWS REST server. // such as https://email.us-west-2.amazonaws.com/ li_BTls = 1 li_Port = 443 li_BAutoReconnect = 1 li_Success = loo_Rest.Connect("email.us-west-2.amazonaws.com",li_Port,li_BTls,li_BAutoReconnect) // Provide AWS credentials for the REST call. loo_AuthAws = create oleobject li_rc = loo_AuthAws.ConnectToNewObject("Chilkat_9_5_0.AuthAws") loo_AuthAws.AccessKey = "AWS_ACCESS_KEY" loo_AuthAws.SecretKey = "AWS_SECRET_KEY" // the region should match our URL above.. loo_AuthAws.Region = "us-west-2" loo_AuthAws.ServiceName = "ses" loo_Rest.SetAuthAws(loo_AuthAws) loo_Rest.AddQueryParam("Action","SendRawEmail") loo_Rest.AddQueryParam("RawMessage.Data",ls_MimeBase64) // Add up to 100 TO, CC, and BCC recipients. // If your SES account is still in the sandbox, you also must verify every recipient email address except for the recipients // provided by the Amazon SES mailbox simulator. (See http://docs.aws.amazon.com/ses/latest/DeveloperGuide/mailbox-simulator.html) loo_Rest.AddQueryParam("Destination.ToAddresses.member.1","success@simulator.amazonses.com") // Please do not test by sending email to Chilkat (Thank You!) // Please do not test by sending email to Chilkat (Thank You!) // Please do not test by sending email to Chilkat (Thank You!) loo_Rest.AddQueryParam("Destination.CcAddresses.member.1","support@chilkatsoft.com") loo_Rest.AddQueryParam("Destination.CcAddresses.member.2","somebody@yahoo.com") loo_Rest.AddQueryParam("Destination.BccAddresses.member.1","somebody@gmail.com") loo_Rest.AddQueryParam("Source","admin@chilkatdownload.com") // Because there may be a large amount of data in the query params, use a POST // where the params are sent in the body of the HTTP Request. ls_ResponseXml = loo_Rest.FullRequestFormUrlEncoded("POST","/") if loo_Rest.LastMethodSuccess <> 1 then Write-Debug loo_Rest.LastErrorText destroy loo_Email destroy loo_Crypt destroy loo_Rest destroy loo_AuthAws return end if // A successful response will have a status code equal to 200. if loo_Rest.ResponseStatusCode <> 200 then Write-Debug "response status code = " + string(loo_Rest.ResponseStatusCode) Write-Debug "response status text = " + loo_Rest.ResponseStatusText Write-Debug "response header: " + loo_Rest.ResponseHeader Write-Debug "response body: " + ls_ResponseXml destroy loo_Email destroy loo_Crypt destroy loo_Rest destroy loo_AuthAws return end if // Examine the successful XML response. loo_Xml = create oleobject li_rc = loo_Xml.ConnectToNewObject("Chilkat_9_5_0.Xml") loo_Xml.LoadXml(ls_ResponseXml) Write-Debug loo_Xml.GetXml() // To get the MessageId Write-Debug "MessageId: " + loo_Xml.ChilkatPath("SendEmailResult|MessageId|*") // A sample successful response: // <?xml version="1.0" encoding="utf-8" ?> // <SendEmailResponse xmlns="http://ses.amazonaws.com/doc/2010-12-01/"> // <SendEmailResult> // <MessageId>010101579081d2c1-043c693f-5a23-4c64-a8c1-66187d3725a0-000000</MessageId> // </SendEmailResult> // <ResponseMetadata> // <RequestId>e2b5b480-8a4e-11e6-85cd-21b1f1f6d432</RequestId> // </ResponseMetadata> // </SendEmailResponse> destroy loo_Email destroy loo_Crypt destroy loo_Rest destroy loo_AuthAws destroy loo_Xml |
© 2000-2023 Chilkat Software, Inc. All Rights Reserved.