博客
关于我
强烈建议你试试无所不能的chatGPT,快点击我
QTP(9)
阅读量:5229 次
发布时间:2019-06-14

本文共 7228 字,大约阅读时间需要 24 分钟。

常用的Windows控件

  WinEdit---Set "数据值" SetSecure "加密数值"
  WinButton---Click
  WinComboBox---组合框\下拉框\下拉列表
  Select "选项文本"|选项编号
  WinList---列表框 Select "选项文本"|选项编号
  WinRadioButton---单选按钮 Set
  WinCheckBox---复选框 Set "ON"|"OFF"
  Static---静态(图片或纯文本) Click
  Window---窗体|窗口 Close
  Dialog---对话框 Close
  WinMenu---菜单 Select "一级菜单;二级菜单"
  WinObject---Click Type "数据值"

  练习1:Flight,录制登录、订票、退出的步骤,在专家视图中修改代码实现:

    (1)登录用户名从abcd修改为jack
    (2)将密码修改为明文密码:mercury
    (3)将起飞城市、到达城市、航班的选项都修改为选项编号的形式
    (4)将舱位类型(Class)从Business修改为选中First
    (5)增加向Tickets文本框中输入“4”的步骤
  Test9001_Flight_修改代码

Dialog("Login").WinEdit("Agent Name:").Set "jack"Dialog("Login").WinEdit("Password:").Set "mercury"Dialog("Login").WinButton("OK").Clickwait 8Window("Flight Reservation").ActiveX("MaskEdBox").Type "010819"Window("Flight Reservation").WinComboBox("Fly From:").Select 1Window("Flight Reservation").WinComboBox("Fly To:").Select 2Window("Flight Reservation").WinButton("FLIGHT").ClickWindow("Flight Reservation").Dialog("Flights Table").WinList("From").Select 1Window("Flight Reservation").Dialog("Flights Table").WinButton("OK").ClickWindow("Flight Reservation").WinEdit("Name:").Set "ooo"Window("Flight Reservation").WinRadioButton("First").SetWindow("Flight Reservation").WinEdit("Tickets:").Set "4"Window("Flight Reservation").WinButton("Insert Order").ClickWindow("Flight Reservation").Close

 

一、解读专家视图的代码

  1、常用的Web控件的类型及其常用方法
    Test9002_MTours_修改代码

Browser("Welcome: Mercury Tours").Page("Welcome: Mercury Tours").WebEdit("userName").Set "zhang"Browser("Welcome: Mercury Tours").Page("Welcome: Mercury Tours").WebEdit("password").SetSecure "5a5d68c67eef114b2cd5ef3f"Browser("Welcome: Mercury Tours").Page("Welcome: Mercury Tours").Image("Sign-In").ClickBrowser("Welcome: Mercury Tours").Page("Find a Flight: Mercury").WebRadioGroup("tripType").Select "roundtrip"Browser("Welcome: Mercury Tours").Page("Find a Flight: Mercury").WebList("passCount").Select "3"Browser("Welcome: Mercury Tours").Page("Find a Flight: Mercury").WebList("fromPort").Select 1Browser("Welcome: Mercury Tours").Page("Find a Flight: Mercury").WebList("toPort").Select "#2"Browser("Welcome: Mercury Tours").Page("Find a Flight: Mercury").WebRadioGroup("servClass").Select "#2"

    (1)WebEdit---文本框

      方法:Set "值"----设置值,替换原有内容
      SetSecure "加密值"---加密设置|安全设置值
    (2)WebButton---按钮
      方法:Click---点击|单击
    (3)Link---链接
      方法:Click---点击|单击
    (4)WebList---下拉框和列表框
      方法:Select "选项文本"|选项编号|"#选项编号"
      其中:选项编号是从0开始的整数
    (5)WebRadioGroup---单选按钮组
      方法:Select "选项文本"|"#选项编号"
      注意:一组单选按钮是一个对象,选项文本可以查看all items属性值。
    (6)WebCheckBox---复选框
      方法:Set "ON"|"OFF"---选中|取消选中
    (7)Image---图片
      方法:Click---点击|单击
    (8)WebElement---网页元素(纯文本或无法识别具体类型的网页元素)
      方法:Click---点击|单击
    (9)Browser---浏览器
      方法:Close---关闭、Refresh---刷新
    (10)Page---网页
      方法:Sync---同步(等待网页加载完毕)
    (11)WebTable---表格
      方法:GetCellData 行号,列号---获得单元格数据

  2.增强代码的语法:
    (1)检查点
      语法:对象.Check Checkpoint("对象名称")
    (2)输出值
      语法:对象.Output Checkpoint("对象名称")
      注意:检查点和输出值不要在专家视图修改代码,可以通过图形化界面中来修改。
    (3)DataTable参数化:可以在专家视图实现,前提在数据表中准备好数据。
      a.数据在Global表单
        DataTable("列名",dtGlobalSheet)
      b.数据在Action表单
        DataTable("列名",dtLocalSheet)

      练习2:两位数加法器,录制加法和退出的2个Action,通过DataTable参数化实现多组数据加法。

      Test9003_两位数加法器_DataTable参数化

’加法ActionVbWindow("Form1").VbEdit("Text1").Set DataTable("加数1",dtLocalSheet)VbWindow("Form1").VbEdit("Text2").Set DataTable("加数2",dtLocalSheet)VbWindow("Form1").VbButton("计算(J)").ClickVbWindow("Form1").VbButton("重置(C)").Click’退出ActionVbWindow("Form1").VbButton("退出(E)").ClickVbWindow("Form1").Dialog("退出提示").WinButton("确定").Click

      练习3:录制Flight登录后退出的步骤,通过DataTable参数化实现多组用户名登录的要求。

        提示:数据放在Global表单中,录制时使用手动启动的方式。
      Test9004_Flight_登录_DataTable参数化

SystemUtil.Run "C:\Program Files\HP\QuickTest Professional\samples\flight\app\flight4a.exe","","C:\Program Files\HP\QuickTest Professional\samples\flight\app\","open"Dialog("Login").winedit("Agent Name:").set DAtatable("用户名",dtGlobalSheet)Dialog("Login").WinEdit("Password:").SetSecure "5a5d9e5dab208dc77723bf3ef923c96bb230a57a"Dialog("Login").WinButton("OK").ClickWindow("Flight Reservation").Close

 

二、VBS语言基础

  1.VBS,全称是VBScript,是微软公司的一种脚本语言,属于解释型语言。

  2.VBS语法中不区分大小写,但是字符串数据内容最好区分大小写。
    例:Msgbox "Hello World!"

  3.注释:
    (1)单行注释:英文单引号后的本行的所有内容都是注释。
    (2)多行注释:选中一段,右键菜单中选择Comment Block,或者使用快捷键Ctrl+m
    (3)取消多行注释:选中一段,右键菜单中选择Uncomment Block,或者使用快捷键Ctrl+Shift+m
      注意:使用快捷键Ctrl+Shift+m前,需要先将输入法切换为非搜狗输入法。

  4.变量:VBS是弱类型语言,所以所有的变量都是同一个数据类型的,这种数据类型就是Variant(变体类型)
    (1)定义变量:
      Dim 变量
        Dim 变量1,变量2,变量3
      例:
        Dim a
        Dim x,y,z
        Dim a1,a2
    (2)变量的命名规约:
      a.以字母开头
      b.只能包含字母、数字、下划线
      c.长度不能超过255个字符
      d.不能和VBS关键字重名,用VBS在QTP中测试时,也不要和QTP内的关键字重名
      e.在同一个作用域内唯一
        作用域:可以理解为Action
    (3)赋值:变量名称=值
      注意:定义变量和给变量赋值不要书写在一行。
      例:Dim b=1'语法错误!!!
    (4)使用变量的值:任何使用常量的位置都可以用变量代替
      注意:使用变量时,不要在变量名称前后加双引号!
    (5)VBS的Variant数据类型有很多子类型,包括:Integer整型、String字符串、Boolean布尔、Double双精度浮点数、Single单精度浮点数、Long长整型……
    (6)默认可以不定义变量直接用,但是建议大家定义后再用,在代码的开头增加Option Explicit后,变量就必须定义后再使用。
      作用:方便检查变量名称书写错误的问题。

      Test9005_VBS变量

’Action1'Option Explicit'要求变量必须先定义再使用'Msgbox "Hello World!"'弹出信息框:你好,世界!'msgbox "你好,世界!"'aa'ssss'aaaaaaa'dddddd'fffff'kdsksksd'sddssdsdsd'sdsdsd'sdsdsdsdsd'sdsdsd'Dim aDim x,y,zDim a1,a2Dim Dim1,date1,value1,month1Dim dataTable1,set1,click1,winedit1'Dim aa=100a="Hello"a=5.5a=true'Dim b=1'语法错误!!!'Dim b'b=1'msgbox bDim statusstatus=truemsgbox status’Action2Dim a

      Test9006_两位数加法器_变量

Option ExplicitDim num1,num2num1="30"num2="50"Dim ww="Form1"VbWindow(w).VbEdit("Text1").Set num1VbWindow(w).VbEdit("Text2").Set num2VbWindow(w).VbButton("计算(J)").ClickVbWindow(w).VbButton("退出(E)").ClickVbWindow(w).Dialog("退出提示").WinButton("确定").Click

      Test9007_MTours_变量

Browser("Welcome: Mercury Tours").Page("Welcome: Mercury Tours").WebEdit("userName").Set "zheng"Browser("Welcome: Mercury Tours").Page("Welcome: Mercury Tours").WebEdit("password").SetSecure "5a5dbfadfc15f4cf1e6b57bb"Browser("Welcome: Mercury Tours").Page("Welcome: Mercury Tours").Image("Sign-In").Click 31,2Dim pcpc=3Browser("Welcome: Mercury Tours").Page("Find a Flight: Mercury").WebList("passCount").Select pcBrowser("Welcome: Mercury Tours").Page("Find a Flight: Mercury").WebList("fromPort").Select "London"

    (7)自动转换:VBS是弱类型语言,所以会根据变量使用的上下文来自动转换子类型。

      前提:该上下文就只是一种子类型的上下文。

  5、运算符和表达式
    (1)运算符
      a.算术运算符:+-*/^mod\
      b.字符串连接符:&(建议)+(不建议)
      c.关系运算符:>、<、=、>=、<=、<>(不等于)
      d.逻辑运算符:and(与)、or(或)、not(非)

      注意:+前后如果都是字符串,会做连接,都是数字,会做加法,一个是字符串,一个是数字,建议使用&连接。

      Test9008_VBS运算符_算术&连接

'========算术运算符=============='msgbox 2^3'乘方、幂、指数'msgbox 10/3'除法3.33333333333'msgbox 10\3'整除3'msgbox 10 mod 3'求余(相当于java中%)1'msgbox 10 mod 7'求余(相当于java中%)3'====字符串连接符=&+=================='Dim a,b,c,d,e,f'a=10'b=20'c="30"'d="40"'e="Hello"'f="World"'msgbox e+f'HelloWorld'msgbox c+d'3040'msgbox a+b'30'msgbox c+e'30Hello'msgbox a+e'报错:类型不匹配'msgbox e&f'HelloWorld'msgbox c&d'3040'msgbox a&b'1020'msgbox c&e'30Hello'msgbox a&e'10Hello'========逻辑运算符=========='msgbox 10>3 and 2=20'False'msgbox 10>3 or 2=20'Truemsgbox not 10>3'False

转载于:https://www.cnblogs.com/KalosOwen/p/8642212.html

你可能感兴趣的文章
苹果开发者账号那些事儿(二)
查看>>
使用C#交互快速生成代码!
查看>>
UVA11374 Airport Express
查看>>
P1373 小a和uim之大逃离 四维dp,维护差值
查看>>
NOIP2015 运输计划 树上差分+树剖
查看>>
P3950 部落冲突 树链剖分
查看>>
读书_2019年
查看>>
读书汇总贴
查看>>
微信小程序 movable-view组件应用:可拖动悬浮框_返回首页
查看>>
MPT树详解
查看>>
空间分析开源库GEOS
查看>>
RQNOJ八月赛
查看>>
前端各种mate积累
查看>>
jQuery 1.7 发布了
查看>>
Python(软件目录结构规范)
查看>>
Windows多线程入门のCreateThread与_beginthreadex本质区别(转)
查看>>
Nginx配置文件(nginx.conf)配置详解1
查看>>
linux php编译安装
查看>>
name phone email正则表达式
查看>>
721. Accounts Merge
查看>>