QTP中测试环境的初始化

首先我们用QTP中的object spy来看一下这个窗口的属性，找到我们可以利用的属性

这边我想利用的就是这个窗口的名称属性及值，利用这个名称属性来告诉QTP该关闭哪个窗口属性．

代码如下：

Dim loginwin
:u+k#d CW/U7n68246Set loginwin=descrīption.Create()　　　　　　　　　　　　＇创建对象名为loginwin的对象
a0Q8~Q!k#Z68246loginwin( "regexpwndtitle").value="Login"　　　　　　　，对象属性及值
w7Op:i(|z2KJ68246Set child=desktop.ChildObjects (loginwin)　　　　　　　
A?_I;X `68246For i=1 to child.count
e/ll^7Nl68246   child(i-1).close　　　　　　　　　　　　　　　　　　　　＇循环寻找这个对象，一次关闭
3q,w/po-^68246Next

    需要更改的地方，我用蓝色表示了，大家也可以自己试试．不过有一点要注意就是，要执行关闭窗口的关系，这个也完全依照windows的特性来做．最上面的处在激活状态的先关，然后依次关闭其他的窗口．否则脚本会无法执行．可以把这段脚本放在脚本的最前面，实现测试环境的初始化

文章来源于领测软件测试网 https://www.ltesting.net/

TAG: qtp QTP 环境