zoukankan      html  css  js  c++  java
  • QTP之无分页功能的查找脚本

    TIB工作室成员 文青山 作品
     
     
    无分页功能的查找脚本,其主体结构为“完全匹配查找”和“模糊查找”,按照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
    '完全匹配查找,即所查找的列必须与关键字的字段一致,如果某一行不一致,则退出fail
    For i=2 to totalRowNumber
     '获取某列的值
     text1=Browser(" ").Page(" ").Frame("name:=RightBottomFrame").WebTable("class:=CommonTable CommonSubTable BugMode").GetCellData(i,2)
     
     '如果没有trim()方法,老是报错,不晓得为啥子,仔细看text1里面也没有空格
     
     If  trim(text1)=trim(checkTest1) Then
      check=true
     else
      check=false
      i=totalRowNumber
     End If
    Next
    '模糊查找,使用qtp自带函数RegExpTest(),经试验这里的检查作用相当于模糊查询了,不需要自己再构造正则表达式,只要存在checkTest2则返回,否则为空
    For j=2 to totalRowNumber
     '获取某列的值
     text2=Browser(" ").Page(" ").Frame("name:=RightBottomFrame").WebTable("class:=CommonTable CommonSubTable BugMode").GetCellData(j,3)
     If  RegExpTest(checkTest2,text2)<>""  Then
      check=true
     else
      check=false
      i=totalRowNumber
     end if
    Next
    If check=true Then
     CloseMsgByTime "pass"
    else
     CloseMsgByTime "fail"
    End If

    Browser(" ").Page(" ").Sync
    Browser(" ").CloseAllTabs


     

  • 相关阅读:
    LeetCode 345. Reverse Vowels of a String 题解
    LeetCode 344. Reverse String 题解
    LeetCode 27. Remove Element 题解
    LeetCode 61. Rotate List 题解
    LeetCode 19.Remove Nth Node From End of List 题解
    Android耗电量
    Android 使用adb查看和修改电池信息
    Android AOP AspectJ 插桩
    Flask相关用法
    Monkey日志信息的11种Event percentage
  • 原文地址:https://www.cnblogs.com/testware/p/2006703.html
Copyright © 2011-2022 走看看