VBScript与正则表达式

最新推荐文章于 2020-10-18 14:27:45 发布

smmi

最新推荐文章于 2020-10-18 14:27:45 发布

阅读量256

点赞数

CC 4.0 BY-SA版权

分类专栏： QTP

本文链接：https://blog.csdn.net/smmi/article/details/84249041

QTP 专栏收录该内容

11 篇文章

订阅专栏

本文介绍如何在VBScript中使用正则表达式进行文本数据的查找与匹配。通过详细解释RegExp对象的属性和方法，包括Pattern、Global、IgnoreCase等，并提供了一个具体的函数实例，展示了如何执行正则表达式搜索并获取匹配结果。

在自动化测试过程中，经常需要对大量的文本数据进行查找，对字符串进行比较和匹配，从而判断测试结果是否正确。这时候，就需要用到正则表达式。

在VBScript中，使用RegExp对象来支持正则表达式的使用。RegExp提供了3个属性和3个方法，分别是：

属性：Pattern、Global、IgnoreCase

方法：Execute、Test、Replace

Pattern属性用于描述正则表达式的匹配模式；
Global属性用于设置搜索过程中是仅匹配第一个还是全部匹配，True表示全部匹配，False表示仅匹配第一个；
IgnoreCase属性用于设置匹配字符串时是否区分大小写，True表示忽略大小写，False表示要区分大小写；
Execute方法用于对指定的字符串执行正则表达式搜索，返回一个Matches集合，其中包含了在指定的字符串中找到的每一个匹配项；
Test方法用于对指定的字符串执行一个正则表达式搜索，并返回一个布尔值，表示是否找到匹配的模式；
Replace方法用于替换在正则表达式中查找到的文本；

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 & "在 "
		RetStr = RetStr & Match.FirstINdex & " 找到匹配项。匹配项的值为 '"
		RetStr = RetStr & Match.Value & "'。" & vbCRLF
	Next
	RegExpTest = RetStr
End Function

MsgBox RegExpTest("is.", "IS1 is2 iS3 Is4")