+ 首页>>技能>>内容

技能[PLAYING QTP] PART 03 – RUN237次围观

[PLAYING QTP] PART 03 - RUN

PART – 03 – RUN

看一下几个关于RUN的常用设置:
File->Settiings
[PLAYING QTP] PART 03 - RUN

Tools->Options
[PLAYING QTP] PART 03 - RUN

Automation目录下的三种常用运行方式,Run全部运行;Run Current Action运行当前的Action;Run From Step 从当前步骤开始运行。
[PLAYING QTP] PART 03 - RUN

其他方式运行脚本:
第一种方法 – 使用QC等工具启动脚本
这个用过QC/TD的人都知道,自家软件,必须能调用,由于木有QC/TD环境,不上图了,操作简单,能批量运行,还能定时。在QTP的Tools->Options 中勾上 Allow other HP products to run tests and components 就能正常使用了。

  • 新奇指数:★★★☆☆
  • 好用指数:★★★☆☆
  • 喜爱指数:★☆☆☆☆

第二种方法 – 使用QTP自带的工具TBR
在QTP的菜单中,藏着这样一个工具–Test Batch Runner
[PLAYING QTP] PART 03 - RUN
界面极其简单,超轻量级软件,傻瓜式的操作,可批量运行脚本。
[PLAYING QTP] PART 03 - RUN

  • 新奇指数:★★★☆☆
  • 好用指数:★★★★☆
  • 喜爱指数:★★★☆☆

第三种方法 – AOM
AOM – Automation Object Model。
(1) VB调用方式:

Dim qtAPP AS QuickTest.Application    '申明AOM对象
Set qtAPP = New QuickTest.Application '创建AOM对象
qtAPP.Launch              '启动QTP
qtAPP.Visible = True      '设为可见

(2) C#调用方法:

QuiclTest.Application qtAPP = New QuickTest.Application();
qtAPP.Launch();
qtAPP.Visible = True;

(3) JavaScript调用方法:

var qtAPP = New ActiveXObject("QuickTest.Application");
qtAPP.Launch();
qtAPP.Visible = True;

PS:用AOM代码运行脚本时,会产生一个QTAutomationAgent.exe的进程,如果脚本是非法终止的,手动或写脚本干掉这个进程,否则会影响下面的测试。

这里就使用vbs作为例子脚本语言,文本文件保存下面的脚本,后缀改为.vbs,就能在Windows操作系统下,双击这个文本文件来运行QTP脚本了。

Dim qtApp
'创建QTP实例
Set qtApp = CreateObject("QuickTest.Application")

'启动QTP实例
qtApp.Launch
qtApp.Visible = true

'打开相应的QTP脚本(如脚本为保存在D盘的Test1)
qtApp.Open "D:\Test1"
Set qtTest= qtApp.Test
Set objTestRecovery = qtApp.Test.Settings.Recovery

'设置QTP存储报告的目录
Set qtResultsOpt = CreateObject("QuickTest.RunResultsOptions")

'运行QTP
qtTest.Run qtResultsOpt

'运行完毕,退出脚本
qtTest.Close

'测试任务结束后,退出QTP实例
qtApp.quit
Set qtApp = Nothing

上面的脚本需要对文件中的QTP脚本路径进行修改,如果每个脚本都需要手动打开vbs文件修改路径,会略显麻烦,也不符合咱这追求高效省事的心,然后稍微做了些调整:

'创建QTP实例
Dim qtApp
Set qtApp = CreateObject("QuickTest.Application")

'启动QTP实例
qtApp.Launch
qtApp.Visible = False

'打开相应的QTP脚本
Dim ScriptDir
ScriptDir = createobject("WScript.Shell").CurrentDirectory
qtApp.Open ScriptDir
Set qtTest= qtApp.Test
Set objTestRecovery = qtApp.Test.Settings.Recovery

'设置QTP存储报告的目录
Set qtResultsOpt = CreateObject("QuickTest.RunResultsOptions")

'运行QTP
qtTest.Run qtResultsOpt

'运行完毕,退出脚本
qtTest.Close

'测试任务结束后,退出QTP实例
qtApp.quit
Set qtApp = Nothing

这么写之后,只要这个文件放在要执行的脚本的根目录就能执行当前目录的脚本,想在桌面点?使用快捷方式嘛~

  • 新奇指数:★★★★☆
  • 好用指数:★★★★★
  • 喜爱指数:★★★★☆

第四种方法 – 计划任务
有一次发现,windows自带的“计划任务”也是个不错的启动自动化测试执行的好工具。可批量,还可定时。不过呢,对脚本的要求还是有一点点高的,需要做好场景恢复的准备,不然当第一个脚本卡死后,后面的也别想执行了。
我现在在日常工作中,就会把一些自动化测试的执行放在计划任务里,定好时间,每天早上到公司后,就能得到今天各个模块的基础的测试结果,省了很多时间,也能更快的了解到今天的系统是不是有什么不正常。
[PLAYING QTP] PART 03 - RUN
结合第三种方法,计划任务可以指向这个脚本里的vbs文件,直接启动。
[PLAYING QTP] PART 03 - RUN

  • 新奇指数:★★★★☆
  • 好用指数:★★★★★
  • 喜爱指数:★★★★☆

第五种方法 – Excel的宏
不知道有多少朋友喜欢用OFFICE里的宏,我个人还是比较喜爱的,在排版、设置、计算上,都能提高不少的效率,还是高校省事,哈哈。
首先,在“Excel选项->信任中心->宏设置”中,开启对宏的设置,在“Excel选项->常用”中,勾上“在功能区显示‘开发工具’选项卡”,就可以正常的使用宏了。OFFICE中的宏使用的也是vb类语言,会用QTP的朋友,在使用上基本没有障碍,看下下面这个例子吧。
[PLAYING QTP] PART 03 - RUN
这样,在Excel中,就会出现了一个BUTTON按钮,点击一下这个按钮,就会打开QTP,执行指定的脚本。是不是很有意思?如果你有大量的脚本工具在手,只要一个Excel,就可以快速的指哪Run哪。

  • 新奇指数:★★★★★
  • 好用指数:★★★★★
  • 喜爱指数:★★★★★

上面几种方法,都是我在日常工作中,时刻用到的方法,如果你还有什么别的实用的、或是好玩的方法,请Email (cydblack@163.com) 告诉我。
其他的一些小方法:
运行时最小化QTP:

Call Small()
'===============================
'作用:最小化QTP运行
'===============================
Public Sub QTP_Small()
    Dim objQTPWin
    Set objQTPWin = GetObject("" , "QuickTest.Application")
    objQTPWin.WindowState = "Minimized"
    Set objQTPWin = Nothing
End Sub

最后来回顾一下说的几点吧:

[PLAYING QTP] PART 03 - RUN
PART – 03 END
转载请注明出处与原作者。
如果你觉得文章对你有所帮助,请留言。
如果你想请作者喝杯咖啡,请点这个超链接

+ 猜你喜欢...

===== 关于 DiggerPlus =====
DiggerPlus是国内新锐测试人垂直内容博客,专注于挖掘测试工具,普及测试技术,专注于测试人能力提升,博客上线后就受到广大测试人的热烈追捧;此外,DiggerPlus深度整合评测资源,揭秘科技数据和真相,让读者更懂科技,更好地把玩科技。 我们始终保持"独立,客观,严谨,优秀"的优良作风,努力为读者带来源源不断的优质内容。想访问更多酷毙的测试人网站?赶紧来DiggerPlus测试人网址导航看看吧!

===== DiggerPlus Team =====
DiggerPlus Team是DiggerPlus官方发起的团队,这是一群热爱科技,热爱测试,喜欢深度挖掘的热血测试人,他们是评测师,测试专家。 我们欢迎优秀的测试人加入DiggerPlus Team。 加入DiggerPlus,可以成为我们的认证Dper,认证Dper拥有DiggerPlus独一无二的专栏并得到个人展示。

===== DiggerPlus 官方读者群 =====
DiggerPlus官方读者群(一)

+ 关于本文作者

不随波逐流,做不平凡的测试人。

的专栏 | 专栏作者 | 访问Dylan_陈永达的主页

+ 发表评论

Copyright © 2014 DiggerPlus. 85 queries in 1.837 seconds.
使用合作网站账号快速登录,更多精彩等着您: 开源中国