创建网页版UFT脚本技术点

录制网页版uft注意的一点技术点

进入航班选择界面

获取Depart和Return处的可选Flight的航班总数

DepartItemsCount=Cint(Browser("Welcome: Mercury Tours").Page("Select a Flight:Mercury")

.WebRadioGroup("outFlight").GetROProperty("items count"))

ReturnItemsCount=Cint(Browser("Welcome: Mercury Tours").Page("Select a Flight: Mercury")

.WebRadioGroup("inFlight").GetROProperty("items count"))

运用随机数选择航班

Browser("Welcome: Mercury Tours").Page("Select a Flight: Mercury")

.WebRadioGroup("outFlight").Select "#"& RandomNumber(0, DepartItemsCount-1)

Browser("Welcome: Mercury Tours").Page("Select a Flight: Mercury")

.WebRadioGroup("inFlight").Select  "#"& RandomNumber(0, ReturnItemsCount-1)

用for循环输入First Name 

Dim num
For num = 1 To Passengers
    Browser("Book a Flight: Mercury").Page("Book a Flight: Mercury").WebEdit("name:=passFirst"&num-1)

.Set datatable.Value("FirstName","CreateNewOrder")