求救：关于Webtable取值问题

renshaohai

如图，有一个12列的表格，求得Browser("节目信息新增").Page("节目信息新增").WebTable("集号").RowCount的行数等于5，

想要取到图中集号=1这个WebEdit的数据

试过想下列方法，都没有得到值，请教解决办法。
第一种：
i=Browser("节目信息新增").Page("节目信息新增").WebTable("集号").GetCellData(2,2)
Msgbox(i)

第二种：
i=Browser("节目信息新增").Page("节目信息新增").WebTable("集号").ChildItem(2,2,"WebEdit",0)
t=i.GetROProperty("value")
Msgbox(t)

第三种：
i=Browser("节目信息新增").Page("节目信息新增").WebTable("集号").Object.rows(1).cells(1).innerText
Msgbox(i)

walker1020

从理论上来说，使用 GetCellData 或ChildItem 都可以得到你要的数据。关键问题是，GetCellData 后的两个参数都是2 吗？ 你运行一下下面的语句，看看i 和 j分别是什么值时可以得到你要的数据。

   count = Browser("节目信息新增").Page("节目信息新增").WebTable("集号").RowCount

For  i = 1 to count
   For j =1 to 12
        data =Browser("节目信息新增").Page("节目信息新增").WebTable("集号").GetCellData(i,j)
      Msgbox(data )
  Next
Next

walker1020

作为一个称职的测试人员，一定要调试脚本的能力

renshaohai

谢谢walker1020!我加了循环之后，所有行都得到了运行错误“缺少对象: '[string: ""]'”，不知是怎么回事？

renshaohai

下面是上图TABLE的代码。
<table id="mutliTabel" border="0" cellspacing="0" cellpadding="0" class="Tabletwo" bgcolor="white">
         <tr id="Title">
     <td width=2%></td>
    <td width=2%>集号</td>
        <td width=7%>中文子标题</td>
        <td width=7%>英文子标题</td>
        <td width=7%>单集时长</td>
        <td width=7%>图象质量</td>
        <td width=7%>文件大小</td>
        <td width=7%>发布点</td>
        <td width=7%>FTP发布点</td>
        <td width=7%>播放序号</td>
        <td width=20%>生效日期</td>
        <td width=20%>失效日期</td>
   </tr>
   
   <tr class="common02" style="display:none">
     <td align="center"><input type="checkbox" name="multiSelect" value=""/></td>
         <td class="num01"><input name="multi" type="text" maxlength="4" class="detail_input01" value="1"/></td>
     <td class="num01"><input name="multiCn" type="text" maxlength="100" class="detail_input01" value=""/></td>
     <td class="num01"><input name="multiEn" type="text" maxlength="100" class="detail_input01" value=""/></td>
     <td class="num01"><input name="multiTime" type="text" maxlength="4" class="detail_input01" value=""/></td>
     <td class="num01"><input name="imageQuality" type="text" maxlength="32" class="detail_input01" value=""/></td>
     <td class="num01"><input name="fileSize" type="text" maxlength="32" class="detail_input01" value=""/></td>
     <td class="num01"><input name="release" type="text" maxlength="128" class="detail_input01" value=""/></td>
     <td class="num01"><input name="ftpRelease" type="text" maxlength="128" class="detail_input01" value=""/></td>
     <td class="num01"><input name="playSeq" type="text" maxlength="4" class="detail_input01" value="1"/></td>
         <td class="num01"><input name="beginDate" type="text" maxlength="8" class="detail_input01" value ="20071105"/></td>
     <td class="num01"><input name="endDate" type="text" maxlength="8" class="detail_input01" value ="20991231"/></td>
   </tr>
</table>

renshaohai

顶！困在这个问题上2天了，请各位大虾指点！

renshaohai

试过使用描述性语句，这回是往table里面插入值，也没有成功
！

代码：
Set desc = description.Create()
desc("micclass").value="WebEdit"
Set p= Browser("节目信息新增").Page("节目信息新增").WebTable("集号").ChildObjects(desc)
p(1).set "3"

显示错误信息：常规运行错误

renshaohai

有了一些进展，下列代码，检查checkbox已经可以正确显示，可是在第一个if语句得到的结果是“缺少对象: '[string: "1"]'”,循环后依次显示找不到对象1，2，3  ，为什么找不到对象呢？

t=Browser("节目信息新增").Page("节目信息新增").WebTable("集号").RowCount

For chk=3  to t  
                set  webeditobj=Browser("节目信息新增_2").Page("节目信息新增").WebTable("集号").ChildItem(chk,2,"WebEdit",0)
                Set i =webeditobj.GetROProperty("value")
If i=chk-2  Then
         
        msgbox"集号正确,集号为"&i&""
        else
        msgbox"集号错误,集号为"&i&""
End If
                  
Set webChkObj= Browser("节目信息新增").Page("节目信息新增").WebTable("集号").ChildItem(chk,1,"WebCheckBox",0)
If webChkObj.object.checked=false Then
        msgbox"第"&chk-2&"条选项没有被选中"
else
        msgbox"第"&chk-2&"条选项被选中"
End If

Next

hsjzfling

Set i =webeditobj.GetROProperty("value")
将这句的set去掉

renshaohai

谢谢。问题解决了。是不是返回的是值的话就不用“SET”,如果返回的是对象的话就要加“SET”吗？

hsjzfling

嗯，将对象赋给变量才需要Set，否则会报对象找不到