[转]Sqlserver 2005使用正则表达式

daniel.wuz

浏览: 101832 次
性别:
来自: 纽约

最近访客更多访客>>

tywl3512

博主相关

博客

微博

相册

留言

关于我

文章分类

社区版块

存档分类

正则表达式 VBScript SQL Server Microsoft SQL

先创建自定义函数
-----------------------------------------------
create   function   dbo.regexReplace
(
@source   varchar(5000),         --原字符串
@regexp   varchar(1000),         --正则表达式
@replace   varchar(1000),       --替换值
@globalReplace   bit   =   0,       --是否是全局替换
@ignoreCase   bit   =   0               --是否忽略大小写
)
returnS   varchar(1000)   AS
begin
declare   @hr   integer
declare   @objRegExp   integer
declare   @result   varchar(5000)

exec   @hr   =   sp_OACreate   'VBScript.RegExp',   @objRegExp   OUTPUT
IF   @hr   <>   0   begin
exec   @hr   =   sp_OADestroy   @objRegExp
return   null
end
exec   @hr   =   sp_OASetProperty   @objRegExp,   'Pattern',   @regexp
IF   @hr   <>   0   begin
exec   @hr   =   sp_OADestroy   @objRegExp
return   null
end
exec   @hr   =   sp_OASetProperty   @objRegExp,   'Global',   @globalReplace
IF   @hr   <>   0   begin
exec   @hr   =   sp_OADestroy   @objRegExp
return   null
end
exec   @hr   =   sp_OASetProperty   @objRegExp,   'IgnoreCase',   @ignoreCase
IF   @hr   <>   0   begin
exec   @hr   =   sp_OADestroy   @objRegExp
return   null
end
exec   @hr   =   sp_OAMethod   @objRegExp,   'Replace',   @result   OUTPUT,   @source,   @replace
IF   @hr   <>   0   begin
exec   @hr   =   sp_OADestroy   @objRegExp
return   null
end
exec   @hr   =   sp_OADestroy   @objRegExp
IF   @hr   <>   0   begin
return   null
end

return   @result
end
GO

-------------------------------------
配置对扩展存储过程的支持
Microsoft SQL Server 2005　-> 配置工具 -> 外围应用配置器 -> 功能的外围应用配置 -> Ole自动化：支持Ole自动化

使用方法：
declare @source nvarchar(4000)
set @source = '<HTML>dsafsdf<HEAD>'
select dbo.regexReplace(@source, '\<[^\>]+\>', '', 1, 1)