smart55 发表于 2009-9-11 13:11:56

webtable多页的情况怎么得出总行数

Dim j,page,sum
sum=0
page=Browser("CFS-CRM V 6.4.0.05").Page("CFS-CRM V 6.4.0.05_2").Frame("main").WebTable("客户名称").GetROProperty("items count")
msgbox(page)
For i=1 to page
j=Browser("CFS-CRM V 6.4.0.05").Page("CFS-CRM V 6.4.0.05_2").Frame("main").WebTable("客户名称").RowCount-1
sum=sum+j
msgbox(j)
Next
sum=sum+j
msgbox(sum)

以上是当查询结果有多页的情况时，计算webtable的总行数的代码。
page=Browser("CFS-CRM V 6.4.0.05").Page("CFS-CRM V 6.4.0.05_2").Frame("main").WebTable("客户名称").GetROProperty("items count")
期望得到webtable的页数，这句代码在论坛上copy过来的，可是msgbox出来值为空的，取不到，该怎么得到查询结果为多页时的总行数呢。

bagwell333 发表于 2009-9-11 13:47:34

你跟踪一下，可能是第一次循环就没取到j值。察看对象描述是否正确。

smart55 发表于 2009-9-11 14:00:00

GetROProperty("items count")

我的webtable里没有items count 这个属性，能捕捉到页数吗？
就算获得页面，是不是也要点击下面的翻页link，才能获得第二页的行数？

好像很麻烦啊，懊恼:(

Haereticus 发表于 2009-9-11 21:40:11

你可以判断下一页这个对象存在不，如果存在，就点下一页，在去Table的行数，直到下一页不存在
dim i
i=0
do
   getTableRow
    i=i+TableRow
   NextPage.click
get NextPageFlag
Loop until NextPageFlag =False
页: [1]
查看完整版本: webtable多页的情况怎么得出总行数