TA的每日心情 | 开心 2015-8-21 14:19 |
---|
签到天数: 5 天 连续签到: 1 天 [LV.2]测试排长
|
在说描述性编程之前,先要掌握两个概念点
1.Windows窗口具有许多的属性,例如窗口的标题、窗口的classname、窗口的状态(可见、不可见)等等。这个通过QTP的spy或者VS的spy++都可以看到。
2.QTP的描述性编程主要是通过GetRoproperty和Setroproperty两个函数来完成,例如:SetROproperty将对象库中的对象动态的赋予属性值,从而使得被测窗口可以识别并操作;而GetROproperty动态的获取窗口的属性值,进而进行check。
很久没有写QTP的脚本了,只能把以前搜狗浏览器的部分代码拿出来供参考。
Public Sub ActionLinkOperation( Byval strClickType )
'+++目的是尽量在以前曾经打开的页面上做click,减少在新开的白页面上操作的几率
Operations "SwitchTab"
setaskHwnd = getCurChildFrameByHwnd()
print "窗口句柄:" & setaskHwnd
'没有拿到窗口句柄就退出
If setaskHwnd = 0 Then
Exit Sub
End If
'判断内核类型
intCoreType = getCoretype( setaskHwnd )
print "内核类型:" & intCoreType
'假死
If Extern.IsHungAppWindow( setaskHwnd ) = 1 Then
Exit Sub
End If
If intCoreType = 0 Then
'IE内核
ActionLinkOperationIE( strClickType )
Else
'WK内核
ActionLinkOperationWK( strClickType )
End If
' writeLog "LinkClick(click or drag drop): " & objlink.getroproperty("text") & vbtab & objlink.getroproperty("url")
End Sub
|
|