|
因为比较匆忙,如果有什么不对请大家指出
安装不多讲啦,直接操作
一、 NEW操作
按照NEW表格里的操作把步骤录制下来,点击录制按钮,选择Windows Applications,选择第一个单选项(Record and run test on any open…),点击OK就开始录制了。
虽然只是一个简单的录制过程,但是我在录制的过程中QTP不能识别password文本框对象,不知道是什么原因,找不到这个对象,我是手工添加进去的。我想说的是如果遇到问题,仔细看看是什么原因,自己多思考,动手把问题解决,这样掌握起来更快。
脚本代码和注释如下:
'启动flight程序
SystemUtil.Run "D:\Program Files\Mercury Interactive\QuickTest Professional\samples\flight\app\flight4a.exe","","D:\Program Files\Mercury Interactive\QuickTest Professional\samples\flight\app\","open"
'用户名输入mercury
Dialog("Login").WinEdit("Agent Name:").Set "mercury"
'按tab键
Dialog("Login").WinEdit("Agent Name:").Type micTab
'password输入mercury
Dialog("Login").WinEdit("Password:").Set "mercury"
'按回车
Dialog("Login").WinEdit("Password:").Type micReturn
'菜单file---new
Window("Flight Reservation").WinMenu("Menu").Select "File;New Order"
'输入日期110306
Window("Flight Reservation").ActiveX("MaskEdBox").Type "110306"
'Fly From选择“London”
Window("Flight Reservation").WinComboBox("Fly From:").Select "London"
'Fly To选择“Denver”
Window("Flight Reservation").WinComboBox("Fly To:").Select "Denver"
'点击“Flights...”按钮
Window("Flight Reservation").WinButton("FLIGHT").Click
'显示flights table
Window("Flight Reservation").Dialog("Flights Table").WinList("From").Select "20288 LON 08:12 AM SEA 03:23 PM AA $112.20"
'点击OK
Window("Flight Reservation").Dialog("Flights Table").WinButton("OK").Click
Window("Flight Reservation").Activate
'Name中输入“51Testing”
Window("Flight Reservation").WinEdit("Name:").Set "51testing"
'点击Tickets文本框
Window("Flight Reservation").WinEdit("Tickets:").SetSelection 0,1
'Tickets输入“2”
Window("Flight Reservation").WinEdit("Tickets:").Set "2"
'Class选择“Business”
Window("Flight Reservation").WinRadioButton("Business").Set
'点击“Insert Order”按钮
Window("Flight Reservation").WinButton("Insert Order").Click
Window("Flight Reservation").Activate
'菜单“File”,点击“New Order”
Window("Flight Reservation_2").WinMenu("Menu").Select "File;New Order"
'菜单“File”,点击“Open Order...”
Window("Flight Reservation").WinMenu("Menu").Select "File;Open Order..."
'在Open Order窗口中选择Order No
Window("Flight Reservation").Dialog("Open Order").WinCheckBox("Order No.").Set "ON"
'输入定单号
Window("Flight Reservation").Dialog("Open Order").WinEdit("Edit").Set "15"
'点击“OK”按钮
Window("Flight Reservation").Dialog("Open Order").WinButton("OK").Click
Window("Flight Reservation").Activate
'菜单“File”,点击“Exit”
Window("Flight Reservation").WinMenu("Menu").Select "File;Exit"
二、 NEW+CP
1. 在关键字视图中找到login中的OK按钮,把运行时对象的Flight Reservation窗体调出来,点击录制,再点击菜单的insert->checkpoint->standard checkpoint,这时光标显示一个小手的形状,点击刚才调出的Flight Reservation窗体,这样就插入了第一个CP。
2. 第二个CP和第一个一样
3. 第三个我插的是一个bitmap checkpoint,当然也可以使用standard checkpoint,选多个对象。
三、 DELETE
1. 按照操作步骤重新录制一个脚本
2. 在Flight Reservation弹出的错误对话框上右击鼠标,选择insert standard checkpoint插入一个CP
3. 运行脚本时,注意把定单号改成已存在的定单号
四、 UPDATE和FAX
基本和上面几个操作一样,这里不多说了
五、 OUTPUT VALUE(在脚本1中操作)
1. Output Value 可以输出对象的属性值,在脚本运行期间存储这些值,在之后的脚本运行中可以把这些保存下来的值作为输入值。
2. 实际操作,取出插入的定单号order no,鼠标点到这个对象上,点击菜单的insert->output value->standard output value,出现一个属性框,这里选择你要保存的属性,这个例子中是text这个属性,选中之后点击modify,弹出一个output options对话框,第一个下拉框是选择以什么形式保存属性值,其中datatable是以数据表的形式保存,environment是以环境变量的形式保存,我们选取datatable。Name下拉框是选择数据表的名字,默认。下面的单选项中选择Global sheet以全局表来保存,另一个current action sheet是表示当前运行的表。点击OK结束。
3. 读取保存的属性值,这个例子中在open order的edit框中,点击value项的<#>这个符号,弹出一个设置对话框,选择parameter,下拉框选datatable和刚才保存的datatable的名字,单选项中选择Global sheet,点击确定。
还有点心得在这里和大家分享:
1、遇到困难不要急燥,仔细看错误信息
2、原理如果不是很清楚也不要紧,多动手操作,熟练了自然就明白原理了,这是对我这种比较笨的人而言,如果先理解原理,那就事半功倍了
3、要坚持 |
|