无法在UFT中的webtable usng description lanugauge中选择第二行

时间:2019-03-05 15:15:45

标签: hp-uft

我写了下面的代码来从Web表中选择一行进行处理。该代码成功选择/打开了第一行,但是,当它试图双击第二行时,它出错并显示错误“未指定的错误”。 Web表有7行,但是,它失败了。有人可以指出失败的原因是什么吗?

Set objDesc = Description.Create
objDesc("micclass").Value = "WebTable"
objDesc("html tag").Value = "Table"
Set objList = Browser("3 - Employee Assign Benefits").Page("3 - Employee Assign Benefits").Frame("APPFRAMEWORK").ChildObjects(objDesc)
oCount = objList.Count
For k =0 To oCount - 1
    colName = objList(k).GetRoproperty("cols")
    If Trim(colName) = 21 Then 'This is the right table
        objList(k).Highlight
        rows= objList(k).GetROProperty("rows")
        For i = 1 To rows
            x = objList(k).ChildItem(i,1,"WebElement",0).GetROProperty("abs_x")
            y = objList(k).ChildItem(i,1,"WebElement",0).GetROProperty("abs_y") 
            Wait(2)
            Set obj = CreateObject("Mercury.DeviceReplay")
            obj.MouseDblClick x,y,LEFT_MOUSE_BUTTON
            Call ClickVerifyElement(Browser("3 - Employee Assign Benefits").Page("3 - Employee Assign Benefits").Frame("APPFRAMEWORK").WebEdit("ben_elig_dte"), "ben_elig_dte", "WebEdit", Parameter("elig_date"))
            Call ClickVerifyElement(Browser("3 - Employee Assign Benefits").Page("3 - Employee Assign Benefits").Frame("APPFRAMEWORK").WebList("emp_state_withd_opt_decode"), "emp_state_withd_opt_decode", "WebList", Parameter("withhold_ind"))
            Browser("3 - Employee Assign Benefits").Page("3 - Employee Assign Benefits").Frame("APPFRAMEWORK").WebButton("Save").Click
        Next
        Exit For
    End If
Next

0 个答案:

没有答案