1、Back 效果等同于浏览器窗口上的【回退】按钮,使浏览器返回上一个页面 2、CaptureBitmap 截图方法。截屏文件格式只能是 png 或者 bmp 截屏一:截取运行对象的整个屏幕 截屏二:截取运行对象中包含的子对象 语法: CaptureBitmap ( FullFileName,[ OverrideExisting ]) CaptureBitmap:捕获位图 FullFileName:完整文件名,包含整个路径 OverrideExisting:覆盖已有的。【可选值为true:可覆盖;false:不可覆盖】。可选 当该语句用于等式右边时,需要加上括号。
test.png 结果图像 |
test2.png 结果图像 |
|
|
对象侦测器抓取对象时,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的区别 语法分别为: 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: 10、Forward 效果等同于浏览器窗口上的【前进】按钮,使浏览器进入前一个页面 11、FullScreen 开启浏览器的全屏模式 12、OpenNewTab 在当前打开的浏览器窗口中打开新的tab页 Browser("百度一下,你就知道").OpenNewTab 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 最大化对话窗口、最小化对话窗口 Browser("百度一下,你就知道").Dialog("Internet 选项").Minimize 22、MouseMove 鼠标指针移动到对话窗口内的指定位置 语法: Object. MouseMove(X,Y)
Browser("百度一下,你就知道").Dialog("Internet 选项").MouseMove(78,23) 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 返回选项卡标签带中选项卡的数量 语法: Object. GetItemsCount() 37、GetSelection 得到当前被选中的选项卡标签 语法: Object. GetSelection() 38、Select 选中指定的标签项 语法: Object.Select(Item,[ Button ]) 39、WaitItemProperty 等到指定的对象属性达到指定值或超过指定的超时之前继续下一步,如省略超时不写,则默认系统设置的超时时间 语法: Object. WaitItemProperty(Item,PropertyName,PropertyValue,[ TimeOut ]) 40、isNumeric 判断一个表达式是否是数字, 如果返回true即为数字,返回false非数字 Dim Inmoney
Inmoney = “1234sad”
If not isNumeric(Inmoney) Then
msgbox Inmoney&” 不是数字”
End If 41、Date、Now、time 日期、当前系统日期+时间、当前系统时间 print date() '2015/12/11
print Now() '2015/12/11 10:45:06
print time() '10:45:07 42、round round(x,n) 取变量x的小数点后n位 43、CInt、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 44、WebRadioGroup 网页单选按钮组 语法: 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有标题行,则标题作为第一行。 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、用当前系统时间串命名保存本地的文件
- 先将获取的日期时间转换成字符串
- 然后将字符串中的“/”用“:”替换掉。因为电脑中文件命名不支持“/”“:”
- 再将字符串中的“:”用“-”替换掉
- 最后将字符串拼接到文件名中
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 |