SQL Server将查询结果转换为Json格式的简单示例

这篇文章主要为大家详细介绍了SQL Server将查询结果转换为Json格式的简单示例，具有一定的参考价值，可以用来参考一下。

感兴趣的小伙伴，下面一起跟随四海网的小编两巴掌来看看吧！

脚本源码：

代码如下:

SET ANSI_NULLS ON

GO

SET QUOTED_IDENTIFIER ON

GO

CREATE PROCEDURE[dbo].[SerializeJSON](

@ParameterSQL AS VARCHAR(MAX)

)

AS

BEGIN

  

DECLARE @SQL NVARCHAR(MAX)

DECLARE @XMLString VARCHAR(MAX)

DECLARE @XML XML

DECLARE @Paramlist NVARCHAR(1000)

SET @Paramlist = N'@XML XML OUTPUT'

SET @SQL = 'WITH PrepareTable (XMLString)'

SET @SQL = @SQL + 'AS('

SET @SQL = @SQL + @ParameterSQL+ 'FOR XML RAW,TYPE,ELEMENTS'

SET @SQL = @SQL + ')'

SET @SQL = @SQL + 'SELECT @XML=[XMLString]FROM[PrepareTable]'

EXEC sp_executesql @SQL, @Paramlist, @XML=@XML OUTPUT

SET @XMLString=CAST(@XML AS VARCHAR(MAX))

  

DECLARE @JSON VARCHAR(MAX)

DECLARE @Row VARCHAR(MAX)

DECLARE @RowStart INT

DECLARE @RowEnd INT

DECLARE @FieldStart INT

DECLARE @FieldEnd INT

DECLARE @KEY VARCHAR(MAX)

DECLARE @Value VARCHAR(MAX)

  

DECLARE @StartRoot VARCHAR(100);SET @StartRoot='<row>'

DECLARE @EndRoot VARCHAR(100);SET @EndRoot='</row>'

DECLARE @StartField VARCHAR(100);SET @StartField='<'

DECLARE @EndField VARCHAR(100);SET @EndField='>'

  

SET @RowStart=CharIndex(@StartRoot,@XMLString,0)

SET @JSON=''

WHILE @RowStart>0

BEGIN

    SET @RowStart=@RowStart+Len(@StartRoot)

    SET @RowEnd=CharIndex(@EndRoot,@XMLString,@RowStart)

    SET @Row=SubString(@XMLString,@RowStart,@RowEnd-@RowStart)

    SET @JSON=@JSON+'{'

  

    -- for each row

    SET @FieldStart=CharIndex(@StartField,@Row,0)

    WHILE @FieldStart>0

    BEGIN

        -- parse node key

        SET @FieldStart=@FieldStart+Len(@StartField)

        SET @FieldEnd=CharIndex(@EndField,@Row,@FieldStart)

        SET @KEY=SubString(@Row,@FieldStart,@FieldEnd-@FieldStart)

        SET @JSON=@JSON+'"'+@KEY+'":'

        -- parse node value

        SET @FieldStart=@FieldEnd+1

        SET @FieldEnd=CharIndex('</',@Row,@FieldStart)

        SET @Value=SubString(@Row,@FieldStart,@FieldEnd-@FieldStart)

        SET @JSON=@JSON+'"'+@Value+'",'

  

        SET @FieldStart=@FieldStart+Len(@StartField)

        SET @FieldEnd=CharIndex(@EndField,@Row,@FieldStart)

        SET @FieldStart=CharIndex(@StartField,@Row,@FieldEnd)

    END    

    IF LEN(@JSON)>0SET @JSON=SubString(@JSON,0,LEN(@JSON))

    SET @JSON=@JSON+'},'

    --/ for each row

  

    SET @RowStart=CharIndex(@StartRoot,@XMLString,@RowEnd)

END

IF LEN(@JSON)>0SET @JSON=SubString(@JSON,0,LEN(@JSON))

SET @JSON='['+@JSON+']'

SELECT @JSON

  

END

GO

使用方法：

代码如下:

EXEC[SerializeJSON]'SELECT*FROM[Employee_TBL]'

本文来自：http://www.q1010.com/179/8881-0.html

注：关于SQL Server将查询结果转换为Json格式的简单示例的内容就先介绍到这里，更多相关文章的可以留意四海网的其他信息。

关键词：SQL SERVER