建立正则替换函数,利用了OLE对象,以下是函数代码:
IF OBJECT_ID(N'dbo.RegexReplace') IS NOT NULL
DROP FUNCTION dbo.RegexReplace
GO
CREATE FUNCTION dbo.RegexReplace
(
@string VARCHAR(MAX), --被替换的字符串
@pattern VARCHAR(255), --替换模板
@replacestr VARCHAR(255), --替换后的字符串
@IgnoreCase INT = 0 --0区分大小写 1不区分大小写
)
RETURNS VARCHAR(8000)
AS
BEGIN
DECLARE @objRegex INT, @retstr VARCHAR(8000)
--创建对象
EXEC sp_OACreate 'VBScript.RegExp', @objRegex OUT
--设置属性
EXEC sp_OASetProperty @objRegex, 'Pattern', @pattern
EXEC sp_OASetProperty @objRegex, 'IgnoreCase', @IgnoreCase
EXEC sp_OASetProperty @objRegex, 'Global', 1
--执行
EXEC sp_OAMethod @objRegex, 'Replace', @retstr OUT, @string, @replacestr
--释放
EXECUTE sp_OADestroy @objRegex
RETURN @retstr
END
GO
EXEC sp_configure 'show advanced options', 1
RECONFIGURE
EXEC sp_configure 'Ole Automation Procedures', 1
RECONFIGURE
现在,我们就可以像使用其他SQL函数一样,使用本函数了。
--1.替换URL
SELECT dbo.RegexReplace('我觉得http://www.csdn.net是个不错的网站',
'(http/:|^http/:)([/w-]+/.+[/w-]+/.+[/w-]+/.+[/w-]+|[/w-]+/.+[/w-]+/.+[/w-]+)(/[/w-./?%&=]*)?',
'<a href="http://$2$3" mce_href="http://$2$3" target=_blank>$1$2$3</a>',0)
/*
--------------------------------------
我觉得<a href="http://www.csdn.net" mce_href="http://www.csdn.net" target=_blank>http://www.csdn.net</a>是个不错的网站
*/
--2.将姓名倒过来
SELECT dbo.RegexReplace('John Smith', '([a-z]+)/s([a-z]+)', '$2,$1',1)
/*
--------------------------------------
Smith,John
*/