51Testing软件测试论坛

标题: QTP关于页面跳转的等待 [打印本页]

作者: 1316016 时间: 2010-2-2 11:00
标题: QTP关于页面跳转的等待
QTP进行页面操作的时候，需要涉及到等待页面切换的情景，我将可以想到的等待方法总结出来，讨论一下利弊

1).根据判断下一页面的某个对象是否存在判断
      If not Browser("XXX").Page("XXX").WebButton("XXX").Exist(HT) Then
msgbox "Turn to *** Page failed!"
      Else
                  msgbox "Turn to *** Page pass!"
End If
2).判断页面是否被同步
      Browser("Mercury Tours").Page("Mercury Tours").Sync
3).在《51测试天地》16期电子杂志看到通过IE 的 COM 接口
      Set oIE = CreateObject("InternetExplorer.Application")
      oIE.Visable = True
      oIE.Navagate "http://baidu.com"
      While oIE.Busy: Wend '等待IE页面加载完毕

这三种方法，我用的最多的是第一种，第二种很少用，第三种没有用过，不知道这三种方法的利弊是什么，并且在什么情况下用哪种比较好？又或者有没有其他的等待页面跳转方法？

作者: xiaoyaoke 时间: 2010-2-2 11:00
浏览器加载、渲染和解析过程的黑箱分析：
http://lifesinger.org/blog/2009/ ... nder-parse-process/

个人感觉：
第一种最容易出问题，是判断某控件出现为标识，但在某些情况下会出现所判断的控件已经渲染展示完毕，但整个页面还处于解析展示过程中，造成下一步操作失败；

第二种方式：在linux下，sync的作用是将缓冲区的数据写到硬盘，应该在浏览器中也有类似作用，就是将缓冲的http的数据解析完成后，个人感觉很靠谱；

第三种方法是判断浏览器的状态，在页面解析过程中浏览器貌似应该是busy状态，解析展示完成后状态改变，所以也应该是可靠的，但从方便程度来说就远远不如方法二了；

作者: wugecat 时间: 2010-2-2 11:09
总之,绝对不要msgbox!你下班执行脚本的时候它弹了,谁来去点?????用Reporter.ReportEvent
我一般用第二种就满足了

作者: zzxxbb112 时间: 2010-2-2 11:11
如果是第一次启动浏览器，偏向于第一种，中途跳转建议使用2

2，3和1不是一类

1判断的是控件，相当于验证点了，如果单纯是为了判断页面缓冲建议使用2

作者: 1316016 时间: 2010-2-2 11:11
哦，没有的，我上面只是举个例子，用msgbox会死的很惨的

作者: wugecat 时间: 2010-2-2 11:13
哦,错了..是第一个..我一般用第一种来判断,做判断存在的检查点

作者: yujie6832 时间: 2010-2-2 12:26
激情大奉献，我封装的函数，结合了第三种，第三种最好的其实是

Public Sub LaunchIEAndLoaded(url)
Dim oIE,hwnd
' 使用IE COM
Set oIE = CreateObject("InternetExplorer.Application")
oIE.Visible = True '设置为可见
oIE.Navigate url '跳转URL
hwnd = Browser("title:=.*").GetROProperty("HWND")
' MsgBox CStr(hwnd)
Window("hwnd:=" & hwnd).Maximize '将浏览器最大化
' 等待IE页面加载完毕
While oIE.Busy: Wend
Wait(1)
' 释放对象
Set oIE = Nothing
End Sub

作者: yujie6832 时间: 2010-2-2 12:33
补充，2的话，我一般单独用的，目的是同步而已~

作者: zzxxbb112 时间: 2010-2-2 12:34

原帖由 yujie6832 于 2010-2-2 12:26 发表
激情大奉献，我封装的函数，结合了第三种，第三种最好的其实是

Public Sub LaunchIEAndLoaded(url)
Dim oIE,hwnd
' 使用IE COM
Set oIE = CreateObject("InternetExplorer.Application")
oIE.Visibl ...

既然已经用了While oIE.Busy: Wend，最后的WAIT就不用加了，中间的MSGBOX也可以去掉了，再加个REPORT日志就更好，呵呵~

作者: yujie6832 时间: 2010-2-2 12:41

原帖由 zzxxbb112 于 2010-2-2 12:34 发表

既然已经用了While oIE.Busy: Wend，最后的WAIT就不用加了，中间的MSGBOX也可以去掉了，再加个REPORT日志就更好，呵呵~

WAIT(1)是为了防止千分之一的突然用的，加一秒更保险和稳定，其实是因为我觉得在最大化窗口的时候也要一定时间，主要是为了这个，MSGBOX是不高兴删了，留着，呵呵。REPORTER这个等实际需要的话再加，谢谢指点

作者: zzxxbb112 时间: 2010-2-2 12:54
不会的，呵呵，如果是考虑最大化时间的话，也可放心，因为最大化脚本是在 While oIE.Busy: Wend之前，况且即使最大化速度很慢，页面已经缓冲完毕，也不会影响后续的执行，所以不会出现千分之一的可能~

作者: zzxxbb112 时间: 2010-2-2 13:00
不过yujie6832版主挺仔细的，呵呵

作者: 1316016 时间: 2010-2-9 17:24

原帖由 zzxxbb112 于 2010-2-2 11:11 发表
如果是第一次启动浏览器，偏向于第一种，中途跳转建议使用2

2，3和1不是一类

1判断的是控件，相当于验证点了，如果单纯是为了判断页面缓冲建议使用2

但是在1中，虽然判断的是控件，但是目的是确保页面的切换,

而且是否可以更准确地说2 和3 在原理上那里不同呢

作者: yujie6832 时间: 2010-2-9 17:33

原帖由 1316016 于 2010-2-9 17:24 发表

但是在1中，虽然判断的是控件，但是目的是确保页面的切换,

而且是否可以更准确地说2 和3 在原理上那里不同呢

第3种还是比较适合初次登录页面

至于第二种，其实用的不多，呵呵，用第一种比较好，因为第一种最万能，既能用在第一次，也能用在以后的跳转
以及提供第4种，WAITPROPERTY

作者: ls_721521 时间: 2010-2-9 17:53
我也一直用第一种

作者: zchtest 时间: 2010-5-7 10:58
标题: 我们许多项目都是用的这种方法
cntr=0
Do until Browser("XXX").Page("XXX").WebButton("XXX").Exist.Exist(1)
' If cntr <60 Then
' wait 1
' cntr=cntr+1
' Else
' Exit Do
' End If
Loop
if cntr=60 then
   msgbox "Turn to *** Page failed!"
  Else
   msgbox "Turn to *** Page pass!
end if

作者: 风雪夜归人 时间: 2010-5-7 11:27
个人觉得14楼的最靠谱,不过基本情况下sync就可以了..有时候sync会导致页面乱跳,不过这种概率小的非常~哈哈

cntr=0
Do until Browser("XXX").Page("XXX").WebButton("XXX").Exist.(1)
   If cntr <120 Then
            wait ,500
            cntr=cntr+1
   Else
            Exit Do
            End If
      Loop
if cntr=60 then
   msgbox "Turn to *** Page failed!"
  Else
   msgbox "Turn to *** Page pass!
end if

就是循环等待,然后判断.

作者: xiaoyaoke 时间: 2010-5-7 11:58

原帖由 风雪夜归人 于 2010-5-7 11:27 发表
个人觉得14楼的最靠谱,不过基本情况下sync就可以了..有时候sync会导致页面乱跳,不过这种概率小的非常~哈哈

cntr=0
Do until Browser("XXX").Page("XXX").WebButton("XXX").Exist.(1)
If cntr

判断单个控件状态是不可靠的：
页面资源的下载顺序是从上到下的，文档流中先出现的资源先下载（注：存在并发，具体请参考 UA Profiler）。当某一样式下载完成时，会立刻渲染到页面（体现了层叠样式表中层叠在渲染时的含义）。当某一脚本下载完成时，也会立刻解析和运行。脚本的运行严格按照文档流中的顺序进行，deferred 的脚本会在正常脚本运行之后运行（Firefox 和 IE 下）。

特别需要留意：脚本运行时，会暂停该脚本之下所有资源的下载（因为脚本可能改变文档流，甚至跳转页面，浏览器的暂停策略是合理的）。要小心内联脚本，经常会阻塞后续下载。

在页面解析展示的过程中，一个get或者post过去，给返回的html，在html中可能有外部引用的css,js或者Img,这时候浏览器一面展示html，一边去下载外面的js,css,和img

极端情况下：我们会发现页面已经展示完毕，但某个图片依然处于downloading...状态，所以假设你所判断的控件就是那个最后downloading...的而且timeout时间到了，岂不悲剧？当然，如果你timeout足够长，10s,20s，那哪种办法都无所谓，因为基本哪个网站10s，20s普通页面还解析展示不完，人家也就不等了

作者: wolaizhinidexin 时间: 2010-5-8 17:28

原帖由 wugecat 于 2010-2-2 11:09 发表
总之,绝对不要msgbox!你下班执行脚本的时候它弹了,谁来去点?????用Reporter.ReportEvent
我一般用第二种就满足了

msgbox 弹出后,可以不用人为去点的..
'指定一个时间,自动关闭弹出框
sub MsgCloseByTime(MsgText,intTime,MsgTitle)
Set WshShell = CreateObject("Wscript.Shell")
WshShell.Popup MsgText, time, MsgTitle
end sub

作者: luxiuxiu1987 时间: 2010-9-21 18:08
第三种方法没试过，赶明试试

欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/)