批处理之家 - Powered by Discuz! Board

标题: [问题求助] vbs正则正则表达式内使用字串 [打印本页]

作者: jyswjjgdwtdtj 时间: 2023-5-2 22:38 标题: vbs正则正则表达式内使用字串

在js里可以用\1\2\3\4……来匹配到之前括号里的内容
比如

/(.)\1(.)\2/
复制代码

能匹配到xxyy 1122 gg11
vbs有没有此功能？

作者: czjt1234 时间: 2023-5-3 06:26

Dim oRegExp, s

s = "domen.tw"

Set oRegExp = New RegExp
oRegExp.Global = True
oRegExp.MultiLine = True
oRegExp.IgnoreCase = False
oRegExp.Pattern = "(d)(o)(m)(e)(n.tw)"
MsgBox oRegExp.Replace(s, "Demon.tw")    'Demon.tw
MsgBox oRegExp.Replace(s, "D$4$3$2$5")   'Demon.tw
复制代码

作者: czjt1234 时间: 2023-5-3 06:30

哦，搞错了，不是一回事

作者: czjt1234 时间: 2023-5-3 06:33

s = "domen.twxxyy"

Set oRegExp = New RegExp
oRegExp.Global = True
oRegExp.MultiLine = True
oRegExp.IgnoreCase = False
oRegExp.Pattern = "(.)\1(.)\2"

For Each oMatch In oRegExp.Execute(s)
    MsgBox oMatch
Next
复制代码

作者: jyswjjgdwtdtj 时间: 2023-5-3 09:56

回复 4# czjt1234

demon打错了

作者: bangyou 时间: 2023-5-16 20:58

本帖最后由 bangyou 于 2023-5-16 21:00 编辑

请问下，vbs里怎么转义啊

作者: bangyou 时间: 2023-5-16 20:59

回复 2# czjt1234

请教下大神，vbs，要匹配的字符中有中括号，要用什么转义啊，如下，
clarityrl":[{"keyu97974646s46a46f4a654e"}],"status
patrn = "clarityrl"".*?),""status"
这样出来的是[{"keyu97974646s46a46f4a654e"}],,,

请问下，怎么出来，{"keyu97974646s46a46f4a654e"}

作者: bangyou 时间: 2023-5-16 22:07

:victory:
百度搜不出来，我在站内爬楼找到了，原来vbs里是用[]转义的
http://www.bathome.net/viewthrea ... =vbs%2B%D5%FD%D4%F2

作者: jyswjjgdwtdtj 时间: 2023-5-17 20:46

回复 7# bangyou

中括号不用转义

作者: jyswjjgdwtdtj 时间: 2023-5-17 20:47

回复 7# bangyou

你直接re.pattern="{.*?}"就ok了

欢迎光临批处理之家 (http://www.bathome.net/)