向QTP脚本中添加步骤

本文就以QTP自带的Flight程序为例，向QTP已录制好的程序中添加help步骤，进行详解……

---

一.新增help步骤：

录制后的源代码如下：

Dialog("Login").WinEdit("Agent Name:").Set "mercury"
Dialog("Login").WinEdit("Password:").SetSecure "4ec0c8aa00fdb8eccca35e25f26ac67f312c54e9"
Dialog("Login").WinButton("OK").Click
Window("Flight Reservation").Close

切换到Keyword View视图，选择Agent Name步骤，右击选择——Insert Step——Setp Generator，点击，打开下图：

点击help按钮后，弹出如下对话框，点击OK，添加help步骤成功。

此时代码如下：

Dialog("Login").WinButton("Help").Click   '新增加的步骤
Dialog("Login").WinEdit("Agent Name:").Set "mercury"
Dialog("Login").WinEdit("Password:").SetSecure "4ec0c8aa00fdb8eccca35e25f26ac67f312c54e9"
Dialog("Login").WinButton("OK").Click
Window("Flight Reservation").Close

---

二.新增action步骤：

1）选择Action1，Insert——call to New Action，点击如下图：

2）给新增Action命名，然后点击OK。

3）将Action_help步骤拖动到Action1上方

4）增强脚本

　　　a）将Flight Resrvations对话框添加到对象库（你懂得，不做太多说明，嘿嘿……）

　　　b）打开对象库，选择Object——Add Objects to Location……，点击“确定”。如图：

　　　　c）

　　　　　　Dialog("Login").WinButton("Help").Click   

　　　　　　If Dialog("Login").Dialog("Flight Reservations").Exist Then
 　　　　　　Dialog("Login").Dialog("Flight Reservations").WinButton("确定").Click
　　　　　　End If

　　　　　　Dialog("Login").WinEdit("Agent Name:").Set "mercury"
　　　　　　Dialog("Login").WinEdit("Password:").SetSecure "4ec0c8aa00fdb8eccca35e25f26ac67f312c54e9"
　　　　　　Dialog("Login").WinButton("OK").Click
　　　　　　Window("Flight Reservation").Close

　　　　d）将以下代码剪切到Action_help中，

　　　　　　Dialog("Login").WinButton("Help").Click   

　　　　　　If Dialog("Login").Dialog("Flight Reservations").Exist Then
 　　　　　　Dialog("Login").Dialog("Flight Reservations").WinButton("确定").Click
　　　　　　End If

　　　　e)打开对象库，选择File——Export and Replace Local Object…，导出对象库，进行保存。

　

　　　　f）选择Resources——Associate Repositories，打开对话框如下，点击OK。（这步叫关联）

 

　　　　g）以上步骤完成，就可以成功回放脚本了。

 

注意：关联之前一定要把对象库导出，不然在f步骤就没有可选项添加了。

---