时间:2021-05-22
在 Introduction to Regular Expressions(正则表达式简介) 一章中的 Backreferences(向后引用)一节:
复制代码 代码如下:
'使用上面所示的正则表达式,下面的 JScript 代码可以使用子匹配信息,在一个文字字符串中将连续出现两次的相同单词替换为一个相同的单词:
var ss = "Is is the cost of of gasoline going up up?.\n";
var re = /\b([a-z]+) \1\b/gim; //创建正则表达式样式。
var rv = ss.replace(re,"$1"); //用一个单词替代两个单词。最接近的等价 VBScript 代码如下:
Dim ss, re, rv
ss = "Is is the cost of of gasoline going up up?." & vbNewLine
Set re = New RegExp
re.Pattern = "\b([a-z]+) \1\b"
re.Global = True
re.IgnoreCase = True
re.MultiLine = True
rv = re.Replace(ss,"$1")请注意在 VBScript 代码中,全局、大小写敏感性以及多行标记都是使用 RegExp 对象的适当属性来设置的。
需要注意的是 VBScript 中多行标记和 Perl 兼容的正则表达式中的多行标记并不完全一样:
如果 multiline 为 false,那么 "^" 匹配字符串的开始位置,而 "$" 匹配字符串的结束位置。如果 multline 为 true,那么 "^" 匹配字符串开始位置以及 "\n" 或 "\r" 之后的位置,而 "$" 匹配字符串结束位置以及 "\n" 或 "\r" 之前的位置。
而在 Perl 中,如果设置了多行标记,"^" 匹配字符串开始位置以及 "\n" 之后的位置,而 "$" 匹配字符串结束位置以及 "\n" 之前的位置。也就是 Perl 兼容的正则表达式并不匹配 "\r",这跟 Linux 系统中文本的换行符与 Windows 系统中不一样有关。Linux 系统中文本的换行符为 "\n",而 Windows 系统中为 "\r\n",这就导致了正则表达式的不同。
VBS 正则表达式 MultiLine 属性的这个特性可能会导致某些问题,所以在用 VBS 正则表达式处理文本时我一般会先把 "\r\n" 替换成 "\n":
复制代码 代码如下:
Dim fso, str
Set fso = CreateObject("scripting.filesystemobject")
str = fso.OpenTextFile("demon.txt")
str = Replace(str, vbCrLf, vbLf)
原文: http://demon.tw/programming/vbs-regexp-multiline.html
声明:本页内容来源网络,仅供用户参考;我单位不保证亦不表示资料全面及准确无误,也不保证亦不表示这些资料为最新信息,如因任何原因,本网内容或者用户因倚赖本网内容造成任何损失或损害,我单位将不会负任何法律责任。如涉及版权问题,请提交至online#300.cn邮箱联系删除。
多行正则表达式是对象的只读布尔属性。它指定是否一个特定的正则表达式进行多行匹配,即,不管是否使用“m”属性创建。语法RegExpObject.multiline
一直以来,我都是用NewRegExp来创建正则表达式对象的:Setregex=NewRegExp然而最新才发现VBS的正则表达式对象也可以这样创建:Setreg
JavaScript中的正则表达式解析正则表达式(regularexpression)对象包含一个正则表达式模式(pattern)。它具有用正则表达式模式去匹配
global是正则表达式对象的只读布尔属性。它指定是否一个特定的正则表达式进行全局匹配。否则它使用“g”属性创建。语法RegExpObject.global下面
前言在re的正则表达式模块里,可以通过模块的方式来访问正则表达式,但是如果重复多次地使用正则表达式,最好是使用compile函数把正则表达式编译成对象Regex