在SQL语句中如何用正则取出一个字符串的前几位数字

SQL 取字符串的前几位数字，SQL 关键字 substring

substring 使用方法，参考下列SQL：

declare @T  nvarchar(10)

set @T='12345abcde'

select substring(@T,1,5)

结果如下：12345

如果是SQL 写正则表达式判断，只能通过存储过程或函数来处理

SQL 如下：

CREATE FUNCTION dbo.find_regular_expression

(

@source varchar(5000),   --需要匹配的源字符串

@regexp varchar(1000),  --正则表达式

@ignorecase bit = 0  --是否区分大小写，默认为false

)

RETURNS bit  --返回结果0-false，1-true

AS

BEGIN

--0（成功）或非零数字（失败），是由 OLE 自动化对象返回的 HRESULT 的整数值。

DECLARE @hr integer

--用于保存返回的对象令牌，以便之后对该对象进行 *** 作

DECLARE @objRegExp integer   DECLARE @objMatches integer

--保存结果

DECLARE @results bit

/*

创建 OLE 对象实例,只有 sysadmin 固定服务器角色的成员才能执行 sp_OACreate,

并确定机器中有VBScript.RegExp类库

*/

EXEC @hr = sp_OACreate 'VBScript.RegExp', @objRegExp OUTPUT

IF @hr <>0 BEGIN

SET @results = 0

RETURN @results

END

/*

以下三个分别是设置新建对象的三个属性。下面是'VBScript.RegExp'中常用的属性举例：

Dim regEx,Match,Matches         '建立变量。

Set regEx = New RegExp         '建立一般表达式。

regEx.Pattern= patrn         '设置模式。

regEx.IgnoreCase = True         '设置是否区分大小写。

regEx.Global=True                             '设置全局可用性。

set Matches=regEx.Execute(string)             '重复匹配集合

RegExpTest = regEx.Execute(strng)       '执行搜索。

for each match in matches                     '重复匹配集合

RetStr=RetStr &"Match found at position "

RetStr=RetStr&Match.FirstIndex&".Match Value is '"

RetStr=RetStr&Match.Value&"'."&vbCRLF Next

RegExpTest=RetStr

*/

EXEC @hr = sp_OASetProperty @objRegExp, 'Pattern', @regexp

IF @hr <>0 BEGIN

SET @results = 0

RETURN @results

END

EXEC @hr = sp_OASetProperty @objRegExp, 'Global', false

IF @hr <>0 BEGIN

SET @results = 0

RETURN @results

END

EXEC @hr = sp_OASetProperty @objRegExp, 'IgnoreCase', @ignorecase

IF @hr <>0 BEGIN

SET @results = 0

RETURN @results

END

--调用对象方法

EXEC @hr = sp_OAMethod @objRegExp, 'Test', @results OUTPUT, @source

IF @hr <>0 BEGIN

SET @results = 0

RETURN @results

END

--释放已创建的 OLE 对象

EXEC @hr = sp_OADestroy @objRegExp

IF @hr <>0 BEGIN

SET @results = 0

RETURN @results

END

RETURN @results

END

完全按照DB2语法设计：

drop function TEST

go

create function test(@input varchar(100))

returns int

begin atomic

declare @int int default 0

declare @input_lenght int default 0

set @input_lenght = length(@input)

while @input_lenght <>0 do

if ( substr(@input,length(@input) - @input_lenght +1,1) in ('0','1','2','3','4','5','6','7','8','9') ) then

set @int = @int + 0

elseif ( substr(@input,length(@input) - @input_lenght +1,1) in ('a','b','c','d','e','f','g','h','i','j','k','l','m','n','o','p','q','r','s','t','u','v','w','x','y','z')) then

set @int = @int - 1

end if

set @input_lenght = @input_lenght -1

end while

if ( @int = 0 or @int = -1* length(@input)) then --- 如果累积为0全是数字如果累积正好是-1乘以长度则正好全是字段

return 0

else

return 1

end if

end

go

select test ('123456') from sysibm.dual 结果是 0

select test ('123b456a') from sysibm.dual 结果是 1

select test ('abcdefg') from sysibm.dual 结果是 0

---