实例:
测试需求:
(1)打开http://www.baidu.com/more/
(2)拖到打开界面中的滚动条到窗口的60%处
'关闭IE浏览器 Systemutil.CloseProcessByName "iexplore.exe" '打开http://www.baidu.com/more/ Systemutil.Run "iexplore.exe","http://www.baidu.com/more/" Set Browserobj = Browser("title:=百度产品大全") Set Pageobj =Browserobj.Page("title:=百度产品大全") '等待浏览器打开完成 While Browserobj.Object.Busy Wend '调用DragScrollBar拖到浏览器滚动条到百分之六十处 Call DragScrollBar(Pageobj,"0.6") |
版权声明:本文出自 ChinaTNT 的51Testing软件测试博客:http://www.51testing.com/?306685
原创作品,转载时请务必以超链接形式标明本文原始出处、作者信息和本声明,否则将追究法律责任。