51Testing软件测试网E6?1STE.U1wZ 正如使用 QuickTest 实现应用程序测试自动化一样,也可以使用 QuickTest Professional 自动化对象模型实现 QuickTest 操作自动化。 可以使用由 QuickTest 自动化对象模型公开的对象、方法和属性来编写程序,用以配置 QuickTest 选项和运行测试或业务组件,而不必使用 QuickTest 界面手动执行这些操作。
Id
X4_Oy4D-d051Testing软件测试网T/kG9Q-sU(o$XV 自动化程序在以下情形特别有用:多次执行相同任务或就多个测试或组件执行相同任务;根据特定环境或应用程序的需要快速配置QuickTest。51Testing软件测试网%V@ c!p@
A9i
jK4c&K*dX0 其实要自动化运行QuickTest 相当简单,只需自己在电脑上建个vbs文件,完成后双击运行就可以实现了.下面给个最简单的配置QuickTest自动化启动,打开测试脚本,然后保存测试结果,然后自己关闭QuickTest程序的例子脚本.51Testing软件测试网F]:Y6uQ0x
51Testing软件测试网9EY?pHJdim qtApp
-i-y-b2sWI0%ZUWiJ"a;E/{?|0dim qttest
cc N_d1v|051Testing软件测试网#S4\_^-YE-s;kset qtApp = Createobject("QuickTest.Application") '创建 Application 对象
O'Rw9z%e(d7J0(l/v&ns+T?0qtApp.launch ' 启动
;?
Wox&W(c
\0Y4LN9C0yQ/d'Y0qtApp.Options.Run.ViewResults = true
.yvJ@)o1v051Testing软件测试网/UH-C(I&rhb"`Cp?qtApp.Visible = True '可见51Testing软件测试网6{^o-e~3C,t3j7R
51Testing软件测试网`y7n/f Q&Z&E_qtApp.open "E:\Test1",true '用只读的方法打开测试脚本
'TjBJc*D0,Fy8H
k6k%Vci0Set qtTest = qtApp.Test '创建 Test 对象51Testing软件测试网+J G2vW%c:o)Au
51Testing软件测试网$`Q
T&Ip'`{:{PSet qtResultsOpt = CreateObject("QuickTest.RunResultsOptions") ' 创建 Run Results Options 对象
8u)V&n.Ie}1N6M051Testing软件测试网lF#Io%M/_u{qtResultsOpt.ResultsLocation = "E:\Test1\Res1" ' 设置测试结果保存位置
6~ t#X0S
F'XAh*c0aneM)vv,o&aE g0qtTest.run qtResultsOpt ' 执行测试
j1}\.?(WO7i!tp4Z0`)PpG-M0qtTest.close ' 关闭测试
h$M&s`9`#Y~3T0_|9i,S5O"B j0qtApp.quit '关闭QTP51Testing软件测试网W
V-@+d
M6X
g\7b+P_#XE,Raqr0Set qtTest = Nothing ' 释放 Test 对象51Testing软件测试网%w*W^g
[b'FW,F(I+`.vhD
51Testing软件测试网J)R B"]+nv{)Gset qtApp =nothing '释放51Testing软件测试网U+w$[&N/x
qZ#LY+t
I0有兴趣的可以自己再研究更深层次的配置运行,QTP中基本上大多数的配置都可以通过它提供的对象及其方法和属性来通过代码实现
&l2e_Oc2k8?y6fz0
-[7k.~CG+|0