web.GetRowWithCellText 的使用

这是其中一段代码
    Dim otTable
    Dim Sname
    Sname = DataTable.Value("姓名","Action1")
    Set otTable =Browser("…………").Page("…………").WebTable("线索列表")
    '*************************************************************************************
    '遍历线索列表，找到学员姓名的那行，行数返回给 iRow
    Dim iRow
    iRow = 0
    iRow = otTable.GetRowWithCellText(Sname)
   '点击查看按钮
    set oImg = otTable.ChildItem(iRow,26,"Image",0)
    oImg.Click
    wait 2 
    Browser("…………").Page("…………").WebButton("线索查看_关闭").Click
    '************************************************************************************
    '选择添加的线索，删除该线索，以便下次测试运行数据的使用
    '************************************************************************************
    '线索查看页面关闭后，勾选线索那行的复选框
    Set ocheck = otTable.ChildItem(iRow,1,"WebElement",0) 
    ocheck.click
    '删除该线索
    Browser("…………").Page("…………").WebButton("线索_删除").Click
    Browser("…………").Page("…………").WebButton("确认_是").Click
    '*************************************************************************************
    '遍历线索列表，查找是否存在本次操作的线索名，若存在，则表示上一步操作的删除操作执行失败
    '刷新线索列表
    Browser("…………").Page("…………").WebButton("查询").Click
    wait 1
    Dim itemp

    itemp = 0
    itemp = otTable.GetRowWithCellText(Sname)
    If itemp > 0 Then
        print "线索：" & Sname & " 删除失败！"
    Else
        print "线索：" & Sname & " 删除成功！"
    End If

代码运行后，进行第二次 otTable.GetRowWithCellText(Sname)却提示webtable(线索列表)无法识别。但有时运行又能成功运行，真不知是什么原因造成的。