创建新方法

Question

我正在使用HP UFT。该工具使用VBScript进行自动测试。 是否可以在函数库中创建新方法。 我的意思是这样的。

Browser("Browser").Page("Page").WebEdit("login").MyMethod()

我该怎么做？

Answer 1

转到设计菜单，然后选择功能定义生成器... 您将获得以下UI

基本上这是RegisterUserFunc的帮手。

通过选择注册到测试对象复选框（以及测试对象的类型），您添加的功能将作为常规测试对象功能使用。

请注意，您可以覆盖现有功能，例如，您可以更改Set以查看值"~today~"是否添加今天的日期。

Answer 2

添加用户定义的函数实际上非常简单：定义函数，决定要添加函数的对象类型，并使用RegisterUserFunc将它们放在一起：

Function BrokenImage(ImageObject)
BrokenImage = True
ImageObject.WaitProperty "visible", True, 1000
ImageLoaded = False
StartTime = Now()
Do
    If ImageObject.Object.naturalHeight > 0 And ImageObject.Object.naturalHeight > 0 Then
        BrokenImage = False
        Exit Do 
    End If
    If DateDiff("s", StartTime, Now()) > 10 Then Exit Do
Loop While ImageLoaded = False
End Function 

RegisterUserFunc "Image", "BrokenImage", "BrokenImage"

一旦定义了函数，就像调用任何其他对象方法一样调用它：

If Browser().Page().Image().ImageBroken() = true Then Print "Broken Image"

您还可以添加其他参数，然后将这些参数传递给新方法。