QTP自动化测试Google地图
来源:互联网 发布:广电总局知乎 编辑:程序博客网 时间:2024/06/09 20:32
如何用QTP对Google地图进行自动化测试呢?因为Google地图是内嵌到浏览器里的ActiveX控件,那么我们的思路就是用vbscript调用Goolge地图的API,从而实现对内嵌Google地图的操作与验证!本文原文请见:http://www.advancedqtp.com/knowledge-base/articles/environment-techniques-id15/web-id34/automating-google-earth/。
【前置条件】
QTP加载WEB和ActiveX插件
IE7,并访问http://code.google.com/apis/earth/页面下载Google地图Plugin
熟悉Google地图的API(参见http://code.google.com/apis/earth/页面),以便脚本编程
【实例脚本】
该脚本实现了改变地图视图类型、显示Google地图控件、浏览纽约时区的一些操作。
Const URL = "http://earth-api-samples.googlecode.com/svn/trunk/demos/kmlplayground/index.html"
Const SW_MAXIMIZED = 3
' 关闭当前浏览器后开启新的浏览器进入Google地图页面
SystemUtil.CloseProcessByName "iexplore.exe"
SystemUtil.Run "iexplore.exe", URL, "", "open", SW_MAXIMIZED
Browser("CreationTime:=0").Page("index:=0").Sync
Set objActiveX = Browser("CreationTime:=0").Page("index:=0").ActiveX("progid:=GEPluginCoClass.GEPluginCoClass.1.0", "location:=0").Object
' 获取地图控件属性值
ALTITUDE_ABSOLUTE = objActiveX.ALTITUDE_ABSOLUTE
VISIBILITY_SHOW = objActiveX.VISIBILITY_SHOW
ALTITUDE_RELATIVE_TO_GROUND = objActiveX.ALTITUDE_RELATIVE_TO_GROUND
MAP_TYPE_EARTH = objActiveX.MAP_TYPE_EARTH
MAP_TYPE_SKY = objActiveX.MAP_TYPE_SKY
SPEED_TELEPORT = objActiveX.SPEED_TELEPORT
wait 2
' 改变SKY视图
Set geOptions = objActiveX.getOptions()
Call geOptions.setMapType( MAP_TYPE_SKY )
wait 5
' 改变EARTH视图
Call geOptions.setMapType( MAP_TYPE_EARTH )
' 以最大速度缩放视图
geOptions.setFlyToSpeed( SPEED_TELEPORT )
Set kmlLookAt = objActiveX.getView().copyAsLookAt( ALTITUDE_ABSOLUTE )
kmlLookAt.setRange(50000000)
objActiveX.getView().setAbstractView(kmlLookAt)
wait 2
' 显示可视化控件
geOptions.setGridVisibility( true )
geOptions.setStatusBarVisibility(true)
geOptions.setScaleLegendVisibility( true )
geOptions.setMouseNavigationEnabled( true )
geOptions.setOverviewMapVisibility( true )
' 返回定位控件
Set geNavigationControl = objActiveX.getNavigationControl()
geNavigationControl.setVisibility( VISIBILITY_SHOW )
Set geView = objActiveX.getView()
Set kmlLookAt = geView.copyAsLookAt( ALTITUDE_RELATIVE_TO_GROUND )
' 设定显示速度、标题等
geOptions.setFlyToSpeed(0.5)
kmlLookAt.setTilt(0)
kmlLookAt.setHeading(0)
' 设定到纽约时区
kmlLookAt.setLatitude( 40.7594 )
kmlLookAt.setLongitude( -73.985 )
objActiveX.getView().setAbstractView(kmlLookAt)
'循环滚动地图
For i = 1 to 17
kmlLookAt.setRange(kmlLookAt.getRange() * 0.5)
objActiveX.getView().setAbstractView(kmlLookAt)
Wait 1
Next
Set objActiveX = Nothing
- QTP自动化测试Google地图
- QTP自动化测试Google地图
- QTP自动化测试流程
- QTP自动化测试流程
- 自动化测试----QTP
- QTP自动化测试进阶
- QTP自动化测试实践
- QTP自动化测试实践
- QTP-自动化测试流程
- QTP自动化测试 [学习]
- QTP自动化测试
- QTP自动化测试陷阱
- 《QTP自动化测试实践》内容简介
- 《QTP自动化测试实践》前言
- QTP自动化测试培训大纲
- 《QTP自动化测试进阶》样章
- QTP自动化测试过程随想
- 《QTP自动化测试进阶》读书笔记
- stagefright框架(五)-Video Rendering
- SD模块事物代码
- 还原卡大全
- 蠢货,关键在成长!
- SAP SD Tables
- QTP自动化测试Google地图
- 游戏数据分析
- 关于 Java 中 finally 语句块的深度辨析
- SMS的PDU编码
- pinyin4j的使用(汉字转换PINYIN)
- HTML5中国发展现状
- SD 模块与FI、MM的接口
- Oracle创建、删除数据库
- linux查找并删除文件