【软件自动化测试 - VBScript 7】= Using Locate to determine if specific text exists within a string

最新推荐文章于 2024-07-24 17:14:06 发布

原创最新推荐文章于 2024-07-24 17:14:06 发布 · 588 阅读

0 ·

CC 4.0 BY-SA版权

文章标签：

#vbscript #string #测试 #function #search

VbsScript 专栏收录该内容

11 篇文章

订阅专栏

本文介绍了一个使用正则表达式在字符串中查找特定模式的函数。通过两个示例演示了如何利用该函数来判断指定的文本是否存在于给定的字符串中。此方法适用于不区分大小写的搜索。

'Locate Method
' Using Locate to determine if specific text exists within a string.

MsgBox LocateText("http://blog.youkuaiyun.com/xuyubotest", "xuyubotest")
MsgBox LocateText("http://blog.youkuaiyun.com/xuyubotest", "QTP.*.com")

' =============================================================
' function: LocateText
' desc : Uses a regular expression to locate text within a string
' params : strString is the string to perform the search on
' strPattern is the regular expression
' returns : True if the pattern was found, False otherwise
' =============================================================
Function LocateText(strString, strPattern)

Dim objRegEx

' create the regular expression
Set objRegEx = New RegExp

' set the pattern
objRegEx.Pattern = strPattern

' ignore the casing
objRegEx.IgnoreCase = True

' perform the search
LocateText = objRegEx.Test(strString)

' destroy the object
Set objRegEx = Nothing

End Function
' LocateText