QTP/UFT 学习笔记：函数方法等记录

​原记录在CSDN上的，后来被自动转VIP了，我搬过来免费看看，小东西没必要VIP，主打一个知识无价，朴实无华。

1、Back

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

2、CaptureBitmap 截图方法。

截屏文件格式只能是 png 或者 bmp

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

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

语法： CaptureBitmap (FullFileName,[OverrideExisting])

CaptureBitmap：捕获位图

FullFileName：完整文件名，包含整个路径

OverrideExisting：覆盖已有的。【可选值为true：可覆盖；false：不可覆盖】。可选 当该语句用于等式右边时，需要加上括号。

对象侦测器抓取对象时，file name有值：

3、CheckProperty 检查属性。

语法： CheckProperty (PropertyName,PropertyValue,[TimeOut])

CheckProperty：检查属性 PropertyName：属性名称 PropertyValue：对应名称属性的值 TimeOut：超时。可选

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

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

图②：代码描述段

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

4、ChildObjects

子对象

语法：

ChildObjects([description])

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

5、Close

关闭。关闭指定对象

6、CloseAllTabs

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

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

7、DeleteCookies

删除浏览器的cookie

语法：

DeleteCookies ([ FromSource ])

webUtil.GetCookies(url)

 

8、DialogExists、Exists

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

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

语法：

Object. Exist（[ timeout ]）

9、EmbedScript、RunScript

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

与RunScript的区别

语法分别为：

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

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

10、Forward

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

11、FullScreen

开启浏览器的全屏模式

12、OpenNewTab

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

13、WaitProperty

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

语法：

WaitProperty( properName,propertyValue[,timeout ])

properName：对象名

propertyValue：指定对象对应的值

timeout：等待超时时间上限

14、Activate

激活。激活对话框

语法：

Object.Activate([ Button ])

Button：micLeftButton、micMiddleButton、micRightButton。可选

15、DblClick

双击事件

16、Drag

拖动事件

语法：

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

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

Button：按钮，可选

17、Drop

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

语法：

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

18、GetTextLocation

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

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

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

GetVisibleText

获取对话框相应的文字

19、GetROProperty、GetTOProperty、GetTOProperties

语法：

Object.GetROProperty(Property，[ PropertyData ])	Object.GetTOProperty(Property)	Object.GetTOProperties
GetROProperty：获取运行时指定对象的某个属性值	GetTOProperty：获取对象库中指定对象的某个属性值	GetTOProperties：获取对象库中指定对象的所有属性值

20、GetVisibleText

从指定的区域返回文本

语法：

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

21、Maximize、Minimize

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

22、MouseMove

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

语法：

23、Move

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

语法：

Object.Move(X,Y)

24、RefreshObject

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

25、Resize

设置对话框的尺寸

语法：

Object.Resize(X,Y)

26、Restore

恢复对话框之前的大小

SetTOProperty

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

语法：

Object.SetTOProperty(Property，Value)

27、ToString

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

语法：

Object.ToString()

28、Type

指定对话框中的字符类型

语法：

Object.Type(KeyBoradInput)

29、WinButton

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

30、RunAnalog

运行指定的模拟轨道

语法：

Object.RunAnalog(ActionId，[ Speed ])

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

31、WinTab

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

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

32、CheckItemProperty

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

语法：

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

33、GetContent

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

语法：

Object.GetContent()

34、GetItem

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

语法：

Object.GetItem (Item)

35、GetItemProperty

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

语法：

Object.GetItemProperty(Item，Property)

36、GetItemsCount

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

语法：

37、GetSelection

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

38、Select

选中指定的标签项

39、WaitItemProperty

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

语法：

​

40、isNumeric

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

​

41、Date、Now、time

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

42、round

取变量x的小数点后n位

round(x,n)

43、CInt、CLng、CSng、CDbl

字符串转换。

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

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

44、WebRadioGroup

网页单选按钮组

语法：

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

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

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

WebList	WebRadioGroup	WebTable
.select 2	.select 2	.Rowcount 返回表格的行数
.getROProperty("value")	.getROProperty("selection")	.ColumnCount(n) 返回表格第n行的列数
.object.selectedIndex	.object.selectedIndex	.getCellData() 返回指定单元包含的文本
.select "女"		.ChildItem()
		.GetRowWithCellText()

​

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

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"

​​

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

尽量都用全局变量

47、Wait(seconds,[ milliseconds ])

等待函数

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

48、Deselect

取消已选中的项目

Deselect(Item)

49、ExtendSelect

添加选项到多选项列表中

ExtendSelect(Item)

50、Array

数组

定义一维数组语法：

Dim a

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

则：

a(0) = “wo”

a(4) = “ren” 

不限数组长度

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

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

​

52、最小化浏览器窗口

Window("Internet Explorer").Minimize

53、 随机数

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

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

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

​

​