Send MHTML Email

Simple example to send MHTML email. If you have a .mht file, this example show how to send it as an email.

MHTML stands for MIME HTML (Multipurpose Internet Mail Extension HTML). It is a standard for including resources that in usual HTTP pages are linked externally, such as images and sound files, in the same file as the HTML code, based on RFC 2557. The included data files are encoded using MIME. This format is sometimes referred to as MHT, after the suffix .mht given to such files by default when created by Microsoft Word, Internet Explorer or Opera.

Download Chilkat Email ActiveX for POP3 / SMTP

Download Chilkat IMAP ActiveX

CREATE PROCEDURE ChilkatSample
AS
BEGIN
    DECLARE @hr int
    DECLARE @sTmp0 nvarchar(4000)
    --  The mailman object is used for sending and receiving email.
    DECLARE @mailman int
    EXEC @hr = sp_OACreate 'Chilkat.MailMan2', @mailman OUT
    IF @hr <> 0
    BEGIN
        PRINT 'Failed to create ActiveX component'
        RETURN
    END

    --  Any string argument automatically begins the 30-day trial.
    DECLARE @success int

    EXEC sp_OAMethod @mailman, 'UnlockComponent', @success OUT, '30-day trial'
    IF @success <> 1
      BEGIN
        PRINT 'Component unlock failed'
        RETURN
      END

    --  Set the SMTP server.
    EXEC sp_OASetProperty @mailman, 'SmtpHost', 'mail.chilkatsoft.com'

    --  You may or may not need SMTP authentication -- it depends
    --  on your SMTP server...
    EXEC sp_OASetProperty @mailman, 'SmtpUsername', 'mylogin'
    EXEC sp_OASetProperty @mailman, 'SmtpPassword', 'mypassword'

    --  Create a new email object
    DECLARE @email int
    EXEC @hr = sp_OACreate 'Chilkat.Email2', @email OUT
    IF @hr <> 0
    BEGIN
        PRINT 'Failed to create ActiveX component'
        RETURN
    END

    --  Note: .mht files are MIME, and are really no different
    --  than .eml.  The only difference is the file extension
    --  and the intended use.  You can load any .mht into
    --  an email object by calling LoadEml:
    EXEC sp_OAMethod @email, 'LoadEml', @success OUT, 'myMhtml.mht'
    IF @success <> 1
      BEGIN
        EXEC sp_OAGetProperty @email, 'LastErrorText', @sTmp0 OUT
        PRINT @sTmp0
        RETURN
      END

    --  To complete the email, add a subject, From address,
    --  and recipients...
    EXEC sp_OASetProperty @email, 'Subject', 'This is an MHTML email test'
    EXEC sp_OASetProperty @email, 'From', 'Chilkat <admin@chilkatsoft.com>'
    EXEC sp_OAMethod @email, 'AddTo', NULL, 'Chilkat Support', 'support@chilkatsoft.com'

    --  Send the MHTML mail.
    EXEC sp_OAMethod @mailman, 'SendEmail', @success OUT, @email
    IF @success <> 1
      BEGIN
        EXEC sp_OAGetProperty @mailman, 'LastErrorText', @sTmp0 OUT
        PRINT @sTmp0
      END
    ELSE
      BEGIN
        PRINT 'Mail Sent!'
      END
END
GO