SQL Server用户自定义函数:Split

SQL Server用户自定义函数:Split - 应用软件 - 电脑教程网

SQL Server用户自定义函数:Split

日期:2006-06-21   荐:
  大家都知道在VBScript里面有一个很方便的函数:split。但是在SQL Server里面却没有这样的函数。今天我因某个应用的需要,顺手写了一个。  说明:  1、这个函数是直接用","作为分隔符的。当然你可以把它改成以别的字符为分隔符,或者让用户自己来输入分隔符(把分隔符作为一个参数)。  2、这个函数里面,假设要拆分的字符串是由一组整型数加上","组成的。当然这是我在这个应用中的情况。你可以根据需要改成其他数据类型,或者把数据类型作为一个参数让用户输入。  随便写写,没有作太多讲究,期待有心人的改进:)/***************************************************** Name: T-SQL Split算法实现(整型)* Author: Xinsoft* Create Date: 2004-12-01* Version: V1.0.00*****************************************************/CREATE Function Func_SplitInt( @InputStr varchar(250))Returns @Func_SplitInt table( val int)asBegin Declare @str varchar(250) Declare @substr varchar(250) Declare @iLen int Declare @iStart int set @str=RTrim(Ltrim(@InputStr)) set @iStart=CHARINDEX( ',' , @str ) set @iLen=Len( @str ) IF @iStart>0 Begin set @substr=substring( @str , 1 , @iStart-1 ) set @str=substring( @str , @iStart 1 , @iLen-@iStart ) End Else Begin set @substr=@str set @str='' End set @substr=RTRIM( LTRIM( @substr ) ) insert @Func_SplitInt select id=cast( @substr as int ) While Len( @str )>0 Begin ---------------- Loop Begin --------------- set @iStart=CHARINDEX( ',' , @str ) set @iLen=Len( @str ) IF @iStart>0 Begin set @substr=substring( @str , 1 , @iStart-1 ) set @str=substring( @str , @iStart 1 , @iLen-@iStart ) End Else Begin set @substr=@str set @str='' End set @substr=RTRIM( LTRIM( @substr ) ) insert @Func_SplitInt select id=cast( @substr as int ) ---------------- Loop End ---------------- EndReturnEnd
标签: