SQLServer 解析JSON字符串

---------------------------------------------------

-----           解析字符串函數                -----

---------------------------------------------------

CREATE FUNCTION [dbo].[fn_split](@p_str VARCHAR(8000), @p_split VARCHAR(10))

RETURNS @tab TABLE(tid VARCHAR(2000))
AS
BEGIN
DECLARE @idx INT
DECLARE @len INT
SELECT @len = LEN(@p_split), @idx = CHARINDEX(@p_split, @p_str, 1)
WHILE(@idx >= 1)
BEGIN
INSERT INTO @tab SELECT LEFT(@p_str, @idx - 1)
SELECT @p_str = RIGHT(@p_str, LEN(@p_str) - @idx - @len + 1), @idx = CHARINDEX(@p_split, @p_str, 1)
END

if(@p_str <> '') INSERT INTO @tab SELECT @p_str
RETURN

END;

 

-------------------------------
--  解析JSON字符串  --
-------------------------------
--p_jsonstr json字符串
--p_key 鍵
--返回p_key對應的值
CREATE FUNCTION [dbo].[fn_parsejson](@p_jsonstr VARCHAR(8000),
                                 @p_key VARCHAR(200)) 
RETURNS VARCHAR(3000)
AS      
BEGIN
DECLARE @rtnVal VARCHAR(3000);
  DECLARE @i INT;
  DECLARE @jsonkey VARCHAR(200);
  DECLARE @jsonvalue VARCHAR(1000);
  DECLARE @json VARCHAR(8000);
  DECLARE @tmprow VARCHAR(2000);
  DECLARE @tmpval VARCHAR(2000);
  
  IF(@p_jsonstr IS NOT NULL)
BEGIN
     SET @json = REPLACE(@p_jsonstr, '{', '');
     SET @json = REPLACE(@json, '}', '');
     SET @json = REPLACE(@json, '"', '');
DECLARE @json_cur CURSOR;  -- 聲明外層游標
SET @json_cur = CURSOR FOR SELECT tid FROM fn_split(@json, ',');
OPEN @json_cur-- 打開游標（外層游標）
FETCH NEXT FROM @json_cur INTO @tmprow-- 提取外層游標行
WHILE(@@FETCH_STATUS = 0)
BEGIN
IF(@tmprow IS NOT NULL)
BEGIN
SET @i = 0;
SET @jsonkey = '';
SET @jsonvalue = '';

DECLARE @str_cur CURSOR;-- 聲明內層游標
SET @str_cur = CURSOR FOR SELECT tid FROM fn_split(@tmprow, ':');--第二次拆分后的游標（內層游標）
OPEN @str_cur  -- 打開游標
FETCH NEXT FROM @str_cur INTO @tmpval-- 提取內層游標行

WHILE(@@FETCH_STATUS = 0)
BEGIN
IF(@i = 0) 
BEGIN
SET @jsonkey = @tmpval
END
IF(@i = 1)
BEGIN
SET @jsonvalue = @tmpval
END


SET @i = @i + 1


FETCH NEXT FROM @str_cur into @tmpval-- 內層游標下移一行
END

CLOSE @str_cur-- 關閉內層游標
DEALLOCATE @str_cur -- 釋放內層游標


IF(@jsonkey = @p_key)
BEGIN
SET @rtnVal = @jsonvalue
END
END


FETCH NEXT FROM @json_cur INTO @tmprow-- 內層游標結束后，外層游標下移一行
END


CLOSE @json_cur-- 關閉外層游標
DEALLOCATE @json_cur-- 釋放外層游標
END
  
  RETURN @rtnVal  
END

 

--------------------------

 

使用實例

SELECT dbo.fn_parsejson('{"Company":"武威吉峰農機有限公司","Position":"總經理","Name":"唐永文","Mobile":"13389358288","UserSex":1,"PayStatues":true,"IdCard":"62230119730517643x","IsDistributionRoom":false,"RoomNum":"","Expense":600.0,"WeixinNickName":"唐永文","OrderID":"201611301006210402269"}','Company')