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
(SQL Server) Mailgun Send Send HTML Email with Attachments and HTML ImagesSee more Mailgun ExamplesSends an HTML email with images and attachments. For more information, see https://documentation.mailgun.com/en/latest/api-sending.html#sending
-- Important: See this note about string length limitations for strings returned by sp_OAMethod calls. -- CREATE PROCEDURE ChilkatSample AS BEGIN DECLARE @hr int DECLARE @iTmp0 int -- Important: Do not use nvarchar(max). See the warning about using nvarchar(max). DECLARE @sTmp0 nvarchar(4000) -- This example assumes the Chilkat API to have been previously unlocked. -- See Global Unlock Sample for sample code. DECLARE @http int EXEC @hr = sp_OACreate 'Chilkat_9_5_0.Http', @http OUT IF @hr <> 0 BEGIN PRINT 'Failed to create ActiveX component' RETURN END DECLARE @success int EXEC sp_OASetProperty @http, 'Login', 'api' EXEC sp_OASetProperty @http, 'Password', 'sending_api_key' -- Replace with your actual sending API key. DECLARE @req int EXEC @hr = sp_OACreate 'Chilkat_9_5_0.HttpRequest', @req OUT EXEC sp_OASetProperty @req, 'HttpVerb', 'POST' EXEC sp_OASetProperty @req, 'Path', '/v3/YOUR_DOMAIN_NAME/messages' EXEC sp_OASetProperty @req, 'ContentType', 'multipart/form-data' -- Change YOUR_DOMAIN_NAME to something like "mg.your-domain.com". EXEC sp_OAMethod @req, 'AddParam', NULL, 'from', 'Your Name <mailgun@YOUR_DOMAIN_NAME>' EXEC sp_OAMethod @req, 'AddParam', NULL, 'to', 'Joe Example <joe@example.com>' EXEC sp_OAMethod @req, 'AddParam', NULL, 'subject', 'Hello Joe Example' EXEC sp_OAMethod @req, 'AddParam', NULL, 'html', '<html><body><b>This is the HTML body</b><br><img src="cid:cidStarfish.jpg"></body></html>' -- An a attachd file DECLARE @bd int EXEC @hr = sp_OACreate 'Chilkat_9_5_0.BinData', @bd OUT EXEC sp_OAMethod @bd, 'LoadFile', @success OUT, 'qa_data/hamlet.zip' IF @success = 0 BEGIN PRINT 'Failed to load file attachment.' EXEC @hr = sp_OADestroy @http EXEC @hr = sp_OADestroy @req EXEC @hr = sp_OADestroy @bd RETURN END EXEC sp_OAMethod @req, 'AddBdForUpload', @success OUT, 'attachment', 'hamlet.zip', @bd, 'application/zip' -- add an image as CID EXEC sp_OAMethod @bd, 'LoadFile', @success OUT, 'qa_data/jpg/starfish.jpg' IF @success = 0 BEGIN PRINT 'Failed to load HTML image.' EXEC @hr = sp_OADestroy @http EXEC @hr = sp_OADestroy @req EXEC @hr = sp_OADestroy @bd RETURN END EXEC sp_OAMethod @req, 'AddBdForUpload', @success OUT, 'inline', 'cidStarfish.jpg', @bd, 'image/jpeg' DECLARE @resp int EXEC sp_OAMethod @http, 'SynchronousRequest', @resp OUT, 'api.mailgun.net', 443, 1, @req EXEC sp_OAGetProperty @http, 'LastMethodSuccess', @iTmp0 OUT IF @iTmp0 = 0 BEGIN EXEC sp_OAGetProperty @http, 'LastErrorText', @sTmp0 OUT PRINT @sTmp0 EXEC @hr = sp_OADestroy @http EXEC @hr = sp_OADestroy @req EXEC @hr = sp_OADestroy @bd RETURN END DECLARE @sbResponseBody int EXEC @hr = sp_OACreate 'Chilkat_9_5_0.StringBuilder', @sbResponseBody OUT EXEC sp_OAMethod @resp, 'GetBodySb', @success OUT, @sbResponseBody DECLARE @jResp int EXEC @hr = sp_OACreate 'Chilkat_9_5_0.JsonObject', @jResp OUT EXEC sp_OAMethod @jResp, 'LoadSb', @success OUT, @sbResponseBody EXEC sp_OASetProperty @jResp, 'EmitCompact', 0 PRINT 'Response Body:' EXEC sp_OAMethod @jResp, 'Emit', @sTmp0 OUT PRINT @sTmp0 DECLARE @respStatusCode int EXEC sp_OAGetProperty @resp, 'StatusCode', @respStatusCode OUT PRINT 'Response Status Code = ' + @respStatusCode IF @respStatusCode >= 400 BEGIN PRINT 'Response Header:' EXEC sp_OAGetProperty @resp, 'Header', @sTmp0 OUT PRINT @sTmp0 PRINT 'Failed.' EXEC @hr = sp_OADestroy @resp EXEC @hr = sp_OADestroy @http EXEC @hr = sp_OADestroy @req EXEC @hr = sp_OADestroy @bd EXEC @hr = sp_OADestroy @sbResponseBody EXEC @hr = sp_OADestroy @jResp RETURN END EXEC @hr = sp_OADestroy @resp -- 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 DECLARE @id nvarchar(4000) EXEC sp_OAMethod @jResp, 'StringOf', @id OUT, 'id' DECLARE @message nvarchar(4000) EXEC sp_OAMethod @jResp, 'StringOf', @message OUT, 'message' EXEC @hr = sp_OADestroy @http EXEC @hr = sp_OADestroy @req EXEC @hr = sp_OADestroy @bd EXEC @hr = sp_OADestroy @sbResponseBody EXEC @hr = sp_OADestroy @jResp END GO |
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.