不谋万世者,不足谋一时;不谋全局者,不足谋一域。君子敏于事而慎于言 新浪微薄:土司阿哈

QTP中启动一个应用程序和IE的方法

上一篇 / 下一篇  2008-08-03 13:14:02 / 个人分类:qtp

1208328177
  • 自动化测试:
  • 测试文档:
51Testing软件测试网yA+a oL

qtp提供了很多自动启动应用程序的办法,方法如下:51Testing软件测试网;k+?!dc5C.o7Wf
1)SystemUtil.Run 允许启动新的进程

F6Uk"hqe3K051Testing软件测试网B^-A7LS9e3C

格式:SystemUtil.Run file, [params], [dir], [op], [mode]

.w-x2X Tu0

O\K/z9|#o'V"\@3ES!D0下面代码利用SystemUtil对象如何启动进程。51Testing软件测试网*wl Y@'l#N M4?
启动IE51Testing软件测试网VL9t;sU{
SystemUtil.Run "iexplore.exe"51Testing软件测试网)au6W{;T%T$k4V#NA
SystemUtil.Run "iexplore.exe",http://www.51testing.com/?57326

n&GN bIg1yo` z0

&FB8oQP0SystemUtil.Run "iexplore.exe", "http://www.knowledgeinbox.com", , , 3

h$BK&TM\SYr9h051Testing软件测试网/|4FrK8{!a

'打开电影播放器51Testing软件测试网,TA {(k$A,T
SystemUtil.Run "mplayerc.exe  E:\movie\功夫小子.rmvb  /play"51Testing软件测试网 e-H1F ]!_T+M^n

51Testing软件测试网'v6oZ2D yL.M


s I"vk(y:kx_)B\02)InvokeApplication 启动应用程序
YxnE1q7l*l0格式:InvokeApplication(Command [,StartIn])51Testing软件测试网 X*g S3U]o%e

*{_;T-KX x-b4?mP0}3?+M:u0例子:启动ie
f(X2K'v3T0InvokeApplication "IEXPLORE.EXE" 51Testing软件测试网(OsB-fJ+l

9_8`0p M3`N3z*C0启动计算器
n{Z c:G)r0InvokeApplication "calc.exe"51Testing软件测试网8d`ZQ9By+e

51Testing软件测试网V#`p+? DL ]a&Qh

3) COM - Wsh
0}@|{C1m%cd%r9j9O0利用Wsh对象进行启动51Testing软件测试网:51Testing软件测试网&k*~(g B DJ VER+qh
例子:

#Q9T4E(a}s6\0
Dim oShell
%{"p$_yU~RA!} y*O0set ōShell= CreateObject ("Wscrīpt.shell")
 oShell.Run "IEXPLORE.EXE"
Set ōShell = Nothing

n*Q6E"e7\)d04)Qtp自动启动应用程序
%z~!]m3Uy H'D b0Qtp打开 Automation-〉Record and Run Settings 下进行设置51Testing软件测试网U7\UJ9k8l5s7o]

51Testing软件测试网`;H~%t0TQ_

5)录制启动过程

!|8R%d.dW([0D#s~051Testing软件测试网qN)Fb|%U c

 Dialog("运行").WinEdit("打开(O):").Set "calc"51Testing软件测试网? dG9U)`Z

51Testing软件测试网yJ!w)jyB9y

 Dialog("运行").WinButton("确定").Click

B0G*x#] b'g fk0

l*v9YR.E*f w0以上内容源于网络

W/R q+kf7W+C?0

TAG: QTP qtp

 

评分:0

我来说两句

Open Toolbar