1. 使用QTP测试Windows对象
Desktop对象的使用:
通过Desktop对象,可以访问Windows的桌面顶层对象。Desktop对象包括CaptureBitmap、ChildObjects、RunAnalog方法。
(1) 使用CaptureBitmap方法来截屏
使用CaptureBitmap方法,可以把屏幕对象的截屏保存为图像文件。例如,下面的代码把屏幕截图保存到指定的文件,并且当存在相同文件时,覆盖原来文件。
(2) 使用ChildObjects方法获取某个对象中包含的对象列表
使用ChildObjects方法可以获取到某个测试对象中包含的所有对象,例如,下面的脚本通过Desktop对象的ChildObjects方法获取当前桌面上所有名为“无标题-记事本”的窗口对象。
(3) 使用RunAnalog方法运行低级录制过程
QTP支持录制鼠标和键盘操作的低级过程,这种录制模式叫“Ana
log Recording”。Desktop对象的RunAnalog方法可以运行录制下来的Analog脚本,例如,下面的脚本运行名为“Track1”的Analog脚本。
SystemUtil对象的使用:
可以利用SystemUtil对象,在测试脚本的运行过程中,控制应用程序和进程,SystemUtil对象包括BlockInput、CloseDescendentProcesses、CloseProcessByHwnd、CloseProcessById、CloseProcessByName、ColseProcessByWndTitle、Run、UnBlockInput方法。
(1) 使用Run方法运行文件或程序
Run方法的使用格式如下:
Run file, [params], [dir], [op], [mode]
下面解释各参数的作用:
(1)“file”参数是必须输入的,是需要被运行的程序,或者是需要被打开的文件。
(2)“params”是可选输入参数,指启动应用程序所需的参数。
(3)“dir”是可选参数,指应用程序或文件的默认工作目录;
(4)“op”是可选参数,指文件打开的模式,包括“open”、“edit”、“explore”、“find”、“print”5种模式。
(5)“mode”参数是可选参数,用于指定程序窗口打开时的状态。
应用:"SystemUtil.Run"
syntax: SystemUtil.Run file,[params],[dir],[op],[mode]
比方打开F盘为食谱的记事本:
SystemUtil.run"notepad","F:\食普.txt"
或者打开网页:
Dim strURL
strURL="www.baidu.com"
SystemUtil.Run "IEXPLORE.EXE",strURL
(2) 在脚本运行过程中屏蔽鼠标和键盘
在脚本运行过程中,屏蔽鼠标和键盘的输入可以使用SystemUtil对象的BlockInput和UnBlockInput方法。BlockInput用于屏蔽输入,UnBlockInput用于解除屏蔽。可以使用BlockInput方法防治测试脚本运行过程中被意外的鼠标和键盘操作干扰。
应用:"SystemUtil.BlockInput" and "SystemUtil.UnblockInput"
syntax: SystemUtil.BlockInput
SystemUtil.UnblockInput
将这两句分别加在脚本的前后,脚本执行过程中将会避免键盘和鼠标的输入与点击干扰。
(3) 关闭进程
SystemUtil对象中包含多个可用于关闭进程的方法,包括CloseDescendentProcess、CloseProcessByHwnd、CloseProcessById、CloseProcessByName、CloseProcessByWndTitle。
(1) CloseDescendentProcess用于关闭所有由QTP打开的进程。
(2)CloseProcessByHwnd用于关闭包含指定句柄的窗口的进程。
(3)CloseProcessById用于关闭指定进程ID(PID)的进程。
(4)CloseProcessByName用于关闭指定名称的进程。
(5)CloseProcessByWndTitle用于关闭拥有指定标题的窗口的进程。
应用:
syntax: SystemUtil.CloseDescendentProcesses
这一句将会关闭由QTP打开的所有进程。
eg.
SystemUtil.BlockInput '锁住键盘和鼠标。
SystemUtil.CloseDescendentProcesses '关闭以前由QTP打开的进程。
SystemUtil.Run "3.txt","","D:\","open" '打开D盘下名为“3.txt”的文件(这个文件存在)。
SystemUtil.Run "iexplore.exe","www.baidu.com","C:\Program Files\Internet Explorer" '用IE打开百度网。
SystemUtil.UnblockInput '解锁。
ClipBoard对象的使用:
ClipBoard对象代表Windows中的剪贴板对象,在QTP中,可以通过ClipBoard对象来访问剪贴板对象,设置剪贴板的数据。
(1) ClipBoard对象介绍
可以在测试脚本运行过程中,使用ClipBoard对象来复制、剪切和粘贴文本对象,ClipBoard对象拥有与VB语言中的ClipBoard对象一样的方法,包括:
q Clear:用于清空ClipBoard中的数据。
q GetData:用于获取ClipBoard中的数据。
q GetFormat:用于获取ClipBoard中的数据格式。
q GetText:用于获取ClipBoard中的文本数据。
q SetData:用于向ClipBoard设置数据。
q SetText:用于向ClipBoard设置文本数据。
(2) ClipBoard对象的使用方法
在测试过程中,可以利用ClipBoard对象作为缓存测试数据的容器使用,例如,下面的测试脚本首先清空ClipBoard中的所有数据,然后,设置ClipBoard中的文本为“TEST”,最后,从ClipBoard中获取缓存的文本。
标准Windows控件的基本属性和方法:
在QTP中,对于各种标准Windows控件,都提供了
一些公共的、通用的基本属性和基本方法,熟练掌握这些基本的属性和方法,有助于更加有效地编写测试脚本。
(1) 使用Exist属性来判断空间是否存在
可以通过访问控件的Exist属性来判断控件是否存在于当前打开的应用程序中。例如,下面的测试脚本用于判断Login窗口是否存在。
(2) 使用CheckProperty检查控件属性
使用CheckProperty方法可以实现与标准检查点相类似的功能,例如,下面的测试脚本使用CheckProperty检查控件的属性是否与指定的值相一致,如果一致,则在测试结果中标识为Pass,否则标识为Fail。
可看到,其实现的功能与CheckPoint实现的功能基本一致。但是,使用方式会比插入CheckPoint更为灵活些。
(3) 使用GetROProperty获取控件属性
GetROProperty用于返回测试对象的当前属性,例如,下面的测试脚本用于获取Login窗口的标题属性。
各类标准Windows控件的测试:
Windows标准控件包括各种基于W
indows API和MFC开发的应用程序中的各种控件,在QTP中,对于这些基本控件都有相应的测试对象来控制,例如,Button对应WinButton、CheckBox对应WinCheckBox等。
1) Dialog对象的测试:Dialog对象是指Windows的对话框控件。对Dialog对象的常用测试是Activate方法,用于定位对话框,使其处于激活状态。Activate方法模拟用户点击对话框的标题栏,定位到对话框,通常,在操作对话框中的控件之间,都需要先使用这个方法,确保当前对话框可用。
2) Static对象的测试:Static对象是指Windows静态文本、图像控件,可以用Check方法插入对图像的检查点,在录制过程中,选择菜单“Insert|Checkpoint|Bitmap Checkpoint”,然后,选择指定的图像的区域,如图12.4所示。
3) WinButton对象的测试:WinButton对象的常用测试操作是Click方法,用于模拟用户单击按钮的事件,例如,下面的代码模拟用户单击“OK”按钮。
4) WinCalendar对象的测试:WinCalendar对象是指日期和时间选择控件,例如,Windows搜索助理界面的指定日期控件就是WinCalendar对象,如图12.5所示。WinCalendar对象常用的测试操作时设置日期,需要使用SetDate方法,如以下代码所示。
SetDate方法的参数是“Date”,可以使用两种方式传入:
(1)日期字符串型:格式为d-MMM-yyyy,其中d表示日,MMM表示英文月份缩写,yyyy是年份。
(2)使用VBScript的日期函数,例如Date,Now,IsDate,CDate等。下面的脚本把
日期控件的日期设置为当天。
(3)除了设置日期外,还可以使用WinCalendar对象的SetTime方法来设置事件。
5) WinCheckBox对象的测试:WinCheckBox对象的常用测试操作是Set方法,用于模拟用户把某个选择项选上。例如,下面的脚本用于把Customer Name选择框勾选上。Set方法的参数可以输入“ON”,“OFF”,或者是“DIMMED”3种状态的值。
6) WinComboBox对象的测试:WinComboBox对象的常用测试操作时Select方法,用于模拟用户从下拉框中选择某项内容,例如,下面的脚本从“Fly From”下拉框中选择起飞地点,从“Fly To”下拉框中选择终点。另外,WinComboBox对象还提供一些方法来方便地获取到下拉框的内容,例如,下面的脚本获取下拉
框中的所有项总数。而下面的脚本将获取Index为1的下拉框想对应的内容。
7) Window对象的测试:Window对象是指窗体控件,Window对象的常用测试操作是Activate、Maximize、Restore方法,例如,下面的脚本首先定位到记事本的窗口,然后,最大化记事本的窗口,最后,回复记事本窗口大小。另外一个常用的测试操作时通过GetROProperty方法获取窗口的标题,判断标题是否为指定的名称,例如,下面的脚本用于获取记事本窗口的标题。
8) WinEdit对象的测试:WinEdit对象是常见的输入框,其中常用的测试操作是Set方法,可用于模拟用户往输入框中输入字符,例如,下面的脚本在Name输入框中输入文本“CNJ”。另外,如果需要输入加密的文字,则可使用SetSecure方法,例如,下面的脚本在“Password”输入框中输入加密后的密码字符串。
9) WinEditor对象的测试:WinEditor对象与WinEdit对象的使用方法比较类似,同样可以通过Set方法和SetSecure方法来模拟用户输入未加密或加密的内容。也可以使用Type方法来模拟用户往输入框中输入文本,例如,下面的脚本往记事本中输入一段文字,然后,按下Enter键。
10) WinList对象的测试:WinList对象是指列表控件,例如,在Flight程序中,选择航班的界面中航班列表就是一个WinList控件,如图12.6所示。其常用的测试操作是Select方法,用于模拟用户选择列表中的一项内容,例如,下面的脚本选择列表中的指定名称的内容。另外,也可以通过指定Index来选择内容,例如,下面的脚本指定选择Index为2的某项内容。
11) WinListView对象的测试:WinListView对象是指列表视图控件,例如,Windows资源管理器右边窗口就是一个WinListView控件。其常用的测试操作时Select方法,用于模拟用户选
择列表视图中的一项内容,例如,下面的脚本通过名称指定选择SysListView32中的某项内容。也可以通过指定Index来选择,例如,下面的脚本通过指定Index为2,选择SysListView32中的第3项的内容。另外,WinListView对象还提供了一个ExtendSelect方法,用于模拟用户按下CTRL键进行多选,例如,下面的脚本同时选择两项内容。
12) WinMenu对象的测试:WinMenu对象是指菜单控件,其常用测试操作是Select方法,用于模拟用户选择某个菜单项,例如,下面的脚本通过指定菜单名称来选择记事本的文件新建菜单。也可以通过指定Index来选择菜单,例如,下面的脚本选择记事本的文件打开菜单。可以使用BuildMenuPath方法来构建菜单路径,
例如,下面的脚本先用BuildMenuPath方法来构建菜单选择路径“文件|新建”,然后使用Select方法执行菜单选择动作。BuildMenuPath方法也可以使用Index来指定菜单项,例如,下面的脚本中构建的菜单选择路径是“文件|打开”。
13) WinRadioButton对象的测试:WinRadioButton对象是指单选按钮控件,例如,Flight程序的主界面中的几个机舱等级选择项就是WinRadioButton对象,其常用的测试操作时Set方法,例如,下面的脚本模拟用户单击“Fisrt”单选按钮,选择一等舱的机票。
14) WinScrollBar对象的测试:WinScrollBar对象是指滚动条对象,可以使用其中的Set、NextLine、NextPage、PreLine、PrevPage这几个方法来模拟用户拖动滚动条的动作,例如,下面的脚本模拟用户单击Excel应用程序中的滚动条,让其向下滚动1行。另外,也可以模拟用户拖动滚动条,让其向下滚动1页,例如,下面的代码。还可以使用Set方法来把滚动条设置在某个位置,如下面的脚本所示。可以使用GetROProperty方法先获取ScrollBar的maxscrollpos属性,取得可滚动的最大范围,再根据这个值来决定设置滚动条的位置,这样可避免使用Set方法设置的位置超出范围,例如,下面的脚本把滚动条设置在中间位置。
15) WinSpin对象的测试:WinSpin对象是数值选择控件,例如,
Windows的日期和时间属性窗口中的年份选择控件就是一个WinSpin对象,如图12.7所示。其常用的测试操作时Next、Prev、Set方法。例如,下面的脚本先判断日期控件中的日期是否为2008年,如果是,则使用WinSpin的Next方法将日期调到2009年。如果想把日期调前一年,则使用WinSpin的Set方法,如以下代码所示。
16) WinStatusBar对象的测试:WinStatusBar对象是指状态栏控件,其常用的测试操作时通过GetContent获取状态栏的所有信息,例如,下面的脚本获取记事本的状态栏信息。但是GetContent取得时状态栏中的所有信息,而状态栏可能会分成若干部分,例如Windows资源管理器中的状态栏,如图12.8所示。如何分别取得每一部分的信息呢?方法是使用WinStatusBar的GetItem方法,例如,下面的脚本首先使用GetItemsCount方法获取到状态栏部分的个数,然后使用GetItem方法循环取得每一部分的状态栏信息。
17) WinTab对象的测试:WinTab对象是指页签控件,例如,Windows的日期和时间属性窗口中就有一个包含3个页签的WinTab对象,其常用的测试操作时Select方法,例如,下面的脚本模拟用户选择日期和时间属性窗口中的3个页签。另外,Select方法的输入参数也可以是Index,Index从0开始,下面的脚本与
上面的脚本的效果是一样的。WinTab对象还提供了一个叫“GetSelection”的方法,用于确定当前所选的页签是哪个,例如,下面的脚本首先使用指定Index的方式来选择第二个页签,然后通过GetSelection方法获取当前所选的页签名称。
18) WinToolbar对象的测试:WinToolbar对象是指工具栏控件,其常用的测试操作时Press方法,用于模拟用户单击工具栏上的某个按钮,例如,下面的脚本用于模拟用户单击Windows资源管理器的工具栏上的“向上”、“后退”和“搜索”按钮。Press的输入参数也可以是Index,Index从1开始,例如,下面的脚本实现了与上面脚本一致的功能。
19) WinTreeView对象的测试:WinTreeView对象是指属性选择控件,例如,Windows资源管理器中左边的窗口就包含一个WinTreeView控件,如图12.10所示。其常用的的测试操作包括Select、Expand、ExpandAll、Collapse等方法。例如,下面的脚本用于在资源管理器中选择某个磁盘。也可以使用ExpandAll方法来展开全部节点,例如,下面的脚本用于展开C盘的所有文件夹目录节点。而收起处于展开状态的节点则可以使用Collapse方法,例如,下面的脚本用于收起处于展开状态的C盘节点。
20) WinObject对象的测试:WinObject对象用于测试那些不能被QTP识别并归类成特定控件类型的Windows控件,其拥有与其他各类控件对应的测试对象相同的基本属性和方法,例如Exist属性、Click方法、Type方法、GetROProperty方法、CheckProperty等。
2. 使用QTP测试ActiveX对象
Object属性的使用:
ActiveX控件对象与Windows标准控件一样,可以使用Exist属性来判断控件是否存在,另外,一些公共的也跟Windows标准控件类似,例如Click、Type、CheckProperty、GetROProperty等。
除此之外,使用QTP的ActiveX测试对象来测试ActiveX标准控件时,还可以利用其提供的Object属性来获取ActiveX控件的内部属性和方法。它能取得与GetROProperty方法一样的效果,并且可取到更多的ActiveX控件的内部属性,如果用GetROProperty方法,可使用下面的脚本获取到ActiveX控件的text属性:
‘使用GetROProperty方法获得MaskEdBox控件的text属性
DateOfFlight=Window(“Flight Reservation”).ActiveX(“MaskEdBox”).GetROProperty(“text”)
Msgbox DataOfFlight
而如果使用Object属性,则可以用下面的脚本实现:
‘使用Object属性来进一步访问和获取MaskEdBox控件的text属性
DateOfFlight=Window(“Flight Resevation”).ActiveX(“MaskEdBox”).Object.FormattedText
Msgbox DateOfFlight
另外,通过Object属性还可以方便地访问到ActiveX控件的其他内部属性,例如下面的脚本获取控件的字体属性:
‘获取控件的字体属性
Font=Window(“Flight Reservation”)ActiveX(MaskEdBox”).Object.Font
Msgbox Font
AcxUtil对象的fireEvent方法的使用:
AcxUtil对象可用于操作ActiveX控件,使用FireEvent方法来执行ActiveX控件中的方法,例如“Click”事件。下面的脚本首先获取某个ActiveX控件的Object对象,然后使用FireEvent方法触发器Click事件,模拟用户单击控件:
Window(“Mini Browser”).Activate
Window(“Mini Browser”).WinObject(“http://www.variad.com/”).Type“//www.google.com”
‘获取某个ActiveX控件的Object对象
Set obj=Window(“Mini Browser”).ActiveX(“varOSButton.OSButton_2”).Object
‘使用FireEvent方法触发Click事件
AcxUtil.FireEvent obj, “Click”
各类ActiveX控件的测试:
1) RadioButton类ActiveX控件的测试:在实际测试过程中,经常会遇到,录制下来的控件操作脚本是位置敏感的,例如下面的脚本:
Window(“Combos”).Activate
Window(“Combos”).ActivateX(“ciaXPSelectionControls20T.XPOp”).Click 21,12
名为“ciaXPSelectionControls20T.XPOp”的控件是一个封装了RadioButton功能的ActiveX控件,在如图13.2所示的界面中,“XPBlue”、“XPSilver”、“XPOlive”都是这种类型的控件。
通过分析其Object属性,可知道其下的Value属性可用于设置单选按钮处于选择或未选择状态,因此,可以使用下面的脚本来达到选择单选按钮的目的:
Window(“Combos”).Activate
‘通过设置Value值为True达到选择单选按钮的目的
Window(“Combos”).ActiveX(“ciaXPSelectionControls20T.XPOp”).Object.Value=True
2) CheckBox类ActiveX控件的测试:在同一界面中,“AutoComplete”、“Right To Left”是CheckBox类的ActiveX控件,实现的功能与标准CheckBox类似。通过编写以下脚本,对控件进行试验:
Window(“Combos”).Activate
MsgBox Window(“Combos”).ActiveX(“ciaXPSelectionControls20T.XPCh”).Object.Value
发现当处于勾选状态时,“Value”返回值为“1”,当处于未勾选状态时,“Value”值返回“-1”,因此,可以利用这种规律来设置控件的勾选状态,如以下代码所示:
Window(“Combos”).Activate
‘如果未勾选上,则设置为勾选状态
If Window(“Combos”).ActiveX(“ciaXPSelectionControls20T.XPCh”).Object.Value=-1 Then
Window(“Combos”).ActiveX(“ciaXPSelectionControls20T.XPCh”).Object.Value=1
End If
3) Calendar类ActiveX控件的测试:在如图13.3所示的界面中,对Calendar类的ActiveX控件进行测试。录制过程中,模拟用户选择某个日期,将得到如下脚本:
Window(“Calendar”).Activate
Window(“Calendar”).ActiveX(“ciaXPStyleCalendar20T.XPCalend”).Click 177,12
Window(“Calendar”).ActiveX(“ciaXPStyleCalendar20T.XPCalend”).Click 147,88
对于这样的脚本,不仅回放可能会失败,而且可读性非常差,因此需要进行“改造”,通过调试,在调试器中,查看控件的Object属性,如图13.4所示。
可以看到,“CalendarYear”代表年份,“CalendarMonth”代表月份,“CurrentDate”代表日期,因此,可以把脚本改写成如下所示:
Window(“Calendar”).Activate
‘设置年份
Window(“Calendar”).ActiveX(“ciaXPStyleCalendar20T.XPCalend”).Object.CalendarYear
=2004
‘设置月份
Window(“Calendar”).ActiveX(“ciaXpStyleCalendar20T.XPCalend”).Object.CalendarMonth
=3
‘设置日期
Window(“Calendar”).ActiveX(“ciaXPStyleCalendar20T.XPCalend”).Object.CurrentDate
=“2004-3-3”
4) Label类ActiveX控件的测试:Label类控件一般用于展示文字,而很多Label类的ActiveX控件则不仅仅能显示文字,而且能让文字的表现样式丰富多彩,如图13.5所示。对于这种类型的控件,测试过程中不仅仅要能取得控件的文字,还需要测试控件是否以适当的方法展示文字。
取得文字的方法有很多,例如,使用GetVisibleText方法:
‘使用GetVisibleText方法获取Label上的文字
Window(“Labels”).ActiveX(“ciaXPLabel20T.XPLabel20T_2”).GetVisibleText
或者使用GetROProperty方法:
‘使用GetROProperty方法获取Label上的文字
Window(“Labels”).ActiveX(“ciaXPLabel20T.XPLabel20T_4”).GetROProperty(“Text”)
还可以使用Object属性来获取:
‘通过访问Object中的Caption属性获取Label上的文字
Window(“Labels”).ActiveX(“ciaXPLabel20T.XPLabel20T_2”).Object.Caption
通过Object属性,还可以获取到Label控件的其他属性,例如,文字显示的朝向:
Caption= Window(“Labels”).ActiveX(“ciaXPLabel20T.XPLabel20T_3”).Object.Caption
‘获取Label控件显示的文字方向
Orientation= Window(“Labels”).ActiveX(“ciaXPLabel20T.XPLabel20T_3”).Object.Orientation
If NOT Orientation=1 Then
Reporter.ReportEvent micFail, “Label Orientation Error”,Caption & “控件的文字朝向:” & Orientation
End If
5) ProgressBar类ActiveX控件的测试:对进度条的测试主要是取得进度条的状态,例如,完成状态。下面的脚本通过获取控件的Value值来判断进度是否处于完成状态:
Window(“Progress”).Activate
‘开始
Window(“Progress”).WinObject(“Start_3).Click
Do
‘获取完成百分比i
Complete=Window(“Progress”).ActiveX(“ciaXPProgressStep20T.ProgressS”).GetROProperty(“Value”)
Reporter.ReportEvent micDone, “完成百分比:”,Complete
If Complete=100 Then Exit Do
Loop
Msgbox “完成!”
6) SliderBar类ActiveX控件的测试:SliderBar类的控件用于提供给用户直观地设置一些数据,Sliderbar可以有横向和纵向两种显示方式,如图13.6所示。
可以使用如下脚本来获取SliderBar的显示方式:
Msgbox
Window(“Sliders”).ActiveX(“ciaXPSlider20T.ciaHSlider20T”).Object.TickMarkOrientation
Msgbox
Window(“Sliders”).ActiveX(“ciaXPSlider20T.ciaVSlider20T”).Object.TickMarkOrientation
如何模拟用户拖动SliderBar到某个指定的位置呢?可以通过设置其Value值来达到这样的效果,例如,下面的代码模拟用户把滑竿拖动到中间位置:
Window(“Sliders”).Activate
‘拖动Slider到指定的某个值
Window(“Sliders”).ActiveX(“ciaXPSlider20T.ciaHSlider20T”).Object.Value=15
如果获取到可拖动范围,则可以通过计算来设置拖动到指定的百分比位置,下面的脚本获取到SliderBar可拖动范围的最大值和最小值:
‘获取最小值
Msgbox Window(“Sliders”).ActiveX(“ciaXPSlider20T.ciaHSlider20T”).Object.ExtentMin
‘获取最大值
Msgbox Window(“Sliders”).ActiveX(“ciaXPSlider20T.ciaHSlider20T”).Object.ExtentMax
7) LED类ActiveX控件的测试:LED类的控件一般用于以LED的形式显示数值,如图13.7所示。
这类控件的测试关键是获取背后的值,下面的脚本通过访问Object属性中的Value来获取LED控件中的值:
‘获取LED中的值
Msgbox
Window(“XPLED20”).ActiveX(“ciaLedDisplay20T.LEDDisplay20T”).Object.Value
另外,还可以进一步获取到数值的位数、小数的位数等信息:
‘获取总位数
Msgbox
Window(“XPLED20”).ActiveX(“ciaLEDDisplay20T.LEDDisplay20T”).Object.Digits
‘获取小数位数
Msgbox
Window(“XPLED20”).ActiveX(“ciaLEDDisplay20T.LEDDisplay20T”).Object.Decimals
8) ListBox类ActiveX控件的测试:ListBox是常用的列表控件,用于展示列表数据,ActiveX类型的ListBox控件通常会给ListBox加上更多的展示效果,如图13.8所示。
但是,这样可能给自动化测试脚本的开发带来一些问题,例如,录制下来的脚本需
进一步地改造,例如,下面是一段录制的脚本:
Window(“ListBox”).Activate
Window(“ListBox”).ActiveX(“ciaXPListControl20T.ciaXPList2”).WinObject(“ThunderRT6
PictureBoxDC”).Click 101,150
可看到,提示位置敏感的,而且根本不知道选择是哪行数据。因此,需要进行改造一下:
‘获取列表的所有行数
ListCount=Window(“ListBox”).ActiveX(“ciaXPListControl20T.ciaXPList2”).
Object.ListCount
For I=0 To ListCount-1
‘获取列表行的内容
Text=Window(“ListBox”).ActiveX(“ciaXPListControl20T.ciaXPList2”).Object.ItmeText(I)
Reporter.ReportEvent micDone, “ItemText”,Text
If Text=“MySelection” Then
Window(“ListBox”).ActiveX(“ciaXPListControl20T.ciaXPList2”).Object.ItemSelected
(I)=true
End If
Next
3. 使用QTP测试VB对象
对各类VB控件的测试:
1) VbButton对象的测试:对VbButton控件的最常用测试操作是Click方法,用于模拟用户单击按钮,例如下面的脚本。在单击按钮之前,可以先通过Object属性的Enabled的值来判断按钮是否处于激活状态,如以下脚本所示。除了Enabled属性外,还可以获取按钮的其他属性,例如字体。
2) VbCheckBox对象的测试:VbCheckBox测试对象用于测试复选框控件,其常用的测试操作是Set方法,用于模拟用户设置复选框的状态,例如,下面的脚本用于模拟用户勾选名为“Check1”的复选框。在Set方法中,输入参数为“ON”代表把复选框选择上,输入参数为“OFF”则代表把复选框设置为未勾选。如果想获取复选框的当前选择状态,可以使用Object属性来获取Value的值,如以下脚本所示,其中,如果返回的Value值为0,则代表未勾选上,为1则代表处于勾选状态。
3) VbComboBox对象的测试:ComboBox控件其实是Edit控件与ListBox控件的整合,如图14.2所示。在QTP中,使用VbComboBox对象来访问和操作这类控件,其常用测试操作是Select方法,例如,下面的脚本使用Select方法选择名为“Item3”的一项内容。Select方法还可以使用Index作为参数,Index从0开始,例如,下面的脚本选择Combo1下拉框中的第十项内容。另外,还可以使用VbComboBox对象来获取下拉框控件的很多属性,例如下拉框项的个数。或者使用GetItem方法取得指定项的内容,如以下代码所示。使用GetSelection,则可以获取当前所选的项。选择某项内容后,一般会在Edit框中显示所选内容对应的文本,可以使用Object属性来访问这些文本。
4) VbEdit对象的测试:VbEdit对象用于测试VB的Edit控件,其常用测试操作是Set方法,用于模拟用户输入文本,例如,下面的脚本在名为“Text1”的输入框中输入文本“TestEdit”。如果想获取文本框中输入的内容,则可使用GetROProperty方法获取“text”属性,如以下脚本所示。或者通过访问Object属性中的Text获取文本内容。
5) VbEditor对象的测试:在VB的Edit控件属性中,把MultiLine设置为True,则需要使用VbEditor对其进行测试。模拟用户输入文本需要使用Type方法,而不是Set方法。如果希望获取用户输入的所有文本内容,可以访问Object属性的Text属性,如以下代码所示。
6) VbFrame对象的测试:VbFrame对象用于测试Frame控件,Frame控件用于包含和组织其他控件。一般不作为测试对象进行测试,除非是获取其显示的文本作为测试逻辑控制的依据。例如,下面的代码通过GetROProperty方法获取text属性。也可以使用Object属性中的Caption来获取文本属性,如下面的代码所示。
7) VbLabel对象的测试:Label控件用于显示简单的文本内容,在QTP中,使用VbLabel对象来对其进行测试,一般使用GetROProperty方法来获取label的文本内容,如以下脚本所示。也可以通过Object访问Caption属性来获取Label的文本内容,如以下脚本所示。
8) VbList对象的测试:VbList对象用于测试列表控件,其常用的测试操作为Select方法,例如,下面的脚本用于选择名为“Item3”的一项内容。也可以使用Index作为Select方法的参数,Index从0开始计算,例如,下面的脚本中,输入参数为9,表示选择第10项的内容。另外,也可以模拟用户进行多选操作,例如,下面的脚本模拟用户选择“Item1”和“Item3”两项的内容。还可以通过SelectRange方法来模拟用户选择某个范围的数据项,例如,下面的脚本模拟用户选择第6项到第10项的数据。如果想模拟用户把某项已处于选中状态的项作取消选择操作,则可以使用Deselect方法,例如,下面的脚本把“Item7”设置为未选中状态。如果想知道List控件中总共有多少项的内容,可以使用GetItemsCount方法,如以下脚本所示。如果想知道当前选中的所有项的内容,可以使用GetSelection方法。
9) VbRadioButton对象的测试:VbRadioButton对象用于测试单选框控件,其常用的测试操作时Set方法,用于模拟用户选中某个单选框,例如,下面的脚本依次选择3个单选框。如果想知道某个单选框是否处于选中状态,则可以使用Object属性的value属性,例如下面的脚本通过访问Object属性的value来判断单选框当前是否处于选中状态。
10) VbScrollBar对象的测试:VbScrollBar对象用于测试滚动条控件,其常用测试操作是Set方法,用于模拟用户拖动条到某个位置,如下面的脚本所示。也可以模拟用户单击向下或向右的按钮把滚动条往下,或往右拖动一行,如以下脚本所示。往上或往左拖动1行则应该使用PrevLine方法。如果想把滚动条往下,或往右拖动一页的距离,则应该适用NextPage方法,如以下代码所示。相应地,往上,或往左拖动一页,则使用PrevPage方法。
11) VbWindow对象的测试:VbWindow对象用于测试VB应用程序的窗口,其常用的测试操作是获取其Exist属性,从而判断窗口是否存在,例如,下面的代码首先判断窗口是否存在。如果存在,则激活窗口,并且最大化窗口。最小化窗口对象使用Maximize方法,恢复窗口大小则使用Restore方法。如果想关闭窗口对象,则可使用Close方法,如以下脚本所示。另外,可以通过Object属性来访问窗口的标题文本,如下面的脚本所示。当然,也可以使用GetROProperty方法获取窗口标题。
4. 使用QTP测试标准Web对象
使用Object属性访问DOM对象:
QTP支持直接访问DOM(Document Object Model),可以通过DOM来访问HTML标签。在QTP中,访问DOM是通过使用Page测试对象的Object属性来进一步访问的,例如,下面的脚本获取达到Google主页中的各项HTML元素:
On Error Resume Next
Set Doc=Browser(“Google”).Page(“Google”).Object
‘循环获取Page中的所有对象
For Each Element In Doc.all
TagName=Element.TagName ‘获取标签名
InnerText=Element.innerText ‘获取inner text
‘把信息写入测试结果
Reporter.ReportEvent 0,TagName,InnerText
Next
另外,通过Object属性,还可以访问很多Web控件对象的内部属性,例如,下面的脚本启动浏览器并导航到Google网站,然后,通过访问WebEdit控件的Object属性,判断输入框是否处于可用状态,如果是,则通过访问WebEdit控件的Object属性中的focus方法来把焦点移到输入框,然后,输入文字:
‘启动浏览器并导航到Google网站
SystemUtil.Run“iexplore”, “www.google.cn”
‘如果输入框处于可用状态,则把焦点移到输入框并输入文字
If Not Browser(“Google”).Page(“Google”).WebEdit(“q”).Object.isDisabled then
Browser(“Google”).Page(“Google”).WebEdit(“q”).Object.focus
Browser(“Google”).Page(“Google”).WebEdit(“q”).Set“QTP”
End If
使用Browser对象控制浏览器的导航:
Browser对象还封装了对浏览器的导航动作的控制,例如,导航到指定的URL地址,导航到上一页、下一页、主页等,如下面的脚本所示:
‘启动IE浏览器,并导航到Google网站
SystemUtil.Run “iexplore.exe”, “http://www.google.cn”
‘让浏览器窗口最大化
Browser(“Google”).FullScreen
‘执行搜索功能
Browser(“Google”).Page(“Google”).WebEdit(“q”).Set“QTP”
Browser(“Google”).Page(“Google”).WebButton(“Google 搜索”).Click
‘等待页面导航动作完成
Browser(“Google”).Page(“QTP-Google 搜索”).Sync
‘导航返回上一页
Browser(“Google”).Back
‘导航返回主页
Browser(“Google”).Home
‘刷新页面
Browser(“Google”).Refresh
‘关闭浏览器
Browser(“Google”).Close
对各类Web对象的测试:
1) Page对象的测试:Page对象是页面的主体对象,用于包含各种Web控件,通过Page对象,可以访问下一层的对象,例如页面中的链接、图片等。
2) Frame对象的测试:Frame对象用于测试网页中使用的页面框架,Frame页与page页相似,都是一种包含控件的对象,例如,下面的脚本中名为“index”的Frame也包含了链接对象、文本选择框对象等控件。
3) Image对象的测试:Image对象用于测试页面中的图片对象,可通过Object属性访问其中的图片来源地址、图片大小等属性,例如,下面的脚本通过Object属性获取图片的来源地址,并判断图片来源地址是否正确,如果不正确,则报告错误。还可以通过Object属性获取到图片的width、height属性,取得图片的大小信息,如下面的脚本所示。
4) Link对象的测试:对于网页链接的测试,可以使用Link对象,例如,下面的脚本用于对链接的地址进行检查。其中使用了CheckProperty方法,用于对比Link对象的URL属性是否等于指定的地址。也可以使用Link对象的Object属性中的href属性来进行比较,如下面的代码所示。对于链接对象,最常用的测试操作莫过于单击链接了,可以直接使用Link对象的Click方法,如以下脚本所示。也可以使用FireEvent方法,如下面脚本所示。
5) WebButton对象的测试:WebButton对象用于测试Web页面中的按钮控件,例如,在测试126邮箱的登录功能时就需要使用WebButton对象的Click方法来模拟用户单击“登录”按钮,如以下脚本所示。
6) WebCheckBox对象的测试:WebCheckBox用于对页面中的复选框控件进行测试,例如,QTP自带的Sample应用程序“Mercury Tours Web Site”中,在订票操作中,需要输入账号地址和送票地址。其中的“Ticketless”和“Same as Billing Address”都是复选框控件,都可以使用WebCheckBox对象来进行测试,例如,下面的脚本把“Same as Billing Address”勾选上。
7) WebEdit对象的测试:WebEdit对象用于测试输入框控件,可使用其中的Set方法来模拟用户输入文字,例如,下面的脚本用于模拟用户填写订票系统中的各种信息。如果想获取输入框中的内容,则可以使用WebEdit对象的Object属性来访问其中的Value属性,如以下脚本所示。
8) WebFile对象的测试:WebFile对象用于测试网页中的文件选择控件,例如,在测试如图15.11所示的126邮箱中的文件附件添加功能时,就需要使用到WebFile对象。下面的脚本用于模拟用户登录126邮箱,然后新建一个邮件,选择附件的过程。其中,WebFile对象的Set方法用于指定选定的本地文件。
9) WebList对象的测试:WebList对象对于测试Web页面中的下拉选择框控件,常用的测试操作是Select法国法,例如,下面的测试脚本用于从选择框中选择订票数量和起飞地点。如果想获取选择框中所选的内容,则可以使用Object属性访问其中的Value属性,如下面的代码所示。或者可以使用GetROProperty方法,输入参数selection,如以下脚本所示。
10) WebRadioGroup对象的测试:WebRadioGroup对象用于测试单选框对象,例如,图15.12中的“Type”就是一个WebRadioGroup控件对象,包含了两个单选框“Round Way”和“One Way”。WebRadioGroup对象的常用测试操作时Select方法,例如,下面的脚本选择“One Way”所指的单选框。通过访问Object属性,可以取得WebRadioGroup对象的很多内部属性,例如,访问“all items”来获取所有单选框对象,访问“items count”取得单选框的个数,访问“selected item index”来取得当前所选的对象index,而“Value”则代表了当前所选对象的内容。如下面脚本所示。
11) WebTable对象的测试:WebTable对象用于测试Web页面中的表格对象,例如,图15.13中的“DEPART”就是一个表格对象。对表格对象的测试主要是获取其中的数据,例如表格的行数、列数、单元格的内容等,获取表格的行数、列数可以通过访问其中RowCount、ColumnCount属性,获取单元格的内容,则可使用GetCellData方法,输入行号和列号作为参数,如以下脚本所示。WebTable对象中的ChildItem方法用于获取单元格中的测试对象,例如,下面的脚本首先获取WebTable对象,然后,通过ChildItem获取指定单元格中的链接对象,并单击该链接。
12) WebXML对象的测试:网页中往往会包含很多XML数据,QTP提供了WebXML对象用于测试这些网页中的XML文档对象,例如,下面的脚本用于获取XML数据,并存储到某个文件中。另外,也可以直接使用Object属性对象来获取XML文档中的文本内容,例如,下面的脚本通过访问其中的innerText对象来取得XML文档的内容,并显示出来。
13) WebElement对象的测试:WebElement对象用于测试Web页面中的所有基本对象,可以代表所有Web对象,例如页面中的文本、图像、链接、输入框、按钮、选择框、表格等。因此,WebElement对象也拥有与其他测试对象相同的基本属性和方法,例如Object属性、Exist属性、CheckProperty、Click、FireEvent、GetROProperty等方法。