SQL Server正则表达式 替换函数应用详解

--SQL正则替换函数
<div class="codetitle"><a style="CURSOR: pointer" data="86913" class="copybut" id="copybut86913" onclick="doCopy('code86913')"> 代码如下:<div class="codebody" id="code86913">
CREATE function dbo.regexReplace
(
@source ntext,--原字符串
@regexp varchar(1000),--正则表达式
@replace varchar(1000),--替换值
@globalReplace bit = 1,--是否是全局替换
@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

/
配置对扩展存储过程的支持
Microsoft SQL Server 2005　-> 配置工具 -> 外围应用配置器 -> 功能的外围应用配置 -> Ole自动化：支持Ole自动化
使用举例1：
<div class="codetitle"><a style="CURSOR: pointer" data="78627" class="copybut" id="copybut78627" onclick="doCopy('code78627')"> 代码如下:<div class="codebody" id="code78627">
declare @source nvarchar(4000)
set @source = 'dsafsdf'
select dbo.regexReplace(@source,'&;[^>]+>','',1,1)

使用举例2： (将数据库字段中含有aaa替换为aaa)
Select id,dbo.regexReplace(字段,'<font([^>])>','',0) AS 别名 From 表
*/