QTP机票示例获取所有地点机票

最新推荐文章于 2018-04-07 12:10:00 发布

原创最新推荐文章于 2018-04-07 12:10:00 发布 · 443 阅读

1 ·

CC 4.0 BY-SA版权

文章标签：

#menu

QTP学习专栏收录该内容

14 篇文章

订阅专栏

本文介绍了一个使用自动化脚本进行航班预订系统的测试流程。通过遍历起点和终点的组合，自动创建订单并记录不同航线的可用航班数量。此过程涉及激活窗口、选择起点和终点、输入航班日期等操作。

Dim IntNumber_FlyFrom , IntNumber_FlyTo Dim Str_FlyFrom , Str_FlyTo Dim IntNumber_Form , Str_From Dim FlyFrom_Count, FlyTo_Count, From_Count IntNumber_FlyFrom = Window("航班预订").WinComboBox("起点:").GetItemsCount IntNumber_FlyTo = Window("航班预订").WinComboBox("终点:").GetItemsCount For i = 0 to IntNumber_FlyFrom-1 For j = 0 to IntNumber_FlyTo-1 Window("航班预订").Activate Window("航班预订").WinMenu("Menu").Select "文件(F);新建订单(N)" Window("航班预订").WinObject("航班日期:").Type "111111" Str_FlyFrom = Window("航班预订").WinComboBox("起点:").GetItem(i) Window("航班预订").WinComboBox("起点:").Select Str_FlyFrom print Str_FlyFrom Str_FlyTo = Window("航班预订").WinComboBox("终点:").GetItem(j) Window("航班预订").WinComboBox("终点:").Select Str_FlyTo print Str_FlyTo Window("航班预订").WinButton("FLIGHT").Click IntNumber_Form = Window("航班预订").Dialog("航班表").WinList("从").GetItemsCount For k = 0 to IntNumber_Form-1 Str_From = Window("航班预订").Dialog("航班表").WinList("从").GetItem(k) Window("航班预订").Dialog("航班表").WinList("从").Select Str_From 'print Str_From Window("航班预订").Dialog("航班表").WinButton("确定").Click Window("航班预订").WinEdit("名称:").Set "tom" Window("航班预订").WinButton("插入订单(I)").Click Window("航班预订").Activate Window("航班预订").WinMenu("Menu").Select "文件(F);新建订单(N)" Window("航班预订").WinObject("航班日期:").Type "111111" Str_FlyFrom = Window("航班预订").WinComboBox("起点:").GetItem(i) Window("航班预订").WinComboBox("起点:").Select Str_FlyFrom Str_FlyTo = Window("航班预订").WinComboBox("终点:").GetItem(j) Window("航班预订").WinComboBox("终点:").Select Str_FlyTo Window("航班预订").WinButton("FLIGHT").Click Next From_Count = IntNumber_From '起始地目的地一致时，航班次数就等于取出的航次 Reporter.ReportEvent micPass,"起始地："&Str_FlyFrom&" 目的地："&Str_FlyTo&" 航班次数：" & From_Count , Str_FlyFrom & Str_FlyTo & From_Count '报告起始地目的地一致时的航班次数 Window("航班预订").Dialog("航班表").WinButton("取消").Click FlyTo_Count = FlyTo_Count + From_Count ' 起始地一样时，航班次数就等于所有目的地的航班次数之和 Next FlyFrom_Count = FlyFrom_Count + FlyTo_Count' 所有的航班信息就是将所有目的地的航班信息加起来 Next Reporter.ReportEvent micPass,"所有的航班次数："&FlyFrom_Count ,FlyFrom_Count '报告所有航班次数