--如果存在則刪除原有函數 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
--2.將姓名倒過來 SELECT dbo.RegexReplace('John Smith', '([a-z]+)\s([a-z]+)', '$2,$1',1) /* -------------------------------------- Smith,John */