关闭

QTP之无分页功能的查找脚本

发表于:2010-9-07 13:29

字体: | 上一篇 | 下一篇 | 我要投稿

 作者:文青山    来源:51Testing软件测试博客

  无分页功能的查找脚本,其主体结构为“完全匹配查找”和“模糊查找”,按照Case的逻辑需要进行修改,缺点是当表列的数据很多时,检查的速度太慢了,有没有更高的效率去查找,目前还不得而知。

  Dim compterName          '本机名

  Dim fucationPath              '函数地址

  fucationPath="F:\qtptest\fucation\fucations.vbs"  '函数组件

  ExecuteFile fucationPath

  CloseIE()     '调用组件中的CloseIE(),结束IE进程

  CloseExcel()   '调用组件中的CloseExcel(),结束Excel进程

  Url "XXXXXXXXXXXXXXX" '导航

  login(username,password) '登录

  Dim  checkTest1

  Dim  checkTest2

  Dim check

  Dim totalRowNumber

  Dim totalColumNumbe

  '下拉框的值

  checkTest1="技术预研"

  '输入框的值从global表中获得

  checkTest2=DataTable.RawValue("test2","Global")

  Browser(" ").Page(" ").Frame(" ").WebList("Value0").Select checkTest1 '查找字段

  Browser(" ").Page(" ").Frame(" ").WebEdit("Value1").Set checkTest2    '查找字段

  Browser(" ").Page(" ").Frame(" ").WebButton(" ").Click

  totalRowNumber=Browser(" ").Page(" ").Frame("name:=RightBottomFrame").WebTable("class:=CommonTable CommonSubTable BugMode").RowCount

21/212>
《2023软件测试行业现状调查报告》独家发布~

关注51Testing

联系我们

快捷面板 站点地图 联系我们 广告服务 关于我们 站长统计 发展历程

法律顾问:上海兰迪律师事务所 项棋律师
版权所有 上海博为峰软件技术股份有限公司 Copyright©51testing.com 2003-2024
投诉及意见反馈:webmaster@51testing.com; 业务联系:service@51testing.com 021-64471599-8017

沪ICP备05003035号

沪公网安备 31010102002173号