UFT基础_1-6悬停及web下拉框功能

一、基础篇
安装
录制浏览器脚本，打开百度，进行搜索

录制后的脚本

Browser("uft_百度搜索").Page("uft_百度搜索").WebEdit("wd").Set "UFT"Browser("uft_百度搜索").Page("uft_百度搜索").WebButton("百度一下").ClickBrowser("uft_百度搜索").Page("UFT_百度搜索_2").SyncBrowser("uft_百度搜索").CloseAllTabs

录制脚本,HP自带的飞机订票系统UFT12版本

SystemUtil.Run "C:\Program Files\HP\Unified Functional Testing\samples\flight\app\flight4a.exe","","C:\Program Files\HP\Unified Functional Testing\samples\flight\app\",""Dialog("Login").WinEdit("Agent Name:").Set "test"Dialog("Login").WinEdit("Password:").Set "MERCURY"Dialog("Login").WinButton("OK").Clickwait(2)Window("Flight Reservation").ActiveX("MaskEdBox").Type "111417"Window("Flight Reservation").WinComboBox("Fly From:").Select "Denver"Window("Flight Reservation").WinComboBox("Fly To:").Select "Paris"wait(2)Window("Flight Reservation").WinButton("FLIGHT").ClickWindow("Flight Reservation").Dialog("Flights Table").WinList("From").Select 1Window("Flight Reservation").Dialog("Flights Table").WinButton("OK").Clickwait(1)Window("Flight Reservation").WinEdit("Name:").Set "huo"Window("Flight Reservation").WinButton("Insert Order").Click

录制脚本,HP自带的飞机订票系统UFT14版本

SystemUtil.Run "D:\Program Files (x86)\HPE\Unified Functional Testing\samples\Flights Application\FlightsGUI.exe","","D:\Program Files (x86)\HPE\Unified Functional Testing\samples\Flights Application\",""WpfWindow("HPE MyFlight Sample Applicatio").WpfEdit("agentName").Set "john"WpfWindow("HPE MyFlight Sample Applicatio").WpfEdit("password").Set "HP"WpfWindow("HPE MyFlight Sample Applicatio").WpfButton("OK").ClickWpfWindow("HPE MyFlight Sample Applicatio").WpfComboBox("fromCity").Select "Denver"WpfWindow("HPE MyFlight Sample Applicatio").WpfComboBox("toCity").Select "Paris"WpfWindow("HPE MyFlight Sample Applicatio").WpfCalendar("datePicker").SetDate "13-Nov-2017"WpfWindow("HPE MyFlight Sample Applicatio").WpfComboBox("Class").Select "Economy"WpfWindow("HPE MyFlight Sample Applicatio").WpfComboBox("numOfTickets").Select "1"WpfWindow("HPE MyFlight Sample Applicatio").WpfButton("FIND FLIGHTS").ClickWpfWindow("HPE MyFlight Sample Applicatio").WpfTable("flightsDataGrid").SelectCell "0","0"WpfWindow("HPE MyFlight Sample Applicatio").WpfButton("SELECT FLIGHT").ClickWpfWindow("HPE MyFlight Sample Applicatio").WpfEdit("passengerName").Set "tim"WpfWindow("HPE MyFlight Sample Applicatio").WpfButton("ORDER").Click

序号 模块 用例 预期 1 Login 1、输入用户名2，输入密码，3、OK 进入Flight界面 2 Flight 1、日期 2、选择航班Fly From 3、选择航班Fly From to 4、选择仓类，5、预订票数，选择航次。6、输入乘客名字 6、 检查预设值，Flights Table 界面出现，可输入

下拉框功能
UFT14

msgbox WpfWindow("HPE MyFlight Sample Applicatio").WpfComboBox("toCity").GetContent

UFT12

msgbox Window("Flight Reservation").WinComboBox("Fly From:").GetContent

运行，弹出msgbox框，将所有的下拉框显示出来

取值值并存到记事本中，在 Output printlog 将结果复制到excel中，再复制到记事本中。

print WpfWindow("HPE MyFlight Sample Applicatio").WpfComboBox("toCity").GetContent

获取下拉列表中值的总数,UFT14

msgbox WpfWindow("HPE MyFlight Sample Applicatio").WpfComboBox("toCity").GetItemsCount

获取下拉列表中值的总数,UFT12

msgbox Window("Flight Reservation").WinComboBox("Fly From:").GetItemsCount

比对下拉列表中的值是否正确,UFT12

flyfrom_a = Array("Denver","Frankfurt","London","Los Angeles","Paris","Portland","San Francisco","Seattle","Sydney","Zurich")flyfrom_c = Window("Flight Reservation").WinComboBox("Fly From:").GetItemsCountFor i = 0 To flyfrom_c-1    flyfrom_i= Window("Flight Reservation").WinComboBox("Fly From:").GetItem (i)    If flyfrom_i=flyfrom_a(i) Then    print i&" is right"else    print i&" is wrong"End IfNext

比对下拉列表中的值是否正确,UFT14

flyfrom = Array("Denve","Frankfurt","London","Los Angeles","Paris","Portland","San Francisco","Seattle","Sydney","Zurich")For i = 0 To WpfWindow("HPE MyFlight Sample Applicatio").WpfComboBox("fromCity").GetItemsCount -1    If WpfWindow("HPE MyFlight Sample Applicatio").WpfComboBox("fromCity").GetItem (i)=flyfrom(i) Then    print i&" is right"else    print i&" is wrong"End IfNext

Sub与Function异同，functiion 有返回值，sub没有

sub用法一

Sub sum(a,b)    msgbox a+bEnd SubCall sum(2,3）

sub用法二

Sub sum(a,b)    msgbox a+bEnd Subsum 2,3

function用法一,无返回值

Function sum(a,b)    msgbox a+bEnd Functionsum 2,3

function用法二，有返回值

Function sum(a,b)    sum=a+bEnd Functionmsgbox sum (2,3)

用户登录函数重构

Call login("john","HP")Sub login (userName,passWd)    WpfWindow("HPE MyFlight Sample Applicatio").WpfEdit("agentName").Set userName    WpfWindow("HPE MyFlight Sample Applicatio").WpfEdit("password").Set passWd    WpfWindow("HPE MyFlight Sample Applicatio").WpfButton("OK").ClickEnd Sub

菜单栏使用

'Window("记事本").WinMenu("Menu").Select "文件(F);打开(O)...   Ctrl+O"Window("记事本").WinMenu("Menu").Select "<Item 1>;<Item 1>"Window("记事本").Dialog("记事本").WinButton("保存(S)").Click

悬停及web下拉框功能

悬停

1、如何加入对象库
用“Object Spy”,捕获对象
先把“美食”添加到对象库中，
再把“火锅”添加到对象库中（方法：按住ctrl键，鼠标滑过“美食”，松ctrl键，单击”火锅”）

对象库

link的FireEvent

Browser("【团购】团购网站，高品质团购网站_百度糯米").Page("【团购】团购网站，高品质团购网站_百度糯米").Link("美食").FireEvent "onmouseover"Browser("【团购】团购网站，高品质团购网站_百度糯米").Page("【团购】团购网站，高品质团购网站_百度糯米").Link("火锅").Click

如下图

WEB下拉框

1、与flight异同
2、常用方法
（1）选取值
（2）总数&字符check
添加对象库，百度首页的设置，高级设置

下拉列表框

//打开百度首页，设置，高级搜索Browser("百度一下，你就知道").Page("百度一下，你就知道").Link("设置").FireEvent "onmouseover"Browser("百度一下，你就知道").Page("百度一下，你就知道").Link("高级搜索").Click

添加对象库weblistweblist方法

weblist属性及方法

添加item count属性

1、item count属性

msgbox Browser("百度一下，你就知道").Page("百度一下，你就知道").WebList("gpc").GetROProperty("items count")

2、默认为“全部时间”，执行后变为“最近一天”

Browser("百度一下，你就知道").Page("百度一下，你就知道").WebList("gpc").Select ("最近一天")

3、索引选取，执行后为”最近一月”

Browser("百度一下，你就知道").Page("百度一下，你就知道").WebList("gpc").Select "#3"

4、显示weblist中所有的值

msgbox Browser("百度一下，你就知道").Page("百度一下，你就知道").WebList("gpc").GetROProperty("all items")

5、 使用weblist的getitem()方法

msgbox Browser("百度一下，你就知道").Page("百度一下，你就知道").WebList("gpc").GetItem(1)

实战：对比weblist中的数据否正确

baidu_weblist = Array("全部时间","最近一天","最近一周","最近一月","最近一年")baidu_weblist_count =  Browser("百度一下，你就知道").Page("百度一下，你就知道").WebList("gpc").GetROProperty("items count")For i = 0 To baidu_weblist_count -1    If baidu_weblist(i) =  Browser("百度一下，你就知道").Page("百度一下，你就知道").WebList("gpc").GetItem(i+1) Then        print i&" is right"    else        print i&" is wrong"End IfNext