软件测试论坛 › [自动化测试工具及框架] › 请教SQAGetproperty运用

billrub 发表于 2004-10-12 11:20:22

请教SQAGetproperty运用

我如何可以运用SQAGetproperty取得HTML页面上的文本信息？
请哪位大侠以两句具体脚本帮忙指教一下。

司空公子 发表于 2004-10-12 12:30:41

请参考《robot如何取页面输入域的文本内容》、《請問Robot 如何快速使用座標定位》、《如何让combox自动选取它的子项 》这几篇文章。

billrub 发表于 2004-10-12 13:50:33

result=sqagetproperty("type=htmldocument;htmltitle=loginerr.jsp","loginerr.jsp",ck)
    if ck=1 then SQALogMessage sqaWarning, "error", "the pssword is error!"
我的目的是要抓取loginerr.jsp中的某一句文本，如此怎么调试也无济于事

司空公子 发表于 2004-10-12 19:28:22

你先要搞清楚SQAGetProperty的语法各个参数的含义。
SQAGetProperty(recMethod$, property$, value)
这个property$        是A case-sensitive property name. 也就是要一个大小写正确的属性名称。

billrub 发表于 2004-10-13 17:20:27

THKS
不过能麻烦你帮我看一下以下这段脚本否：
'$include "sqautil.sbh"
Sub Main
    Dim result As Integer
    dim dp as long
    dim x as integer
    dim nm as string
    dim ps as string
    dim ck as variant
    dp=sqadatapoolopen("test")
    'Initially Recorded: 2004-10-1117:16:56
    'Script Name: test1
    for x=1 to 5
    call sqadatapoolfetch(dp)
    call sqadatapoolvalue(dp,1,nm)
    call sqadatapoolvalue(dp,2,ps)
    Window SetContext, "Caption=¾­¼Ã»§¿Ú×ۺϹÜÀí-¼à¹Üϵͳ - Microsoft Internet Explorer", ""
    Browser SetFrame,"Type=HTMLFrame;HTMLId=mainFrame;\;Type=HTMLFrame;HTMLId=llFrame",""
    Browser NewPage,"HTMLTitle=¾­¼Ã»§¿Ú×ۺϹÜÀí-¼à¹Üϵͳ",""
    EditBox Click, "Type=EditBox;Name=loginName", "Coords=67,9"
    InputKeys nm
    EditBox Click, "Type=EditBox;Name=password", "Coords=28,10"
    InputKeys ps
    PushButton Click, "Type=PushButton;Name=Submit"
    Browser SetFrame,"",""
    result=sqagetproperty("caption=¾­¼Ã»§¿Ú×ۺϹÜÀí-¼à¹Üϵͳ - Microsoft Internet Explore;\;type=htmlframe;htmlid=mainframe;htmltitle=loginerr.jsp","title",ck)
    if ck=1 then SQALogMessage sqaWarning, "error", "the pssword is error!"
    msgbox ck
    Toolbar Click, "ObjectIndex=7;\;ItemID=1020", "Coords=4,7"   
    Window SetContext, "Class=Shell_TrayWnd", ""
    TabControl Click, "ObjectIndex=1;\;ItemIndex=4", ""
    next
    call sqadatapoolclose(dp)

End Sub

运行结果我并未能取得title值

注：乱码显示的地方是因为复制到论坛过程中造成的。

[ Last edited by billrub on 2004-10-13 at 17:26 ]

司空公子 发表于 2004-10-13 18:04:35

全是乱码，看的头都晕了。
你的脚本是有框架结构的，所以稍微麻烦一点。
用Object Properties直接抓取。可以得到验证点的语法，如下：
    Window SetTestContext, "Caption=Agile Advantage - Microsoft Internet Explorer", ""
    Browser SetFrame,"Type=HTMLFrame;HTMLId=RightPane",""
    Browser NewPage,"HTMLTitle=Select SubClass And Number",""
    Result = ComboBoxVP (CompareProperties, "Type=ComboBox;Name=subClassId", "VP=Object Properties")
    Window ResetTestContext, "", ""
这样就可以读出我需要的部分，然后进行整理。

比如：
Result = SQAGetProperty("Caption=Agile Advantage - Microsoft Internet Explorer;\;Type=HTMLFrame;HTMLId=RightPane;HTMLTitle=Select SubClass And Number;\;Type=ComboBox;Name=subClassId", "innerText", str1)   

HTMLTitle是你在查看查看源文件里所显示的title， 而不是什么loginerr.jsp

billrub 发表于 2004-10-13 21:18:24

OK,谢了，我的系统确实是有框架的，不过我的title内容就是loginerr.jsp

[ Last edited by billrub on 2004-10-13 at 21:20 ]

yang 发表于 2004-10-15 15:52:13

首先我先说我没有看明白是什么原因。:s
不过我给你一个建议不知道对你有没有帮助：在你加入SQAGetProperty取值语句之前录制一行转换设置当前窗口的语句，这种类似 以下形式：
Window SetContext, "Caption=about:blank - Microsoft Internet Explorer", ""
,然后试试看。供你参考:)

查看完整版本: 请教SQAGetproperty运用