实训测试的调试及QTP内置函数的应用

实训测试的调试及QTP内置函数的应用1.1实训目标具备基本的QTP脚本调试的能力能够熟练使用QTP内置函数完成脚本扩充任务1.2任务描述在本任务中，将完成QTP自动化测试脚本的调试任务，并使用QTP内置函数完成机票预定的任务，包括Print函数显示信息，wait函数暂停脚本执行，ExecuteFile函数执行VBS脚本。1.3覆盖的知识点脚本调试、单步执行、单步退出、单步跳过、Print函数、ExcuteFile函数、wait函数。1.4实训参考步骤1、选择“文件”“新建测试”以打开一个新测试。2、单击专家视图选项卡以显示专家视图。3、正确输入下列各行：publicFunctionmyfunc()msgboxonemsgboxtwomsgboxthreeEndFunctionmyfuncmyfuncmyfunc一、要使用“单步执行”、“单步退出”和“单步跳过”命令运行测试，请执行下列操作：1、按F9键（插入/删除断点）在测试的第七行添加断点（第一次调用myfunc功能）。专家视图断点符号在左边距中显示。2、运行测试。测试在断点暂停。3、按F11键（单步执行）。执行箭头指向函数(msgboxone)的第一行。4、再按F11键（单步执行）。出现一个消息框，其中显示文本“one”。5、单击“确定”关闭该消息框。执行箭头移到该函数的下一行。6、继续按F11键（单步执行），直到执行箭头离开该函数，指向脚本中的第八行（第二次调用myfunc函数）。7、按F11键（单步执行）以便重新输入该函数。执行箭头指向函数的第一个msgbox行。8、按SHIFT+F11（单步退出）。将打开三个消息框。执行箭头继续指向函数的第一行，直到将第三个消息框关闭。关闭第三个消息框之后，执行箭头指向该测试的最后一行。9、按F10键（单步跳过）。再次打开三个消息框。执行箭头仍然指向该测试的最后一行。二、练习调试测试假设在测试中创建了一个操作，该操作定义了将用于测试中其他部分的变量。可以向操作中添加断点，以查看当运行该测试时变量的值如何改变。要查看测试如何处理新值，还可以在设置断点期间更改一个变量的值。步骤1：新建操作打开测试并插入一个名称为“SetVariables”的新操作。在专家视图中，输入操作的VBScript代码，如下所示：Dimaa=hellob=meMsgBoxa步骤2：添加断点在第3行和第4行添加断点。步骤3：开始运行测试运行测试。测试停在第一个断点处，不再执行相应步骤（脚本行）。步骤4：检查调试查看器窗格中变量的值选择“视图”“调试查看器”以打开调试查看器窗格。在调试查看器窗格上选择“监视表达式”选项卡。在“名称”列的第一个单元中，输入“a”（不加引号），然后在键盘上按Enter键。“值”列指示变量当前的值为hello，因为断点在变量a的值启动后停止。在“名称”列的下一个单元中，输入“b”（不加引号），然后在键盘上按Enter键。“值”列指示“变量b未定义”，因为测试在变量a声明前已停止。在调试查看器窗格上选择“变量”选项卡。注意显示的变量a的值为hello，因为在该测试点a是唯一启动的变量。步骤5：在下一个断点处检查变量的值单击“运行”按钮以继续运行该测试。测试在下一个断点暂停。注意在“监视表达式”和“变量”选项卡中，变量a和b的值都已更新。步骤6：使用“命令”选项卡修改变量的值在调试查看器窗格上选择“命令”选项卡。在命令提示符下键入：a=Thisisthenewvalueofa，然后在键盘上按Enter键。单击“运行”按钮以继续运行该测试。出现消息框，其中显示a的新值。三、1、Print函数的使用‘定位到FlightTable窗口的WinList控件setFlightsList=Window(FlightReservation).Dialog(FlightsTable).WinList(From)‘获取Winlist控件中所有项，并通过Print方法显示出来Fori=1toFlightsList.getItemsCountPrintFlightsList.getItem(i-1)Next2、print函数可用于测试脚本的调试，用于检查测试脚本中某些逻辑、数据是否正确。另外一种方法是使用MsgBox，上面的信息要求通过消息框的形式显示出来，代码请自行编写。（提示：回车换行的字符为vbCRLF）注意：Print与MsgBox的区别在于，Print窗口显示的信息是非模式的，而Msgbox是模式的，会暂停脚本执行，直到确认关闭窗口才会继续执行脚本。3、使用Wait函数暂停测试脚本的执行在测试脚本的编写中，有时候需要模拟用户等待操作完成的过程，例如，在测试QTP自带的Flight程序的订票记录插入功能时如果仅仅录制下面测试脚本，然后添加获取自动生成的订票记录号的测试步骤时，会在回放时取到空的订票记录号：Window(FlightReservation).ActiveX(MaskEdBox).Type121212Window(FlightReservation).WinComboBox(FlyFrom:).SelectDenverWindow(FlightReservation).WinComboBox(FlyTo:).SelectFrankfurtWindow(FlightReservation).WinButton(FLIGHT).ClickWindow(FlightReservation).Dialog(FlightsTable).WinButton(OK).ClickWindow(FlightReservation).WinEdit(Name:).Set111Window(FlightReservation).WinEdit(Tickets:).SetSelection0,1Window(FlightReservation).WinEdit(Tickets:).Set3Window(FlightReservation).WinButton(InsertOrder).Clickorder=window(FlightReservation).Winedit(OrderNo:).GetROProperty(text)printorderWindow(FlightReservation).Close注意：因为在单击“InsertOrder”按钮后，需要等待一段时间，让数据插入动作完成，然后才会产生记录号，如果马上执行下一个测试步骤，则会取到空的订票记录号。要求：请使用Wait命令模拟用户等待数据插入到数据库的过程。