--如果存在则删除原有函数 
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('<p><span style="font-size: 14px; line-height: 115%; font-family: 宋体;">（1）您手脚发凉吗？</span><br/></p>','\<[^<>]*\>','',1)

结果：