建立正则替换函数,利用了OLE对象,以下是函数代码:

 

  1. IF OBJECT_ID(N'dbo.RegexReplace') IS NOT NULL  
  2.     DROP FUNCTION dbo.RegexReplace 
  3. GO 
  4. CREATE FUNCTION dbo.RegexReplace 
  5.     @string VARCHAR(MAX),   --被替换的字符串 
  6.     @pattern VARCHAR(255),  --替换模板 
  7.     @replacestr VARCHAR(255),   --替换后的字符串 
  8.     @IgnoreCase INT = 0 --0区分大小写 1不区分大小写 
  9. RETURNS VARCHAR(8000) 
  10. AS  
  11. BEGIN 
  12.     DECLARE @objRegex INT, @retstr VARCHAR(8000) 
  13.     --创建对象 
  14.     EXEC sp_OACreate 'VBScript.RegExp', @objRegex OUT 
  15.     --设置属性 
  16.     EXEC sp_OASetProperty @objRegex, 'Pattern', @pattern 
  17.     EXEC sp_OASetProperty @objRegex, 'IgnoreCase', @IgnoreCase 
  18.     EXEC sp_OASetProperty @objRegex, 'Global', 1 
  19.     --执行 
  20.     EXEC sp_OAMethod @objRegex, 'Replace', @retstr OUT, @string, @replacestr 
  21.     --释放 
  22.     EXECUTE sp_OADestroy @objRegex 
  23.     RETURN @retstr 
  24. END 
  25. GO 

 

注:为保证本函数的正常使用,还需要将Ole Automation Procedures选项置为1,具体语句为

 

  1. EXEC sp_configure 'show advanced options', 1 
  2. RECONFIGURE 
  3. EXEC sp_configure 'Ole Automation Procedures', 1 
  4. RECONFIGURE 

 

现在,我们就可以像使用其他SQL函数一样,使用本函数了。

  1. --1.替换URL 
  2. SELECT  dbo.RegexReplace('我觉得http://www.csdn.net是个不错的网站'
  3.         '(http/:////|^http/:////)([/w-]+/.+[/w-]+/.+[/w-]+/.+[/w-]+|[/w-]+/.+[/w-]+/.+[/w-]+)(/[/w-./?%&=]*)?'
  4.         '<a href="http://$2$3" mce_href="http://$2$3" target=_blank>$1$2$3</a>',0) 
  5. /*
  6. --------------------------------------
  7. 我觉得<a href="http://www.csdn.net" mce_href="http://www.csdn.net" target=_blank>http://www.csdn.net</a>是个不错的网站
  8. */ 
  9. --2.将姓名倒过来 
  10. SELECT dbo.RegexReplace('John Smith', '([a-z]+)/s([a-z]+)', '$2,$1',1) 
  11. /*
  12. --------------------------------------
  13. Smith,John
  14. */ 

 

 

类似的例子,可以举出很多,这就和SQL水平关系不大,只和对正则表达式的熟悉程度有关了。

posted on 2013-04-26 15:48  代岳强  阅读(5271)  评论(1编辑  收藏  举报