建立正则替换函数,利用了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
--保证正常运行的话,需要将Ole Automation Procedures选项置为1 ?
EXEC sp_configure ‘show advanced options‘, 1 ?
RECONFIGURE WITH OVERRIDE
EXEC sp_configure ‘Ole Automation Procedures‘, 1 ?
RECONFIGURE WITH OVERRIDE
复制以上代码,到SQL中执行
然后测试,如下
--2.将姓名倒过来
SELECT dbo.RegexReplace(‘John Smith‘, ‘([a-z]+)\s([a-z]+)‘, ‘$2,$1‘,1)
/*
--------------------------------------
Smith,John
*/
原文地址:https://www.cnblogs.com/lonelyxmas/p/11294576.html
时间: 2024-10-10 10:16:18