QTP/UFT 学习笔记

时间:2024-04-13 12:52:16

1Back

效果等同于浏览器窗口上的【回退】按钮,使浏览器返回上一个页面

QTP/UFT 学习笔记

2CaptureBitmap

截图方法。截屏文件格式只能是 png 或者 bmp

截屏一:截取运行对象的整个屏幕

截屏二:截取运行对象中包含的子对象

语法

CaptureBitmap ( FullFileName,[ OverrideExisting ])

CaptureBitmap:捕获位图

FullFileName:完整文件名,包含整个路径

OverrideExisting:覆盖已有的。【可选值为true:可覆盖;false:不可覆盖】。可选

当该语句用于等式右边时,需要加上括号。

QTP/UFT 学习笔记

test.png 结果图像

test2.png 结果图像

QTP/UFT 学习笔记

QTP/UFT 学习笔记

对象侦测器抓取对象时,file name有值:

QTP/UFT 学习笔记

3CheckProperty

检查属性。

语法:

CheckProperty (PropertyName,PropertyValue,[TimeOut])

CheckProperty:检查属性

PropertyName:属性名称

PropertyValue:对应名称属性的值

TimeOut:超时。可选

QTP/UFT 学习笔记

当该语句用于等式右边时,需要加上括号。如下图:

图①:Image对象的部分属性截图

图②:代码描述段

图③:执行代码段②的结果

QTP/UFT 学习笔记

4ChildObjects

子对象

语法

ChildObjects([description])

Description:获取指定页面相同标属性的标签

QTP/UFT 学习笔记

5Close

关闭。关闭指定对象

QTP/UFT 学习笔记

6CloseAllTabs

关闭同一个浏览器窗口中所有的标签页

Browser("百度一下,你就知道").CloseAllTabs 

7DeleteCookies

删除浏览器的cookie

语法:

DeleteCookies ([ FromSource ])

webUtil.GetCookies(url)

QTP/UFT 学习笔记

8DialogExists、Exists

对话框/被测对象是否存在,返回Boolean类型的值:true、false

打开ie浏览器中的“管理加载项”对话框,执行下面一段代码,a = true

语法:

Object. Exist([ timeout ])

QTP/UFT 学习笔记

9EmbedScript、RunScript

嵌入脚本。嵌入的是JavaScript脚本。

与RunScript的区别

语法分别为:

Browser("Browser").EmbedScript(Script). / Browser("Browser").EmbedScriptFromFile(FileName) 

Browser("Browser").Page("Page").RunScript(Script). / Browser("Browser").Page("Page").RunScriptFromFile(FileName)

假如要在百度首页的输入框赋值,可以调用JS代码。

首页要找到百度首页上输入框的id,然后用JavaScript中的getElementById()方法获取到需要赋值的对象

QTP/UFT 学习笔记

RunScript

QTP/UFT 学习笔记

EmbedScript

QTP/UFT 学习笔记

10Forward

效果等同于浏览器窗口上的【前进】按钮,使浏览器进入前一个页面

QTP/UFT 学习笔记

11FullScreen

开启浏览器的全屏模式

12OpenNewTab

在当前打开的浏览器窗口中打开新的tab页

Browser("百度一下,你就知道").OpenNewTab

13WaitProperty

等到指定的对象属性达到指定值或超过指定的超时之前继续下一步,如省略超时不写,则默认系统设置的超时时间

语法:

WaitPropertyproperName,propertyValue[,timeout ])

properName:对象名

propertyValue:指定对象对应的值

timeout:等待超时时间上限

QTP/UFT 学习笔记

14Activate

**。**对话框

语法:

Object.Activate([ Button ])

Button:micLeftButton、micMiddleButton、micRightButton。可选

QTP/UFT 学习笔记

15DblClick

双击事件

16Drag

拖动事件

语法:

Object.Drag(X,Y[, Button ])

拖动某个对象并指定拖动目标位置的X,Y坐标值。

Button:按钮,可选

17Drop

执行指定部分进行拖放操作

语法:

Object.Drop(X,Y[, Button ])

18GetTextLocation

检查指定的文本字符串是否包含在指定窗口区域

Object.GetTextLocation(TextToFind,[in,out] Left, [in,out] Top, [in,out] Right, [in,out] Buttom,[ MatchWholeWordOnly ])

TextToFind:需要查找的文本字符串

GetVisibleText

获取对话框相应的文字

19GetROPropertyGetTOPropertyGetTOProperties

语法:

Object.GetROProperty(Property,[ PropertyData ])

Object.GetTOProperty(Property)

Object.GetTOProperties

GetROProperty:获取运行时指定对象的某个属性值

GetTOProperty获取对象库中指定对象的某个属性值

GetTOProperties:获取对象库中指定对象的所有属性值

20GetVisibleText

从指定的区域返回文本

语法:

Object. GetVisibleText([Left],[Top],[Right],[Bottom])

21MaximizeMinimize

最大化对话窗口、最小化对话窗口

Browser("百度一下,你就知道").Dialog("Internet 选项").Minimize

22MouseMove

鼠标指针移动到对话窗口内的指定位置

语法:

Object. MouseMove(X,Y)

Browser("百度一下,你就知道").Dialog("Internet 选项").MouseMove(78,23)

23Move

移动对话窗口到屏幕指定的位置

语法:

Object. Move(X,Y)

24RefreshObject

指示UFT再次识别应用程序中的对象时,参考这一步的对象

25Resize

设置对话框的尺寸

语法:

Object. Resize(X,Y)

26Restore

恢复对话框之前的大小

SetTOProperty

设置对象库中指定对象的某个属性值

语法:

Object. SetTOProperty(Property,Value)

27ToString

让当前指定对象返回一个字符串

语法:

Object. ToString()

28Type

指定对话框中的字符类型

语法:

Object. Type(KeyBoradInput)

29WinButton

设置当前对象中的按钮事件

30RunAnalog

运行指定的模拟轨道

语法:

Object. RunAnalog(ActionId,[ Speed ])

设置指定对象在模拟轨道上的运行速度

31WinTab

系统选项卡。可以设置指定对象的选项卡事件

如下图中的【常规】【安全】【隐私】等就是选项卡,【常规】是一个选项卡,【安全】是一个选项卡。

QTP/UFT 学习笔记

32CheckItemProperty

检查指定项目在指定时间内是否达到预期值

语法:

Object. CheckItemProperty(Item,PropertyName,PropertyValue,[ TimeOut ])

33GetContent

返回在选项卡标签带中所有选项卡的列表

语法:

Object. GetContent()

34GetItem

返回索引中指定选项卡的值

语法:

Object. GetItem (Item)

35GetItemProperty

返回选项卡标签带中指定属性的当前值

语法:

Object. GetItemProperty(Item,Property)

36GetItemsCount

返回选项卡标签带中选项卡的数量

语法:

Object. GetItemsCount()

37GetSelection

得到当前被选中的选项卡标签

语法:

Object. GetSelection()

38Select

选中指定的标签项

语法:

Object.Select(Item,[ Button ])

39WaitItemProperty

等到指定的对象属性达到指定值或超过指定的超时之前继续下一步,如省略超时不写,则默认系统设置的超时时间

语法:

Object. WaitItemProperty(Item,PropertyName,PropertyValue,[ TimeOut ])

40isNumeric

判断一个表达式是否是数字, 如果返回true即为数字,返回false非数字

Dim Inmoney

Inmoney = 1234sad

If not isNumeric(Inmoney)  Then
     
msgbox Inmoney& 不是数字
 
End If

41Date、Nowtime

日期当前系统日期+时间当前系统时间

print date() '2015/12/11
print 
Now() '2015/12/11 10:45:06
print 
time() '10:45:07

QTP/UFT 学习笔记

42round

round(x,n)

取变量x的小数点后n位

43CInt、CLng、CSng、CDbl

字符串转换。

CInt(expression)      Integer 
CLng(expression)    Long 
CSng(expression)   Single 
CDbl(expression)     Double

CStr(expression)         String

举例:

QTP/UFT 学习笔记

注意:CInt()函数,不是单纯的删除小数部分,而是将小数四舍五入成最接近该数的偶数。

列如:0.5 四舍五入 为 0, 1.5四舍五入 为 2

44WebRadioGroup

网页单选按钮组

语法:

Object.WebRadioGroup(name).Select( Value ) 

例如:下图的选择代码实现为

    Browser("Browser").Page("Page").WebRadioGroup("bankcard").Select "1"    

QTP/UFT 学习笔记

WebList

WebRadioGroup

WebTable

.select 2

.select 2

.Rowcount 返回表格的行数

.getROProperty("value")

.getROProperty("selection")

.ColumnCount(n) 返回表格第n行的列数

 .object.selectedIndex

.object.selectedIndex

.getCellData() 返回指定单元包含的文本

.select "女"

 

.ChildItem()

 

 

.GetRowWithCellText()

使用ColumnCount(rowNumber)时,需要记住一点,这个方法的参数rowNumber是从1开始的,没有rowNumber 为0的行。

如果table有标题行,则标题作为第一行。

45WebEdit 日期控件 日历控件 时间控件

1)

Browser("xx").Page("xx").WebEdit("html id:=HTKSSJ_dateTextBox","html tag:=INPUT","kind:=singleline","index:=1").Object.value="2014-10-09"

2)
Browser("xx").Page("xx").WebEdit("html id:=HTKSSJ_dateTextBox","html tag:=INPUT","kind:=singleline","index:=1").Object.setAttribute "value", "2014-10-09", 0

 

3)

Browser("xx").Page("xx").WebEdit("html id:=HTKSSJ_dateTextBox","html tag:=INPUT","kind:=singleline","index:=1").Object.readonly=false

Browser("xx").Page("xx").WebEdit("html id:=HTKSSJ_dateTextBox","html tag:=INPUT","kind:=singleline","index:=1").set"2014-10-09"

QTP/UFT 学习笔记

QTP/UFT 学习笔记

46变量明明有值却传不到下一个function时检查是不是变量为局部变量传值失败

尽量都用全局变量

47Wait(seconds,[ milliseconds ])

等待函数

wait(10) '等待10秒执行下一句

48Deselect

取消已选中的项目

Deselect(Item)

49ExtendSelect

添加选项到多选项列表中

ExtendSelect(Item)

1   Array

数组

定义一维数组语法:

Dim a

a = array(“wo”,”shi”,”zhong”,”guo”,”ren”)

则:

a(0) = “wo”

a(4) = “ren”

不限数组长度
QTP/UFT 学习笔记 

2  多个账号循环注册多个网站的示例

Dim nabeiURL,haofuwu,haochanpin,haipiquanURL,humenjiaURL,hcpURL,url,url1,url2,url3,url4,url5,url6,url7,url8,url9
'
内测
haofuwu = ""
haochanpin = ""
'
正式
url1 = ""
url2 = ""
url3 = ""
url4 = 
""
url5 = 
""
url6 = 
""
url7 = 
""
url8 = 
""
url9 = 
""
'
注册表单中需要填入的值 申明变量
Dim userName,userName1,userName2,userPwd,confirmPwd,email,mobile,checkCode
userName1 = "userName1"
userName2 = "userName2"

Dim userNames
userNames = array(userName1,userName2)
Dim sum1 '
得出 useName 数组的最大下标
sum1 = UBound(userNames) - LBound(userNames)
Dim urls
urls = array(haofuwu,haochanpin)
Dim sum2
sum2 = UBound(urls) - LBound(urls)
'
多个网站注册多个账号,且每个网站注册的账号一致
Function userName_lists()
    For i = 0 To sum2
        systemutil.Run "C:\Program Files\Internet Explorer\iexplore.exe",urls(i)
        print urls(i)&"        "&now()
        For m = 0 To sum1
            userName = userNames(m)
            printuserName&"        "&now()
            register()
'            paymentAccount_open()
        Next
    Next
End Function


userName_lists()

'
注册
Function register()
    userPwd = "12345678"
    confirmPwd = "12345678"
    email = userName+"@qq.com"
    mobile = "13511111111"
    Browser("browser").Page("page").Link("
注册").Click
    Browser("browser").Page("
用户注册").WebEdit("userName").Set userName
    Do
        Browser("browser").Page("
用户注册").WebEdit("UserPwd").Set userPwd
        Browser("browser").Page("
用户注册").WebEdit("ConfirmPwd").Set confirmPwd
        Browser("browser").Page("
用户注册").WebEdit("Email").Set email
        Browser("browser").Page("
用户注册").WebEdit("Mobile").Set mobile
        checkCode =  inputbox("
输入验证码")
        Browser("browser").Page("
用户注册").WebEdit("CheckCode").Set checkCode
        Browser("browser").Page("
用户注册").WebButton("立即注册").Click
        wait (2)
    Loop While Browser("browser").Page("
用户注册").WebTable("用户名*").WebElement("验证码输入错误").Exist(2) = false
    Browser("browser").Page("
注册成功易带易路").Link("前往平台").Click
'    Browser("browser").Page("page").Link("
登录").Click
End Function

3  最小化浏览器窗口

Window("Internet Explorer").Minimize

4  随机数

Dim no1,no2

no1 = "tester"
 randomize '
初始化随机数生成器
 no2 = int(99999*rnd)+999 '
生成一个随机数(在99999-999范围内)
 print no1&int(99999*rnd)+999
 no1 = "tester"&int(99999*rnd)+999

5  用当前系统时间串命名保存本地的文件

1)       先将获取的日期时间转换成字符串

2)       然后将字符串中的“/”用“:”替换掉。因为电脑中文件命名不支持“/”“:”

3)       再将字符串中的“:”用“-”替换掉

4)       最后将字符串拼接到文件名中

Dim no1,no2

no1 = cstr(now)
print "cstr(now) = "&no1
no1 = replace(no1,"/",":")
print "no1 = "&no1
no1 = replace(no1,":","-")
print "no1 = "&no1
desktop.CaptureBitmap "E:\pic\"&no1&".png",True

desktop.CaptureBitmap "E:\pic\"+no1+".png",True

 QTP/UFT 学习笔记