VBScript正则表达式.docVIP

正则表达式(RegExp)对象 提供简单的正则表达式支持功能。 下面的代码说明了RegExp对象的用法：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 found at position RetStr = RetStr Match.FirstIndex . Match Value is RetStr = RetStr Match.Value . vbCRLF Next RegExpTest = RetStr End Function MsgBox(RegExpTest(is., IS1 is2 IS3 is4))  使用正则表达式 在典型的搜索和替换操作中，必须提供要查找的确切文字。这种技术对于静态文本中的简单搜索和替换任务可能足够了，但是由于它缺乏灵活性，因此在搜索动态文本时就有困难了，甚至是不可能的。 使用正则表达式，就可以： 测试字符串的某个模式。例如，可以对一个输入字符串进行测试，看在该字符串是否存在一个电话号码模式或一个信用卡号码模式。这称为数据有效性验证。 替换文本。可以在文档中使用一个正则表达式来标识特定文字，然后可以全部将其删除，或者替换为别的文字。 根据模式匹配从字符串中提取一个子字符串。可以用来在文本或输入字段中查找特定文字。 例如，如果需要搜索整个 web 站点来删除某些过时的材料并替换某些HTML 格式化标记，则可以使用正则表达式对每个文件进行测试，看在该文件中是否存在所要查找的材料或 HTML 格式化标记。用这个方法，就可以将受影响的文件范围缩小到包含要删除或更改的材料的那些文件。然后可以使用正则表达式来删除过时的材料，最后，可以再次使用正则表达式来查找并替换那些需要替换的标记。 另一个说明正则表达式非常有用的示例是一种其字符串处理能力还不为人所知的语言。VBScript 是 Visual Basic 的一个子集，具有丰富的字符串处理功能。与 C 类似的 Visual Basic Scripting Edition 则没有这一能力。正则表达式给 Visual Basic Scripting Edition 的字符串处理能力带来了明显改善。不过，可能还是在 VBScript 中使用正则表达式的效率更高，它允许在单个表达式中执行多个字符串操作。  一个正则表达式就是由普通字符（例如字符 a 到 z）以及特殊字符（称为元字符）组成的文字模式。该模式描述在查找文字主体时待匹配的一个或多个字符串。正则表达式作为一个模板，将某个字符模式与所搜索的字符串进行匹配。这里有一些可能会遇到的正则表达式示例： Visual Basic Scripting Edition VBScript 匹配 /^\[ \t]*$/ ^\[ \t]*$ 匹配一个空白行。 /\d{2}-\d{5}/ \d{2}-\d{5} 验证一个ID 号码是否由一个2位数字，一个连字符以及一个5位数字组成。 /(.*).*\/\1/ (.*).*\/\1 匹配一个 HTML 标记。 下表是元字符及其在正则表达式上下文中的行为的一个完整列表： 字符 描述 \ 将下一个字符标记为一个特殊字符、或一个原义字符、或一个 后向引用、或一个八进制转义符。例如，n 匹配字符 n。\n 匹配一个换行符。序列 \\ 匹配 \ 而 \( 则匹配 (。 ^ 匹配输入字符串的开始位置。如果设置了 RegExp 对象的 Multiline 属性，^ 也匹配 \n 或 \r 之后的位置。 $ 匹配输入字符串的结束位置。如果设置了RegExp 对象的 Multiline 属性，$ 也匹配 \n 或 \r 之前的位置。 * 匹配前面的子表达式零次或多次。例如，zo* 能匹配 z 以及 zoo。 * 等价于{0,}。 + 匹配前面的子表达式一次或多次。例如，zo+ 能匹配 zo 以及 zoo，但不能匹配 z。+ 等价于 {1,}。 ? 匹配前面的子表达式零次