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

相关文章:

  • 2021-08-29
  • 2021-07-08
  • 2021-09-29
  • 2022-01-27
  • 2021-10-15
  • 2021-09-08
  • 2021-07-17
  • 2021-11-15
猜你喜欢
  • 2021-12-28
  • 2021-10-13
  • 2021-12-26
  • 2021-09-04
  • 2021-11-30
  • 2022-01-15
相关资源
相似解决方案