如何使REPLACE方法不区分大小写
类别: ASP教程
被替换的文本的实际模式是通过 RegExp 对象的 Pattern 属性设置的。
Replace 方法返回 string1 的副本,其中的 RegExp.Pattern 文本已经被替换为 string2。如果没有找到匹配的文本,将返回原来的 string1 的副本。
下面的例子说明了 Replace 方法的用法。
Function ReplaceTest(patrn, replStr)
Dim regEx, str1 \' 建立变量。
str1 = "The quick brown fox jumped over the lazy dog."
Set regEx = New RegExp \' 建立正则表达式。
regEx.Pattern = patrn \' 设置模式。
regEx.IgnoreCase = True \' 设置是否区分大小写。
ReplaceTest = regEx.Replace(str1, replStr) \' 作替换。
End Function
MsgBox(ReplaceTest("fox", "cat")) \' 将 \'fox\' 替换为 \'cat\'。
;另外,Replace 方法在模式中替换 subexpressions 。 下面对以前示例中函数的调用,替换了原字符串中的所有字对:
MsgBox(ReplaceText("(S+)(s+)(S+)", "$3$2$1")) \' 交换词对.
要求的脚本语言在5.0以上
Replace 方法返回 string1 的副本,其中的 RegExp.Pattern 文本已经被替换为 string2。如果没有找到匹配的文本,将返回原来的 string1 的副本。
下面的例子说明了 Replace 方法的用法。
Function ReplaceTest(patrn, replStr)
Dim regEx, str1 \' 建立变量。
str1 = "The quick brown fox jumped over the lazy dog."
Set regEx = New RegExp \' 建立正则表达式。
regEx.Pattern = patrn \' 设置模式。
regEx.IgnoreCase = True \' 设置是否区分大小写。
ReplaceTest = regEx.Replace(str1, replStr) \' 作替换。
End Function
MsgBox(ReplaceTest("fox", "cat")) \' 将 \'fox\' 替换为 \'cat\'。
;另外,Replace 方法在模式中替换 subexpressions 。 下面对以前示例中函数的调用,替换了原字符串中的所有字对:
MsgBox(ReplaceText("(S+)(s+)(S+)", "$3$2$1")) \' 交换词对.
要求的脚本语言在5.0以上
- 上一篇: 安全脚本程序的编写 V1.0
- 下一篇: 如何从ACCESS数据库中读取图形(续)
-= 资 源 教 程 =-
文 章 搜 索