vbs进行正则表达式匹配的方法和需注意的问题

最新推荐文章于 2021-01-17 15:55:06 发布

原创最新推荐文章于 2021-01-17 15:55:06 发布 · 3.9k 阅读

0 ·

CC 4.0 BY-SA版权

VB/VBS/ASP 专栏收录该内容

6 篇文章

订阅专栏

本文介绍了一个VBScript中的正则表达式匹配函数FunctionRegExpTest，并提供了几个示例用以展示如何进行字符串匹配，包括如何排除特定字符及处理多行情况。

Function RegExpTest(patrn, strng)
  Dim regEx, Match, Matches        
  Set regEx = New RegExp         
  regEx.Pattern = patrn         
  regEx.IgnoreCase = True       
  regEx.Global = True           
  Set Matches = regEx.Execute(strng) 
  For Each Match in Matches 
    'RetStr = RetStr & "Match " & I & " found at position "
    'RetStr = RetStr & Match.FirstIndex & ". Match Value is "'
    'RetStr = RetStr & Match.Value & "'." & vbCRLF
    'RetStr=replace(strng,Match.Value,"")
    RetStr=RetStr & Match.FirstIndex & ". Match Value is "+Match.Value+"<br>"
  Next
  RegExpTest = RetStr
End Function


'RegExpTest("is.", "IS1 is2 IS3 is4")
'RegExpTest("/d*/./d+"," ??? 0.0007")

'使用下面的匹配<IMG ....>中所有(含换行)，但剔除符号>

<IMG([^>]*|(.|\n)*)>
'若单独使用
<IMG(.|\n)*> 将忽略>符号，匹配到了字符结束
<IMG[\\s\\S]*?> 将匹配不到