页面导航： 首页 → 网络编程 → 正则表达式 → 正文内容 ASP(VBScript)计算一个字符串在另一字符串中出现的次数函数

发布：dxy 发布日期：2008-3-6 21:37:40 字体：[增加 减小] 类型：转载

计算一个字符串在另一字符串中出现的次数函数

Function strnum(patrn, strng)
  Dim regEx, Match, Matches,xx
    xx=0
  Set regEx = New RegExp
  regEx.Pattern = patrn
  regEx.IgnoreCase = True            ' 设置是否区分大小写。
  regEx.Global = True
  Set Matches = regEx.Execute(strng)
  For Each Match in Matches
    xx=xx+1
  Next
  strnum = xx
End Function

文章评论

共有 位脚本之家网友发表了评论我来说两句