(SQL Server) Setting the XML DOCTYPE

Demonstrates setting an XML document's DOCTYPE. The sample code below produces the following XML output:

<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">

<html>
    <body>This is the HTML body</body>
</html>

Download Chilkat XML ActiveX

CREATE PROCEDURE ChilkatSample
AS
BEGIN
    DECLARE @hr int
    DECLARE @sTmp0 nvarchar(4000)

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

    EXEC sp_OASetProperty @root, 'Tag', 'html'

    EXEC sp_OASetProperty @root, 'DocType', '<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">'

    EXEC sp_OAMethod @root, 'NewChild2', NULL, 'body', 'This is the HTML body'

    EXEC sp_OAMethod @root, 'GetXml', @sTmp0 OUT
    PRINT @sTmp0


END
GO