51Testing软件测试论坛

标题: SQAFindObject不能正确找到对象。 [打印本页]

作者: wonder80    时间: 2006-4-21 17:25
标题: SQAFindObject不能正确找到对象。
录制了一脚本,在一个页面中点击一按钮,进入下一个页面。
然后修改这个脚本,加入一判断:使用SQAFindObject查找该页面是否有对应按钮,有则点击,没有则结束。
但是,SQAFindObject总是返回1003。这是为什么?
代码如下:红色部分是我添加的判断

Sub Main
    Dim Result As Integer

    'Initially Recorded: 2006-4-6  17:13:25
    'Script Name: test_temp
   
    Window SetContext, "Class=Shell_TrayWnd", ""
    Toolbar Click, "Text=运行应用程序;\;ItemID=1", "Coords=21,23"
    StartBrowser "http://192.168.0.128:9080/kent", "WindowTag=WEBBrowser"
   
    delayfor 1000
    Window SetContext, "WindowTag=WEBBrowser", ""
    InputKeys "liaq{ENTER}"
    Browser SetFrame,"Type=HTMLFrame;HTMLId=mainFrame",""
    Browser NewPage,"HTMLTitle=kent system",""
    ComboBox Click, "Type=ComboBox;Name=ACTOR_ID", ""
    ComboListBox Click, "Type=ComboListBox;Name=ACTOR_ID", "Text=lianqi"
   
    delayfor 1000
   
    Result=SQAFindObject("Type=PushButton;Name=Submit1")
   if(Result=sqaObjectNotFound) then   
      SQALogMessage sqaFail,"does not find the object",""
    else
      PushButton Click, "Type=PushButton;Name=Submit1"
    end if

    InputKeys "%{F4}"

End Sub

请各位帮忙看看!
作者: caowenbin    时间: 2006-4-21 21:18
等待斑竹看看
作者: yangjingxiao    时间: 2006-4-21 22:21
可以在 红色字体上面加一句
Window SetContext,“识别方法”
试试
作者: wind_slam    时间: 2006-4-22 13:40
标题: 从属frame的要加上frame
例如:
正确——
Window SetContext,“”
Result=SQAFindObject(".\;Type=HTMLFrame;HTMLId=mainFrame;\;Type=PushButton;Name=Submit1")
错误——  
Window SetContext,“”
Browser SetFrame,"Type=HTMLFrame;HTMLId=mainFrame",""
Result=SQAFindObject("Type=PushButton;Name=Submit1")

User action则不用
作者: wonder80    时间: 2006-4-24 10:21
谢谢wind。按照你的指导,成功了。开心ing~~~~~。

把修改后的部分贴出来:
     Window SetContext,"WindowTag=WEBBrowser",""
      Result=SQAFindObject(".\;Type=HTMLFrame;HTMLId=mainFrame;\;Type=PushButton;Name=Submit1")
   
     if Result=sqaObjectNotFound then   
        SQALogMessage sqaFail,"does not find the object",""
     else
        Window SetContext,"WindowTag=WEBBrowser",""
        PushButton Click, ".\;Type=HTMLFrame;HTMLId=mainFrame;\;Type=PushButton;Name=Submit1"
     end if




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