51Testing软件测试论坛

标题: 请高手帮忙解答 [打印本页]

作者: jiaolq_0 时间: 2007-6-7 15:37
标题: 请高手帮忙解答
以QTP自带的windows aplication－flight4A为例
在选择航班的list页面（就是点击Flights按钮弹出的页面），
我要检查系统默认的选项永远是第一项，应该怎么设置呢？？
因为这个第一项的内容总是变化的，所以检查点selection不便写一个固定的值，
如果能检查默认的list number是0就最好了。

高手告诉我该怎么办呢？

作者: rivermen 时间: 2007-6-7 17:05
Window("Flight Reservation").ActiveX("MaskEdBox").Type "111111"
Window("Flight Reservation").WinComboBox("Fly From:").Select "Frankfurt"
Window("Flight Reservation").WinComboBox("Fly To:").Select "Los Angeles"
Window("Flight Reservation").WinButton("FLIGHT").Click

'Window("Flight Reservation").Dialog("Flights Table").WinList("From").Select "20330 FRA 08:12 AM LAX 03:23 PM AA    $112.20"
Window("Flight Reservation").Dialog("Flights Table").WinList("From").GetItem(0)
Dim CountItem
CountItem=Window("Flight Reservation").Dialog("Flights Table").WinList("From").GetItemsCount
reporter.ReportEvent 2,"counting",  CountItem & "项"

For i=0to CountItem-1
      reporter.ReportEvent 2,"Item内容：",Window("Flight Reservation").Dialog("Flights Table").WinList("From").GetItem (i)
Next

Window("Flight Reservation").Dialog("Flights Table").WinButton("OK").Click
Window("Flight Reservation").WinEdit("Name:").Set "aa"
Window("Flight Reservation").WinButton("Insert Order").Click
Window("Flight Reservation").WinMenu("Menu").Select "File;Exit"

希望对你有帮助：
下标从0开始，一共***WinList("From").GetItemsCount-1项

WinList("From").GetItem (0) 取出后
用split函数对字符串进行分割成数组
把数组元素与对应的“Flight No:” 等各项对应比较就可以了

自己动手试试看

[ 本帖最后由 rivermen 于 2007-6-7 17:14 编辑 ]

作者: sidneylover 时间: 2007-6-7 17:20
不用分割，可以直接比较
a = Window("Flight Reservation").Dialog("Flights Table").WinList("From").GetROProperty("selection")
b = Window("Flight Reservation").Dialog("Flights Table").WinList("From").GetItem(0)

a＝b则默认的选择是第一个选项

作者: rivermen 时间: 2007-6-8 09:33
标题: 回复 #3 sidneylover 的帖子
对对
我说的是
分割之后的字段更Flight Reservation界面上
Order Information框内

Flight No,Departure time,Arrival Time,Airline
这几个灰色的字段比较

跟lz要求的没有关系

欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/)