(SQL Server) Unpack MHT to Files

See more MHT / HTML Email Examples

Demonstrates how to unpack a .mhtml to files. Unpacks the HTML and to a directory, and image files to a sub-directory located under the directory where the HTML file is unpacked. The image links in the HTML are updated to point to the image files.

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows

-- Important: See this note about string length limitations for strings returned by sp_OAMethod calls.
--
CREATE PROCEDURE ChilkatSample
AS
BEGIN
    DECLARE @hr 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 @mht int
    -- Use "Chilkat_9_5_0.Mht" for versions of Chilkat < 10.0.0
    EXEC @hr = sp_OACreate 'Chilkat.Mht', @mht OUT
    IF @hr <> 0
    BEGIN
        PRINT 'Failed to create ActiveX component'
        RETURN
    END

    -- This should be an absolute or relative path to the MHT file.
    -- It is the MHT to be unpacked.
    DECLARE @mhtPath nvarchar(4000)
    SELECT @mhtPath = 'qa_data/mht/test.mht'

    DECLARE @unpackDir nvarchar(4000)
    SELECT @unpackDir = 'C:/AAWorkarea/mht_unpack'
    DECLARE @htmlFilename nvarchar(4000)
    SELECT @htmlFilename = 'test.html'
    DECLARE @partsSubDir nvarchar(4000)
    SELECT @partsSubDir = 'images'

    -- Unpacking will create the HTML file C:/AAWorkarea/mht_unpack/test.html
    -- The image files are unpacked to C:/AAWorkarea/mht_unpack/images
    -- The unpackDir and partsSubDir are automatically created if needed.

    DECLARE @success int
    EXEC sp_OAMethod @mht, 'UnpackMHT', @success OUT, @mhtPath, @unpackDir, @htmlFilename, @partsSubDir
    IF @success = 0
      BEGIN
        EXEC sp_OAGetProperty @mht, 'LastErrorText', @sTmp0 OUT
        PRINT @sTmp0

        PRINT 'Failed.'
      END
    ELSE
      BEGIN

        PRINT 'Success.'
      END

    EXEC @hr = sp_OADestroy @mht


END
GO