SQL Server

Add a Related String Addressed by Name

Demonstrates the Chilkat Email.AddRelatedString2 method, which adds a related item from an in-memory string, addressed by the name used in the HTML rather than by a generated Content-ID. The first argument should match the filename used in an HTML img src or a stylesheet link href; the second is the Unicode content; the third is the charset it is converted to. Related items are images and style sheets embedded to support the HTML display — they are not attachments. This example embeds a CSS style sheet referenced as styles.css.

Background: This is the string-based, Content-Location counterpart to AddRelatedString. Instead of the HTML pointing at a cid: URL, it keeps a natural reference like href="styles.css", and the related part is matched to it by name. That makes it a good fit when you are turning existing web content into email and want the original relative references to keep working without rewriting them.

Chilkat SQL Server Downloads

Download Chilkat for SQL Server

SQL Server

--
CREATE PROCEDURE ChilkatSample
AS
BEGIN
    DECLARE @hr int
    DECLARE @iTmp0 int
    --  Demonstrates the AddRelatedString2 method, which adds a related item to the email from
    --  an in-memory string, addressed by the name used in the HTML (Content-Location).  The first
    --  argument is the filename used in the HTML reference, the second is the content, and the
    --  third is the charset.

    DECLARE @email int
    EXEC @hr = sp_OACreate 'Chilkat.Email', @email OUT
    IF @hr <> 0
    BEGIN
        PRINT 'Failed to create ActiveX component'
        RETURN
    END

    EXEC sp_OASetProperty @email, 'Subject', 'Email with a related style sheet (by name)'

    --  The HTML references the style sheet by the same name used for the related item.
    EXEC sp_OAMethod @email, 'SetHtmlBody', NULL, '<html><head><link rel="stylesheet" href="styles.css"/></head><body>Styled.</body></html>'

    --  Add the style sheet as a related item addressed by the name used in the HTML.
    EXEC sp_OAMethod @email, 'AddRelatedString2', NULL, 'styles.css', 'body { color: navy; }', 'utf-8'


    EXEC sp_OAGetProperty @email, 'NumRelatedItems', @iTmp0 OUT
    PRINT 'NumRelatedItems = ' + @iTmp0

    EXEC @hr = sp_OADestroy @email


END
GO