SQL Server

Get the Decoded MIME Body Text

Demonstrates the Chilkat Mime.GetBodyDecoded method, which returns the decoded body as text. It takes no arguments. Chilkat first reverses the Content-Transfer-Encoding and then interprets the bytes according to the declared charset.

Note: The file paths are relative to the application's current working directory. Absolute paths may also be used. Supply the paths appropriate to your own environment.

Background: This gives you the actual, human-readable content of a text part — the two-step decode (transfer encoding, then charset) is exactly what a mail client does to display it. Use it for text parts; for binary content such as an image, decode to bytes with GetBodyBd instead, since forcing binary through a text decode would corrupt it.

Chilkat SQL Server Downloads

Download Chilkat for SQL Server

SQL Server

-- 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
    DECLARE @sTmp0 nvarchar(4000)
    DECLARE @success int
    SELECT @success = 0

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

    EXEC sp_OAMethod @mime, 'LoadMimeFile', @success OUT, 'qa_data/message.eml'
    IF @success = 0
      BEGIN
        EXEC sp_OAGetProperty @mime, 'LastErrorText', @sTmp0 OUT
        PRINT @sTmp0
        EXEC @hr = sp_OADestroy @mime
        RETURN
      END

    --  Return the body as decoded text.  Chilkat first reverses the Content-Transfer-Encoding (Base64
    --  or quoted-printable) and then interprets the bytes according to the declared charset.
    DECLARE @bodyText nvarchar(4000)
    EXEC sp_OAMethod @mime, 'GetBodyDecoded', @bodyText OUT
    EXEC sp_OAGetProperty @mime, 'LastMethodSuccess', @iTmp0 OUT
    IF @iTmp0 = 0
      BEGIN
        EXEC sp_OAGetProperty @mime, 'LastErrorText', @sTmp0 OUT
        PRINT @sTmp0
        EXEC @hr = sp_OADestroy @mime
        RETURN
      END

    PRINT @bodyText

    EXEC @hr = sp_OADestroy @mime


END
GO