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的特性來做．最上面的處在激活狀態的先關，然后依次關閉其他的窗口．否則腳本會無法執行．可以把這段腳本放在腳本的最前面，實現測試環境的初始化

文章來源于領測軟件測試網 http://www.kjueaiud.com/

TAG: qtp QTP 環境