51Testing软件测试论坛

标题: webtable中两个按钮属于同一列,要点其中一个按钮的问题 [打印本页]

作者: shengyan    时间: 2009-3-6 11:24
标题: webtable中两个按钮属于同一列,要点其中一个按钮的问题
[attach]49791[/attach]
目的:
1.找到相符的webtable中的"贺卡名称"
2.点击找到的贺卡名称后的查看按钮
---------------
第一点已经完成
代码:
'***********************
'定义随机数
'***********************
'function num
   randomize
  num = fix(rnd*70)
'end function
'************************
'定义贺卡类型数组,给取贺卡名用和贺卡类型用
'************************
Dim CardType,CardTable
CardType = array("生日贺卡","节日贺卡","其他贺卡","祝福贺卡")
'***************************
'
'***************************
Dim MyValue
Randomize
MyValue = int((4*rnd)+1)


                        CardName = CardType(MyValue-1)
               
                '*******************************
                '
                '*******************************
                Browser("Browser").Page("***平台系统").Frame("menu").Link("贺卡赠送").Click
                Browser("Browser").Page("***平台系统").Frame("mainFrame").Link("新增").Click
                Browser("Browser").Page("***平台系统").Frame("mainFrame_2").WebEdit("ccpCardDto.card.cardName").Set CardName&num
                Browser("Browser").Page("***平台系统").Frame("mainFrame_2").WebList("ccpCardDto.card.cardType").Select CardName
                Browser("Browser").Page("***平台系统").Frame("mainFrame_2").WebFile("file").Set DataTable("file", dtLocalSheet)
                Browser("Browser").Page("***平台系统").Frame("mainFrame_2").Link("保存").Click
'**********************************
wait 10
        RNum = browser("Browser").Page("***平台系统").Frame("mainFrame_6").WebTable("贺卡名称").RowCount()
        For q =2 to RNum-2      
               
                CardTable_cardname = browser("Browser").Page("***平台系统").Frame("mainFrame_6").WebTable("贺卡名称").GetCellData(q,1)
                                                        If  len(CardTable_cardname) = len(CardName&num) and instr(CardTable_cardname,CardName&num)<>0 Then
                                                                Browser("Browser").Page("***平台系统").Frame("mainFrame_3").Link("查看").Click
                                                                Browser("Browser").Page("***平台系统").Frame("mainFrame_4").Link("返回").Click
                                                        End If
                 Next
-----------------
第2点不知道如何定位到.因为webtable中"查看"和"删除"按钮属于同一列
请教如何找到对应"贺卡名称"后的"查看"按钮
作者: ppent    时间: 2009-3-6 12:12
提供一个思路:
WebElement("贺卡名称").object.nextsibling.nextsibling.firstchild.click
意思是贺卡名称这个单元格的下2个单元格的第一个孩子节点。具体是不是这种关系可以用IE DEV Toolbar看看
作者: lijian422202    时间: 2009-3-6 13:30
不错,不过最好进行下nextsibling.nodetype是否等于1的判断,还有firstchild.nodename是否是a的判断。
作者: shengyan    时间: 2009-3-6 14:20
多谢,IE DEV Toolbar装了.但我们后台屏障了地址栏啥的,用这个工作抓不到页面信息
作者: lijian422202    时间: 2009-3-6 14:30
如果你们系统支持FIREFOX,用FIREBUG也不错,或者直接在页面看源代码




欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/) Powered by Discuz! X3.2