hp uft 实验练习

'1 login

systemutil.Run"C:\Program Files (x86)\HP\Unified Functional Testing\samples\flight\app\flight4a.exe"

Dialog("Login").WinEdit("Agent Name:").Set "mercury"

'Dialog("Login").WinEdit("Agent Name:").Type micTab

Dialog("Login").WinEdit("Password:").SetSecure "56331ac4547f9ca22f84bf0f618a66f7b5c2fa18"

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

'2new order

Window("Flight Reservation").WinButton("Button").Click

Window("Flight Reservation").ActiveX("MaskEdBox").Type DataTable("date", dtGlobalSheet)

Window("Flight Reservation").WinComboBox("Fly From:").Select DataTable("from", dtGlobalSheet)

Window("Flight Reservation").WinComboBox("Fly To:").Select DataTable("to", dtGlobalSheet)

Window("Flight Reservation").WinButton("FLIGHT").Click

Window("Flight Reservation").Dialog("Flights Table").WinButton("OK").Click

Window("Flight Reservation").WinEdit("Name:").Set DataTable("name", dtGlobalSheet)

Window("Flight Reservation").WinEdit("Tickets:").Set DataTable("Tickets", dtGlobalSheet)

Window("Flight Reservation").WinButton("Insert Order").Click

Window("Flight Reservation").ActiveX("Threed Panel Control").WaitProperty "text", "Insert Done...", 10000

'Window("Flight Reservation").WinEdit("Tickets:").Set DataTable("Tickets", dtGlobalSheet)

Window("Flight Reservation").WinEdit("Order No:").Output CheckPoint("Order No:")

'3 open order

Window("Flight Reservation").WinButton("Button").Click

Window("Flight Reservation").Dialog("Open Order").WinCheckBox("Order No.").Set "ON"

Window("Flight Reservation").Dialog("Open Order").WinEdit("Edit").Set DataTable("Order_No", dtGlobalSheet)

Window("Flight Reservation").Dialog("Open Order").WinButton("OK").Click

Window("Flight Reservation").WinEdit("Name:").Output CheckPoint("Name:_2")

Window("Flight Reservation").WinEdit("Order No:").Output CheckPoint("Order No:_2")

Window("Flight Reservation").WinEdit("Flight No:").Output CheckPoint("Flight No:_3")

Window("Flight Reservation").WinEdit("Total:").Output CheckPoint("Total:_2")

'4fax order

Window("Flight Reservation").Activate

Window("Flight Reservation").Activate

Window("Flight Reservation").WinMenu("Menu").Select "File;Fax Order..."

Window("Flight Reservation").Dialog("Fax Order No. 14").ActiveX("MaskEdBox").Type "1234567890"

a=Window("Flight Reservation").Dialog("Fax Order No. 14").WinEdit("Name:").GetROProperty("text")

b=DataTable("pname", dtGlobalSheet)

If a=b Then

reporter.ReportEvent micPass,"比较1","相同"

else

reporter.ReportEvent micFail,"比较1","不相同"

End If

a1=Window("Flight Reservation").Dialog("Fax Order No. 14").WinEdit("Order:").GetROProperty("text")

b1=DataTable("porderno", dtGlobalSheet)

If a1=b1 Then

reporter.ReportEvent micPass,"比较2","相同"

else

reporter.ReportEvent micFail,"比较2","不相同"

End If

a2=Window("Flight Reservation").Dialog("Fax Order No. 14").WinEdit("Flight:").GetROProperty("text")

b2=DataTable("pFlightNo", dtGlobalSheet)

If a2=b2 Then

reporter.ReportEvent micPass,"比较3","相同"

else

reporter.ReportEvent micFail,"比较3","不相同"

End If

a3=Window("Flight Reservation").Dialog("Fax Order No. 14").WinEdit("Total:").GetROProperty("text")

b31=DataTable("pTotal", dtGlobalSheet)

b3=mid(b31,2)

If a3=b3 Then

reporter.ReportEvent micPass,"比较4","相同"

else

reporter.ReportEvent micFail,"比较4","no相同"

End If

'b.用自定义检查点检查传真订单窗口上的总计价格等于机票价格乘以机票数

x=Window("Flight Reservation").Dialog("Fax Order No. 14").WinEdit("# Tickets:").GetROProperty("text")

y1=Window("Flight Reservation").Dialog("Fax Order No. 14").WinEdit("Total:").GetROProperty("text")

y=mid(y1,2)

z1=Window("Flight Reservation").Dialog("Fax Order No. 14").WinEdit("Ticket Price:").GetROProperty("text")

z=mid(z1,2)

If abs(x*z-y)<0.1 Then

reporter.ReportEvent micPass,"比较5","相同"

else

reporter.ReportEvent micFail,"比较5","no相同"

End If

Window("Flight Reservation").ActiveX("Threed Panel Control").WaitProperty "text", "Insert done...", 10000

Window("Flight Reservation").Dialog("Fax Order No. 14").WinButton("Send").Click

Window("Flight Reservation").Close

word

功能测试第一到十一章综合练习

上机练习

需求：Flight飞机订票系统有Fax Order功能，要求检查Fax Order传真订单 窗口上的信息正确且能发送传真成功。

Fax Order传真订单功能的业务流程测试用例步骤如下：

步骤编号	步骤描述	预期结果
1	登录Flight飞机订票系统
2	输入信息并创建订单	创建订单成功
3	在系统菜单栏的文件菜单下点击”打开订单”按钮，并输入第2步生成的订单号后打开订单	指定的订单被打开
4	在系统菜单栏的文件菜单下点击”传真订单”按钮	传真订单窗口显示
5	检查传真订单窗口上的如下信息与第3步打开订单窗口的信息一致: 名称、订单号、航班、总计	传真订单窗口上的被检查的信息正确。
6	检查传真订单窗口上的总计价格等于机票价格乘以机票数	传真订单窗口上的总价计算正确。
7	输入10位传真号码，并点击“发送”按钮
8	在已打开的订单页面上，检查进度条显示信息为：已成功发送传真...	发送传真订单成功
9	关闭订单窗口，退出程序。

1. 根据以上测试用例步骤按如下要求开发UFT测试脚本:

1) 创建两个测试分别为Logout，FaxOrder_Check；

2) Logout 测试只包括Logout一个可重用的Action操作，且使用共享对象库文件。

3) 在FaxOrder_Check测试新建四个Action操作Login，NewOrder、OpenOrder、FaxOrder，最后调用Logout测试的Logout操作。

4) 将NewOrder操作中的Date/FlyFrom/FlyTo/Name/Tickets设置参数化，并使用全局数据表中的下列3行数据作为输入数据来创建3个订单，每个订单都按业务流程测试用例步骤顺序执行检查。

Date	FlyFrom	FlyTo	Name	Tickets
121314	Denver	London	User1	2
121414	London	Paris	User2	3
121514	Frankfurt	Los Angeles	User3	4

5) 将NewOrder操作中的订单号作为输出参数到数据表，再作为OpenOrder操作的输入。

6) 在OpenOrder操作中添加测试用例第五步的被检查信息作为输出值并保存到全局数据表

7) 在FaxOrder操作中添加下列检查点：

a. 检查传真订单窗口上的如下信息与打开订单的信息一致:

名称、订单号、航班、总计

b. 用自定义检查点检查传真订单窗口上的总计价格等于机票价格乘以机票数

c. 在已打开的订单页面上，检查进度条显示信息为：已成功发送传真...(或者Insert Done…)

8) 运行FaxOrder_Check测试，并将测试结果导出。

2. 交付物：

a. Logout测试脚本及共享对象库文件

b. FaxOrder_Check测试脚本

c. FaxOrder_Check测试的运行报告PDF