(SQL Server) StringBuilder GetNth

Demonstrates the GetNth method.

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)
    -- The GetNth method is handy for getting parts from delimited strings.
    -- For example:

    DECLARE @sb int
    -- Use "Chilkat_9_5_0.StringBuilder" for versions of Chilkat < 10.0.0
    EXEC @hr = sp_OACreate 'Chilkat.StringBuilder', @sb OUT
    IF @hr <> 0
    BEGIN
        PRINT 'Failed to create ActiveX component'
        RETURN
    END

    DECLARE @success int
    EXEC sp_OAMethod @sb, 'Append', @success OUT, 'red,blue,"green,purple",,yellow'

    DECLARE @delimiterChar nvarchar(4000)
    SELECT @delimiterChar = ','
    DECLARE @exceptDoubleQuoted int
    SELECT @exceptDoubleQuoted = 1
    DECLARE @exceptEscaped int
    SELECT @exceptEscaped = 1

    -- Prints "[red]"

    EXEC sp_OAMethod @sb, 'GetNth', @sTmp0 OUT, 0, @delimiterChar, @exceptDoubleQuoted, @exceptEscaped

    PRINT '[' + @sTmp0 + ']'

    -- Prints "[blue]"

    EXEC sp_OAMethod @sb, 'GetNth', @sTmp0 OUT, 1, @delimiterChar, @exceptDoubleQuoted, @exceptEscaped

    PRINT '[' + @sTmp0 + ']'

    -- Prints "[green,purple]"

    EXEC sp_OAMethod @sb, 'GetNth', @sTmp0 OUT, 2, @delimiterChar, @exceptDoubleQuoted, @exceptEscaped

    PRINT '[' + @sTmp0 + ']'

    -- Prints "[]"

    EXEC sp_OAMethod @sb, 'GetNth', @sTmp0 OUT, 3, @delimiterChar, @exceptDoubleQuoted, @exceptEscaped

    PRINT '[' + @sTmp0 + ']'

    -- Prints "[yellow]"

    EXEC sp_OAMethod @sb, 'GetNth', @sTmp0 OUT, 4, @delimiterChar, @exceptDoubleQuoted, @exceptEscaped

    PRINT '[' + @sTmp0 + ']'

    -- Prints "[]"

    EXEC sp_OAMethod @sb, 'GetNth', @sTmp0 OUT, 5, @delimiterChar, @exceptDoubleQuoted, @exceptEscaped

    PRINT '[' + @sTmp0 + ']'

    EXEC @hr = sp_OADestroy @sb


END
GO