SqlServer将查询结果转换为XML和JSON(2)-木庄网络博客

XML转JSON的存储过程如下：

CREATE PROCEDURE [dbo].[SerializeJSON] (
   @XML XML,
   @json_xml NVARCHAR(MAX) OUTPUT
  )
AS
BEGIN
  DECLARE @XMLString NVARCHAR(MAX);
  SET @XMLString = CAST(@XML AS NVARCHAR(MAX));
  BEGIN TRY--//开始捕捉异常
    DECLARE @JSON NVARCHAR(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);
        DECLARE @end INT = CHARINDEX('/>', @Row, @FieldStart);
        IF @end<1
          OR @end>@FieldEnd
        BEGIN
          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 + '",';
        END;
        SET @FieldStart = @FieldStart + LEN(@StartField);
        SET @FieldEnd = CHARINDEX(@EndField, @Row, @FieldStart);
        SET @FieldStart = CHARINDEX(@StartField, @Row, @FieldEnd);
      END;
      IF LEN(@JSON)>0
        SET @JSON = SUBSTRING(@JSON, 0, LEN(@JSON));
      SET @JSON = @JSON + '},';
      --// for each row
      SET @RowStart = CHARINDEX(@StartRoot, @XMLString, @RowEnd);
    END;
    IF LEN(@JSON)>0
      SET @JSON = SUBSTRING(@JSON, 0, LEN(@JSON));
    --//SET @JSON = '[' + @JSON + ']';
    SET @json_xml = @JSON;
  END TRY--//结束捕捉异常
  BEGIN CATCH--//有异常被捕获
    SET @json_xml = @XMLString;
  END CATCH;--//结束异常处理
END;

以上所述是小编给大家介绍的SqlServer将查询结果转换为XML和JSON，希望对大家有所帮助，如果大家有任何疑问请给我留言，小编会及时回复大家的。在此也非常感谢大家对网站的支持！

标签：SQL

返回前面的内容