51Testing软件测试论坛

标题: WebTable 中图片按钮 Click 事件无法触发。 [打印本页]

作者: expect88 时间: 2011-5-29 19:14
标题: WebTable 中图片按钮 Click 事件无法触发。
[attach]73264[/attach]

请教：
Browser("Web Tours").Page("Web Tours").Frame("info").WebTable("Departure City :").Image("findFlights").Click
回放时，无法看到下一页面。
是不是按钮事件没有触发？
WebTable 录制时没录制到，我通过手工添加的。
请各位指点如何处理。

作者: lyscser 时间: 2011-5-29 20:52
ChildItem

作者: expect88 时间: 2011-5-29 20:56
一下是我写的通过描述性编程来实现，还是没也看到当点击按钮后页面跳转效果，还是停在当前页面。
期待解答。
有点乱、
Set imageW = Description.Create()
imageW("micclass").value = "Image"

Set table = Description.Create()
table("micclass").value = "WebTable"
Set str = Browser("Web Tours").Page("Web Tours").Frame("info").ChildObjects(table)
MsgBox str.count

Set tempImage = Description.Create()
tempImage("micclass").value = "Image"

For i = 0 to str.count-1
temp = str(i).getROProperty("name")
MsgBox temp

Set tt = str(i).ChildObjects(tempImage)
MsgBox tt.count
For j = 0 to tt.count - 1
user = tt(j).getROProperty("name")
If user = "findFlights" Then
msgbox "sss"
tt(j).Click
End If
MsgBox user
Next

Next

作者: expect88 时间: 2011-5-30 00:13
继续问，上面是自己想复杂了。
用以下方面在别的网页上测过没问题。
但是在LR 自带的订票程序中，用这下面方法还是看不到有点击，也不会跳至下一页面
Set objTable = Browser("Web Tours").Page("Web Tours").Frame("info").WebTable("Departure City :")

For row = 1 to objTable.RowCount
ColumnCount = objTable.ColumnCount(row)
For col = 1 to ColumnCount
Set images = objTable.ChildItem(row,col,"Image",0)
If not images is Nothing Then
MsgBox row & col
images.Click
End If
Next

Next

作者: yukiraai 时间: 2011-5-30 14:55
你内Image("findFlights")明显不是按钮，做个虚拟对象吧~描述性编程貌似解决不了这个问题~~

作者: wendy.wang 时间: 2011-6-7 13:32
学习学习啊

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