1.WebList类型对象的高级使用
语法:WebList("xx").Select "选项内容"/编号
实现随机选择:得到列表总数GetROProperty("items count"),
得到随机数count = RandomNumber(0,counts-1),
设置编号WebList("cat_id").Select count。
Dim cat_idCounts
cat_idCounts = Browser("ECSHOP 管理中心").Page("ECSHOP 管理中心_2").Frame("main- frame").WebList("cat_id").GetROProperty("items count")
Browser("ECSHOP 管理中心").Page("ECSHOP 管理中心_2").Frame("main-frame").WebList("cat_id").Select RandomNumber(0,cat_idCounts-1)
2.WebRadioGroup类型对象的高级使用
语法:WebRadioGroup("xx").Select "编号"
实现随机选择:得到列表总数GetROProperty("items count"),
得到随机数count = RandomNumber(0,counts-1),
设置编号WebList("cat_id").Select "#"$count 。3.WebTable类型对象的高级使用
需要手动添加WebTable到对象仓库
Dim countsRow,columnCounts,randomRow,text,bianji
行数
countsRow = Browser("ECSHOP 管理中心").Page("ECSHOP 管理中心").Frame("main-frame").WebTable("编号").RowCount()
随机行数
randomRow = RandomNumber(3,countsRow-1)
columnCounts = Browser("ECSHOP 管理中心").Page("ECSHOP 管理中心").Frame("main-frame").WebTable("编号").ColumnCount(randomRow)
得到行列里的值
text = Browser("ECSHOP 管理中心").Page("ECSHOP 管理中心").Frame("main-frame").WebTable("编号").GetCellData(randomRow,columnCounts)
得到行列里的对象
set bianji = Browser("ECSHOP 管理中心").Page("ECSHOP 管理中心").Frame("main-frame").WebTable("编号").ChildItem(randomRow,columnCounts,"Image",1)