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

-- 版权：2011

-- 时间：2011-06-17

-- 用途：切分字符串，将忽略连续分隔符和分隔符之间的空字符

-- 用法：SELECT * FROM [dbo].[WF_Split](‘a,b,c,d‘,‘,‘);

--    返回表结构:

--    id    自增主键

--    rs    分隔符切分的每个段落

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

USE QPTreasureDB

GO

IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N‘[dbo].[WF_Split]‘) AND type in (N‘FN‘, N‘IF‘, N‘TF‘, N‘FS‘, N‘FT‘))

DROP FUNCTION dbo.[WF_Split]

GO

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

CREATE FUNCTION [dbo].[WF_Split]

(

  @strSource NVARCHAR(4000),  --要操作的字符串

  @strSeparator CHAR(1)     --分隔符，单字节

)

RETURNS @tbResult TABLE(id INT IDENTITY(1,1),rs NVARCHAR(1000))

WITH ENCRYPTION AS

BEGIN

DECLARE @dwIndex INT ,@strResult NVARCHAR(1000);

SET @strSource = RTRIM(LTRIM(@strSource)); -- 消空格

SET @dwIndex = CHARINDEX(@strSeparator,@strSource);  -- 取得第一个分隔符的位置

WHILE @dwIndex>0

BEGIN

SET @strResult = LTRIM(RTRIM(LEFT(@strSource,@dwIndex-1)));

IF @strResult IS NULL OR @strResult = ‘‘ OR @strResult = @strSeparator

BEGIN

SET @strSeparator = SUBSTRING(@strSource,@dwIndex+1,LEN(@strSource)-@dwIndex); --将要操作的字符串去除已切分部分

SET @dwIndex = CHARINDEX(@strSeparator,@strSource); --循环量增加

    CONTINUE;

END

INSERT @tbResult VALUES(@strResult);

SET @strSource = SUBSTRING(@strSource,@dwIndex+1,LEN(@strSource)-@dwIndex); --将要操作的字符串去除已切分部分

SET @dwIndex=CHARINDEX(@strSeparator,@strSource); --循环量增加

END

--处理最后一节

IF @strSource IS NOT NULL AND LTRIM(RTRIM(@strSource)) <> ‘‘ AND @strSource <> @strSeparator

BEGIN

INSERT @tbResult VALUES(@strSource)

END

RETURN;

END