【www.129028.com金沙】SQL Server中将查询结果转换为Json格式脚本分享

日期:2020-05-07编辑作者:数据库

脚本源码:

复制代码 代码如下:SET ANSI_NULLS ONGOSET QUOTED_IDENTIFIER ONGOCREATE PROCEDURE[dbo].[SerializeJSON](@ParameterSQL AS VARCHAR(MAX))ASBEGINDECLARE @SQL NVARCHAR(MAX)DECLARE @XMLString VARCHAR(MAX)DECLARE @XML XMLDECLARE @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 OUTPUTSET @XMLString=CAST(@XML AS VARCHAR(MAX))DECLARE @JSON VARCHAR(MAX)DECLARE @Row VARCHAR(MAX)DECLARE @RowStart INTDECLARE @RowEnd INTDECLARE @FieldStart INTDECLARE @FieldEnd INTDECLARE @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 @RowStart0BEGINSET @RowStart=@RowStart+Len(@StartRoot)SET @RowEnd=CharIndex(@EndRoot,@XMLString,@RowStart)SET @Row=SubString(@XMLString,@RowStart,@RowEnd-@RowStart)SET @JSON=@JSON+'{'-- for each rowSET @FieldStart=CharIndex(@StartField,@Row,0)WHILE @FieldStart0BEGIN-- parse node keySET @FieldStart=@FieldStart+Len(@StartField)SET @FieldEnd=CharIndex(@EndField,@Row,@FieldStart)SET @KEY=SubString(@Row,@FieldStart,@FieldEnd-@FieldStart)SET @JSON=@JSON+'"'+@KEY+'":'-- parse node valueSET @FieldStart=@FieldEnd+1SET @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 rowSET @RowStart=CharIndex(@StartRoot,@XMLString,@RowEnd)ENDIF LEN(@JSON)0SET @JSON=SubString(@JSON,0,LEN(@JSON))SET @JSON='['+@JSON+']'SELECT @JSONENDGO

使用方法:复制代码 代码如下:EXEC[SerializeJSON]'SELECT*www.129028.com金沙,FROM[Employee_TBL]'

本文由www.129028.com金沙发布于数据库,转载请注明出处:【www.129028.com金沙】SQL Server中将查询结果转换为Json格式脚本分享

关键词:

Sql Server中的非聚集索引详细介

这篇我们来解开神秘面纱。 3:通过最后的槽位列表,可以得知173号索引页上存放着8条索引记录。 复制代码 代码如下...

详细>>

必须会的SQL语句(一) 创建数据库与删除数据库【www.129028.com金沙

1.创建数据库 drop命令用于删除数据库。 Create database 名称on primary{ name ='名称', filename ='c:xx名称.mdf', size = 10mb, --数据库...

详细>>

SqlServer提示“列前缀tempdb.无效: 未指定表名”问题解决方案www

在查询凭证、审核凭证时出现“列前缀tempdb.无效:未指定表名”的错误提示,怎么解决? 本文我们总结了几个在安装...

详细>>

SqlServer2012中First_Value函数简单分析

DECLARE @TestData TABLE( ID INT IDENTITY(1,1), Department VARCHAR(20), LastName VARCHAR(20), Rate FLOAT ) INSERT INTO @TestData(Department,LastName,Rat...

详细>>