QTP的那些事QTP测试AJAX时的等待问题(转陈能技老师博客)

AJAX目前已被广泛应用,在使用QTP测试AJAX应用时经常碰到需要等待AJAX操作完成数据加载的问题。relevantcodes.com的《QTP: Synchronization for AJAX Applications》这篇文章介绍了如何封装一个AjaxUtil对象来统一处理这些问题:

http://relevantcodes.com/qtp-synchronization-for-ajax-applications/

下面是一个使用AjaxUtil对象的例子:

SystemUtil.Run "iexplore.exe", "www.kayak.com"

If Not Browser("title:=Cheap Flights.*").Exist(10) Then ExitTest

AjaxUtil.ObjectSync = 30 ' Check if the added objects exist before we synchronize

AjaxUtil.StatusSync = 10 ' Wait for a max 10 seconds if there is no status change

'Add Objects to collection (Its mandatory that you add objects to the class)

AjaxUtil.AddObject "MyBrowser1", Browser("title:=Cheap Flights.*")

AjaxUtil.AddObject "MyTable", Browser("title:=Kayak.com Search Results")_

.WebTable("innertext:=.*of.*roundtrips shown.*|.*forget all.*", "index:=0")

AjaxUtil.AddObject "MyBrowser2", Browser("title:=Kayak.com Search Results")

Browser("title:=Cheap Flights.*").WebEdit("html id:=destination")_

.Set "Atlanta, GA - Hartsfield-Jackson (ATL)"

' Its mandatory that you set a browser for which you will run the test for changes in elements

AjaxUtil.SetBrowser "MyBrowser1" ' Required Step

' Synchronize for changes in objects:

AjaxUtil.SyncObjects "WebElement"

Browser("title:=Cheap Flights.*").WebButton("html id:=fdimgbutton").Click

'You can modify the ObjectSync and StatusSync times here for the next operations.

'Example: StatusSync is increased

AjaxUtil.StatusSync = 15 ' increase the StatusSync

'Synchronize with the flights table

AjaxUtil.SyncWebTable "MyTable"

'Test Complete - release dictionary

AjaxUtil.DestroyDict


作者:高级测试开发网
博客地址:https://seniortesting.club
本文版权归作者和博客园共有,欢迎转载,但未经作者同意必须保留此段声明,且在文章页面明显位置给出原文连接,否则保留追究法律责任的权利。

原文地址:https://www.cnblogs.com/seniortestingdev/p/2365178.html