--如果存在则删除原有函数 

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中执行

然后测试，如下

1 --2.将姓名倒过来    2 SELECT dbo.RegexReplace('John Smith', '([a-z]+)\s([a-z]+)', '$2,$1',1) 3 /* 4 -------------------------------------- 5 Smith,John 6 */

在自己的项目中测试：查询结果去掉html标签

1 Select dbo.RegexReplace('
（1）您手脚发凉吗？
','\<[^<>]*\>','',1)

结果：