您的位置：软件测试频道－正文

TC中等待测试对象的问题 - 2008-05-30 来自：lizhe1985  [收藏到我的网摘]

来源：实用性测试（Pragmatistic Testing） - CSDNBlog

在编写自动化测试脚本时，等待测试对象出现，然后针对该测试对象执行相关的操作，是一个常见的脚本设计问题。在TC中，有如下几种方法：


（1）Web页面的等待。
在QTP中，可以使用Browser().page().sync 的方法来等待某个页面完成加载，而在TC中，可使用Page.ToUrl、Page.Wait 或 WaitPage 等方法，例如下面的例子用于等到指定URL地址所指的页面加载完成并出现指定的页面元素：
' Obtain the Page object
' We assume that the browser window belongs to the IExplore process, not Explorer
Set p1 = Sys.Process("iexplore")
Set w1 = p1.Window("IEFrame", "*", 1).Window("Shell DocObject View", "", 1).Window("Internet Explorer_Server", "", 1)
Set Pg = w1.Page("*")

' Opening the page
Pg.ToUrl "my url"

' Waiting for frames
waitFrm = true
While waitFrm
For i = 0 To Pg.document.frames.ChildCount - 1
Set Frame = Pg.document.frames.Child(i)
If Frame.Exists Then
waitFrm = waitFrm And (Frame.readyStateValue <> 4)
End If
Next

If waitFrm Then
BuiltIn.Delay(100)
End If
WEnd
...

（2）等待进程。
等待某个进程出现，可使用WaitProcess方法，例如下面的例子：
Set p = Sys.WaitProcess("winword", 2000)
If p.Exists Then' if the process exists ...
...

（3）等待窗口。
等待窗口创建完毕，可以使用WaitWindow方法，例如下面的例子：
Set p = Sys.Process("Notepad")
' Waits 10 seconds for the window
Set w = p.WaitWindow("*", "Open*", -1, 10000)
If w.Exists Then
w.Activate
Log.Picture w, "Open dialog picture"
Else
Log.Warning "Incorrect window"
End If

（4）等待对象属性。
等待某个对象的属性等于指定的状态值，可使用WaitProperty方法，例如下面的例子：
Set btn = Sys.Process("MyApp").Window("TMainFrm","MyApplication *").Child(2)
If btn.WaitProperty("Enabled", True, 2000) Then
' Button is enabled
Else
' Button is disabled
WEnd

（5）等待某个儿子对象的出现。
等待测试对象下的某个儿子对象的出现可用WaitChild方法，例如下面的例子：
If Obj.WaitChild(ChildObjectName, 0).Exists Then
' Child object exists
Else
' There is no such a child
End If

推荐人评论

在编写自动化测试脚本时，等待测试对象出现，然后针对该测试对象执行相关的操作，是一个常见的脚本设计问题。

用户评论

正在载入评论列表...