標籤:replace with function out int cti 函數 returns method
use pubdb
go
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(max), --替換後的字串
@IgnoreCase INT = 0 --0區分大小寫 1不區分大小寫
)
RETURNS VARCHAR(max)
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 SERVER 正則替換