51Testing软件测试论坛

标题: 添加表格检查点的问题 [打印本页]
作者: ciciyxs    时间: 2011-3-16 19:54
标题: 添加表格检查点的问题
一个歌曲名称的查询，输入“爱”，点击查询后就会出现查询结果，并以列表的形式列出。
怎样去检查该查询结果列表中的数据--歌曲名称是不是都含有“爱”这个字。

使用的关键字驱动能实现吗？还是要自己写脚本？
想了很久也想不到解决方法，求大虾们指点一下！！
作者: shingo0109    时间: 2011-3-16 20:51
LZ可以把歌曲名称取出来后，用Instr函数进行比较， 如果大于0的话就表示含有"爱"字
作者: ciciyxs    时间: 2011-3-17 09:43
LS的能不能再讲清楚一点实现步骤？
俺是菜鸟，不是太懂！！
作者: kavensyw    时间: 2011-3-18 17:49
本帖最后由 kavensyw 于 2011-3-18 17:53 编辑

  2. Dim rownCount,findFlag,cellData,difNumber
  3. '获取行数
  4. rownCount=Browser("Service Desk").Page("Service Desk").WbfGrid("ctl00_cphContent_sgvTicketList").RowCount
  5. findFlag=FALSE
  6. difNumber=0
  7. For i=2 to rownCount
  8. '从第2行（第一行标题行）开始查找获取单元格内容，这里假设歌曲名称在第4列
  9. cellData=Browser("Service Desk").Page("Service Desk").WbfGrid("ctl00_cphContent_sgvTicketList").GetCellData(i,4)
  10. '如果获取的字符串包含"爱"，则findFlag=True
  11. If InStr(cellData,"爱")=0 Then
  12.   findFlag=TRUE
  13.   difNumber=difNumber+1
  14. End If
  15. Next
  16. If findFlag Then
  17. msgbox "发现不包含爱。一共： "&difNumber&"处"
  18. ELSE
  19. msgbox "所有行都包含爱"
  20. End If

复制代码
作者: ciciyxs    时间: 2011-3-22 10:15
非常感激上面的大虾！！！



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