Lua

Send HTML Email with External CSS as Related Item

See more SMTP Examples

Demonstrates how to compose an HTML email with an external CSS file included as a related item and referenced by CID (Content-ID). Lua

local chilkat = require("chilkat")

-- This example requires the Chilkat API to have been previously unlocked.
-- See Global Unlock Sample for sample code.

-- The mailman object is used for sending and receiving email.
local mailman = chilkat.MailMan.new()

-- Use your SMTP server hostname.  This example uses office365, but it could be any SMTP server..
mailman.smtp_host = "outlook.office365.com"
mailman.smtp_port = 587
mailman.start_tls = true

-- Set the SMTP login/password
mailman.smtp_username = "OFFICE365-SMTP-LOGIN"
mailman.smtp_password = "OFFICE365-SMTP-PASSWORD"

-- Create a new email object
local email = chilkat.Email.new()
email.subject = "HTML Email with embedded CSS"
email.from = "Chilkat Support <my-office365-user@mydomain.com>"
email:add_to("Chilkat Support", "support@chilkatsoft.com")

local sbCss = chilkat.StringBuilder.new()
local bCrlf = true
sbCss:append_line("body {", bCrlf)
sbCss:append_line("    background-color: powderblue;", bCrlf)
sbCss:append_line("}", bCrlf)
sbCss:append_line("h1 {", bCrlf)
sbCss:append_line("    color: blue;", bCrlf)
sbCss:append_line("}", bCrlf)
sbCss:append_line("p {", bCrlf)
sbCss:append_line("    color: red;", bCrlf)
sbCss:append_line("}", bCrlf)

-- It's possible to add a CSS file directly by calling AddRelatedFile.
-- This example will add the CSS from a string.
local filenameInHtml = "styles.css"
local contentIdCss = email:add_related_string(filenameInHtml, sbCss:get_as_string(), "utf-8")
if not email.last_method_success then
    print(email.last_error_text)
    return
end

-- The src attribute for the image tag is set to the contentIdCss:
local sbHtml = chilkat.StringBuilder.new()
sbHtml:append_line("<!DOCTYPE html>", bCrlf)
sbHtml:append_line("<html>", bCrlf)
sbHtml:append_line("<head>", bCrlf)
sbHtml:append_line("  <link rel=\"stylesheet\" href=\"cid:CONTENT_ID_CSS\">", bCrlf)
sbHtml:append_line("</head>", bCrlf)
sbHtml:append_line("<body>", bCrlf)
sbHtml:append_line("", bCrlf)
sbHtml:append_line("<h1>This is a heading</h1>", bCrlf)
sbHtml:append_line("<p>This is a paragraph.</p>", bCrlf)
sbHtml:append_line("", bCrlf)
sbHtml:append_line("</body>", bCrlf)
sbHtml:append_line("</html>", bCrlf)

local numReplacements = sbHtml:replace("CONTENT_ID_CSS", contentIdCss)

email:set_html_body(sbHtml:get_as_string())

local success = mailman:send_email(email)
if not success then
    print(mailman.last_error_text)
else
    print("Mail Sent!")
end