MssqlÖÐʵÏÖÓÃÕýÔò±í´ïʽ¸üÐÂ×Ö¶ÎÖµ

create   function   dbo.regexReplace  
  (  
  @source   varchar(5000),         --Ô­×Ö·û´®  
  @regexp   varchar(1000),         --ÕýÔò±í´ïʽ  
  @replace   varchar(1000),       --Ìæ»»Öµ  
  @globalReplace   bit   =   0,       --ÊÇ·ñÊÇÈ«¾ÖÌæ»»  
  @ignoreCase   bit   =   0               --ÊÇ·ñºöÂÔ´óСд  
  )  
  returnS   varchar(1000)   AS  
  begin  
  declare   @hr   integer  
  declare   @objRegExp   integer  
  declare   @result   varchar(5000)  
   
  exec   @hr   =   sp_OACreate   'VBScript.RegExp',   @objRegExp   OUTPUT  
  IF   @hr   <>   0   begin  
  exec   @hr   =   sp_OADestroy   @objRegExp  
  return   null  
  end  
  exec   @hr   =   sp_OASetProperty   @objRegExp,   'Pattern',   @regexp  
  IF   @hr   <>   0   begin  
  exec   @hr   =   sp_OADestroy   @objRegExp  
  return   null  
  end  
  exec   @hr   =   sp_OASetProper