1Back
效果等同于浏览器窗口上的【回退】按钮,使浏览器返回上一个页面
2CaptureBitmap
截图方法。截屏文件格式只能是 png 或者 bmp
截屏一:截取运行对象的整个屏幕
截屏二:截取运行对象中包含的子对象
语法:
CaptureBitmap ( FullFileName,[ OverrideExisting ])
CaptureBitmap:捕获位图
FullFileName:完整文件名,包含整个路径
OverrideExisting:覆盖已有的。【可选值为true:可覆盖;false:不可覆盖】。可选
当该语句用于等式右边时,需要加上括号。
test.png 结果图像 |
test2.png 结果图像 |
|
|
对象侦测器抓取对象时,file name有值:
3CheckProperty
检查属性。
语法:
CheckProperty (PropertyName,PropertyValue,[TimeOut])
CheckProperty:检查属性
PropertyName:属性名称
PropertyValue:对应名称属性的值
TimeOut:超时。可选
当该语句用于等式右边时,需要加上括号。如下图:
图①:Image对象的部分属性截图
图②:代码描述段
图③:执行代码段②的结果
4ChildObjects
子对象
语法:
ChildObjects([description])
Description:获取指定页面相同标属性的标签
5Close
关闭。关闭指定对象
6CloseAllTabs
关闭同一个浏览器窗口中所有的标签页
Browser("百度一下,你就知道").CloseAllTabs
7DeleteCookies
删除浏览器的cookie
语法:
DeleteCookies ([ FromSource ])
webUtil.GetCookies(url)
8DialogExists、Exists
对话框/被测对象是否存在,返回Boolean类型的值:true、false
打开ie浏览器中的“管理加载项”对话框,执行下面一段代码,a = true
语法:
Object. Exist([ timeout ])
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()方法获取到需要赋值的对象:
RunScript:
EmbedScript:
10Forward
效果等同于浏览器窗口上的【前进】按钮,使浏览器进入前一个页面
11FullScreen
开启浏览器的全屏模式
12OpenNewTab
Browser("百度一下,你就知道").OpenNewTab
13WaitProperty
等到指定的对象属性达到指定值或超过指定的超时之前继续下一步,如省略超时不写,则默认系统设置的超时时间
语法:
WaitProperty( properName,propertyValue[,timeout ])
properName:对象名
propertyValue:指定对象对应的值
timeout:等待超时时间上限
14Activate
**。**对话框
语法:
Object.Activate([ Button ])
Button:micLeftButton、micMiddleButton、micRightButton。可选
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
获取对话框相应的文字
19GetROProperty、GetTOProperty、GetTOProperties
语法:
Object.GetROProperty(Property,[ PropertyData ]) |
Object.GetTOProperty(Property) |
Object.GetTOProperties |
GetROProperty:获取运行时指定对象的某个属性值 |
GetTOProperty:获取对象库中指定对象的某个属性值 |
GetTOProperties:获取对象库中指定对象的所有属性值 |
20GetVisibleText
从指定的区域返回文本
语法:
Object. GetVisibleText([Left],[Top],[Right],[Bottom])
21Maximize、Minimize
最大化对话窗口、最小化对话窗口
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
系统选项卡。可以设置指定对象的选项卡事件
如下图中的【常规】【安全】【隐私】等就是选项卡,【常规】是一个选项卡,【安全】是一个选项卡。
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、Now、time
日期、当前系统日期+时间、当前系统时间
print date() '2015/12/11
print Now() '2015/12/11
10:45:06
print time() '10:45:07
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
举例:
注意:CInt()函数,不是单纯的删除小数部分,而是将小数四舍五入成最接近该数的偶数。
列如:0.5 四舍五入 为 0, 1.5四舍五入 为 2
44WebRadioGroup
网页单选按钮组
语法:
Object.WebRadioGroup(name).Select( Value )
例如:下图的选择代码实现为
Browser("Browser").Page("Page").WebRadioGroup("bankcard").Select "1"
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"
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”
不限数组长度
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