测试场景以检查Redbus.in预订系统上的座位是否可用

时间:2014-02-05 13:38:41

标签: vbscript qtp

网站:www.redbus.in

  1. 输入,收件人,日期并点击搜索巴士
  2. 点击票价下面的查看座位。
  3. 会出现一个新的弹出窗口,用户可以在其中选择自己选择的座位。
  4. 此处已​​预留的座位将被禁用。
  5. 我想在excel或数据表中捕获可预订的座位。
  6. 请从第3步开始指导我。我将编写步骤1,2的代码。

2 个答案:

答案 0 :(得分:0)

基本上,您必须在“弹出窗口”中的“可用座位”对象和“占用座位”对象中检查哪个属性不同。在给定的redbus网站中,“class”属性将它们与未预订座位的值“availableSeat”区分开来。

以下是第3步到第5步的代码:

'seats are of object type link, hence creating description object for collection link child objects

Set oDesc = Description.Create()
oDesc("micclass").Value = "Link"

'Here Seatmap is pop-up window which has collection of seats link

Set seatlinks = Browser("Online Bus Booking: Book").Page("Book Ticket - Search Buses").WebElement("Seatmap").ChildObjects(oDesc)

For i = 0 To seatlinks.count - 1  Step 1 
 DataTable.SetCurrentRow(i+1)

If seatlinks(i).GetROProperty("class") = "availableSeat" Then

    DataTable.Value("AvailableSeats","Global") = seatlinks(i).GetROProperty("innertext") & " -Seat Available"

Else

DataTable.Value("AvailableSeats","Global") = seatlinks(i).GetROProperty("innertext") & " -Seat Occupied"
End If

Next

因此,它将在您的全球数据表中列出带有座位号的“可用”和“已占用”座位。

答案 1 :(得分:-1)

所以你只想要第3步的帮助..我猜没有可以检查对象是启用还是禁用的属性或方法。如果我错了,请纠正我。 您的问题很有意义,因为在任何项目中都可以遇到这种情况。