mssql2k经典的字符串分拆自定义函数

CREATE FUNCTION f_Fenstr(
@s   varchar(8000),   --待分拆的字符串
@split varchar(10)     --数据分隔符
)RETURNS @re TABLE(col varchar(100))
AS
BEGIN
  DECLARE @splitlen int
  SET @splitlen=LEN(@split+'a')-2
  WHILE CHARINDEX(@split,@s)>0
  BEGIN
     INSERT @re VALUES(LEFT(@s,CHARINDEX(@split,@s)-1))
     SET @s=STUFF(@s,1,CHARINDEX(@split,@s)+@splitlen,'')
  END
  INSERT @re VALUES(@s)
  RETURN
END