![]() |
Chilkat HOME Android™ AutoIt C C# C++ Chilkat2-Python CkPython Classic ASP DataFlex Delphi DLL Go Java Node.js Objective-C PHP Extension Perl PowerBuilder PowerShell PureBasic Ruby SQL Server Swift Tcl Unicode C Unicode C++ VB.NET VBScript Visual Basic 6.0 Visual FoxPro Xojo Plugin
(Lianja) Mailgun Send Send HTML Email with Attachments and HTML ImagesSee more Mailgun ExamplesSends an HTML email with images and attachments.Note: This example requires Chilkat v11.0.0 or greater. For more information, see https://documentation.mailgun.com/en/latest/api-sending.html#sending
llSuccess = .F. // This example assumes the Chilkat API to have been previously unlocked. // See Global Unlock Sample for sample code. loHttp = createobject("CkHttp") loHttp.Login = "api" loHttp.Password = "sending_api_key"// Replace with your actual sending API key. loReq = createobject("CkHttpRequest") loReq.HttpVerb = "POST" loReq.Path = "/v3/YOUR_DOMAIN_NAME/messages" loReq.ContentType = "multipart/form-data" // Change YOUR_DOMAIN_NAME to something like "mg.your-domain.com". loReq.AddParam("from","Your Name <mailgun@YOUR_DOMAIN_NAME>") loReq.AddParam("to","Joe Example <joe@example.com>") loReq.AddParam("subject","Hello Joe Example") loReq.AddParam("html",'<html><body><b>This is the HTML body</b><br><img src="cid:cidStarfish.jpg"></body></html>') // An a attachd file loBd = createobject("CkBinData") llSuccess = loBd.LoadFile("qa_data/hamlet.zip") if (llSuccess = .F.) then ? "Failed to load file attachment." release loHttp release loReq release loBd return endif loReq.AddBdForUpload("attachment","hamlet.zip",loBd,"application/zip") // add an image as CID llSuccess = loBd.LoadFile("qa_data/jpg/starfish.jpg") if (llSuccess = .F.) then ? "Failed to load HTML image." release loHttp release loReq release loBd return endif loReq.AddBdForUpload("inline","cidStarfish.jpg",loBd,"image/jpeg") loResp = createobject("CkHttpResponse") llSuccess = loHttp.HttpSReq("api.mailgun.net",443,.T.,loReq,loResp) if (llSuccess = .F.) then ? loHttp.LastErrorText release loHttp release loReq release loBd release loResp return endif loSbResponseBody = createobject("CkStringBuilder") loResp.GetBodySb(loSbResponseBody) loJResp = createobject("CkJsonObject") loJResp.LoadSb(loSbResponseBody) loJResp.EmitCompact = .F. ? "Response Body:" ? loJResp.Emit() lnRespStatusCode = loResp.StatusCode ? "Response Status Code = " + str(lnRespStatusCode) if (lnRespStatusCode >= 400) then ? "Response Header:" ? loResp.Header ? "Failed." release loHttp release loReq release loBd release loResp release loSbResponseBody release loJResp return endif // Sample JSON response: // (Sample code for parsing the JSON response is shown below) // { // "id": "<20210429234809.1.2D550E1C94D3D98F@sandbox0e542e4c577f4bbb98c8bf6b6bca727b.mailgun.org>", // "message": "Queued. Thank you." // } // Sample code for parsing the JSON response... // Use the following online tool to generate parsing code from sample JSON: // Generate Parsing Code from JSON lcId = loJResp.StringOf("id") lcMessage = loJResp.StringOf("message") release loHttp release loReq release loBd release loResp release loSbResponseBody release loJResp |
© 2000-2025 Chilkat Software, Inc. All Rights Reserved.