在Sql语句中使用正则表达式查找字符（一）

日期： 2009-04-09 作者：SamLin 来源：TechTarget中国 英文

　　这几天有个项目需要从表的某个字段判断是否存在某些规则的字符串，大概如下：

　　有个表叫TaskDeploy(任务部署的)，其中字段Participants以格式 用户名,用户名 具体如下：

  admin,小明,samlin
  小明,samlin,test
  samlin,test,小明
  samlin,admin
  samlin,test
  samlin,test

　　好了，现在我要查找有指派给 ‘samlin’用户的任务记录怎么办？

　　我首先想到的是正则表达式，但Sql提供的功能真是少啊就是一个 like 加几个通配符，显然是满足不了我的要求的。

　　于是从网上搜集了一些资料，整理了一下。

　　下面这个是一个自定义函数，用户可以调用这个函数判断指定的字符串是否符合正则表达式的规则。


Code highlighting produced by Actipro CodeHighlighter (freeware)
http://www.CodeHighlighter.com/
–>CREATE FUNCTION dbo.find_regular_expression
(
  @source varchar(5000),   –需要匹配的源字符串
  @regexp varchar(1000),  –正则表达式
  @ignorecase bit = 0  –是否区分大小写，默认为false
)
RETURNS bit  –返回结果0-false，1-true
AS
BEGIN
–0（成功）或非零数字（失败），是由 OLE 自动化对象返回的 HRESULT 的整数值。
DECLARE @hr integer 
　　
–用于保存返回的对象令牌，以便之后对该对象进行操作
 DECLARE @objRegExp integer   DECLARE @objMatches integer
–保存结果
DECLARE @results bit
  
/*
创建 OLE 对象实例,只有 sysadmin 固定服务器角色的成员才能执行 sp_OACreate,并确定机器中有VBScript.RegExp类库
*/
  EXEC @hr = sp_OACreate ‘VBScript.RegExp’, @objRegExp OUTPUT
  IF @hr <> 0 BEGIN
   SET @results = 0
   RETURN @results
  END
/*
以下三个分别是设置新建对象的三个属性。下面是’VBScript.RegExp’中常用的属性举例：
    Dim regEx,Match,Matches         ‘建立变量。
    Set regEx = New RegExp         ‘建立一般表达式。
    regEx.Pattern= patrn         ‘设置模式。
    regEx.IgnoreCase = True         ‘设置是否区分大小写。
    regEx.Global=True                             ‘设置全局可用性。
    set Matches=regEx.Execute(string)             ‘重复匹配集合
    RegExpTest = regEx.Execute(strng)      ‘执行搜索。
   for each match in matches                    ‘重复匹配集合
   RetStr=RetStr &”Match found at position ”
   RetStr=RetStr&Match.FirstIndex&”.Match Value is ‘”
   RetStr=RetStr&Match.Value&”‘.”&vbCRLF Next
   RegExpTest=RetStr
*/
  EXEC @hr = sp_OASetProperty @objRegExp, ‘Pattern’, @regexp
  IF @hr <> 0 BEGIN
   SET @results = 0
   RETURN @results
  END
  EXEC @hr = sp_OASetProperty @objRegExp, ‘Global’, false
  IF @hr <> 0 BEGIN
   SET @results = 0
   RETURN @results
  END
  EXEC @hr = sp_OASetProperty @objRegExp, ‘IgnoreCase’, @ignorecase
  IF @hr <> 0 BEGIN
   SET @results = 0
   RETURN @results
  END 
–调用对象方法
  EXEC @hr = sp_OAMethod @objRegExp, ‘Test’, @results OUTPUT, @source
  IF @hr <> 0 BEGIN
   SET @results = 0
   RETURN @results
  END
–释放已创建的 OLE 对象
  EXEC @hr = sp_OADestroy @objRegExp
  IF @hr <> 0 BEGIN
   SET @results = 0
   RETURN @results
  END
RETURN @results
END

我们一直都在努力坚持原创.......请不要一声不吭，就悄悄拿走。

我原创，你原创，我们的内容世界才会更加精彩！

【所有原创内容版权均属TechTarget，欢迎大家转发分享。但未经授权，严禁任何媒体（平面媒体、网络媒体、自媒体等）以及微信公众号复制、转载、摘编或以其他方式进行使用。】

微信公众号

TechTarget微信公众号二维码

TechTarget

官方微博

TechTarget中国官方微博二维码

TechTarget中国

电子邮件地址不会被公开。 必填项已用*标注

敬请读者发表评论，本站保留删除与本文无关和不雅评论的权力。

作者

SamLin
SamLin

相关推荐