Web測試工具對比——自動化軟件測試[2]

　　Web測試工具對比——自動化軟件測試[2]   軟件測試

　　2. 錄制操作

　　腳本如下：

　　Sub Main

　　Dim Result As Integer

　　Dim Temp as Integer

　　//啟動ie,連接到http://192.168.1.42

　　StartBrowser "http://192.168.1.42", "WindowTag=WEBBrowser"

　　//讓ie窗口獲得焦點

　　Window SetContext, "WindowTag=WEBBrowser", ""

　　//打開新的頁面

　　Browser NewPage,"HTMLTitle=Dynaweb EPS 2003企業門戶服務器",""

　　//點用戶名文本框

　　EditBox Click, "Name=username", "Coords=35,12"

　　//輸入用戶名密碼

　　InputKeys "admin{TAB}jetspeed"

　　// 點登陸

　　PushButton Click, "Name=submit"

　　//進入新頁面

　　Browser NewPage,"HTMLTitle=Dynaweb EPS 2003企業門戶服務器",""

　　// 點退出連接

　　HTMLImage Click, "Index=7", "Coords=11,7"

　　//關閉ie

　　Window CloseWin, "", ""

　　End Sub

　　3.回放 測試通過

原文轉自：http://www.kjueaiud.com