web測試工具對比--自動化功能測試(3)

　　'Initially Recorded: 2003-12-22 17:07:58

　　'Script Name: Demo

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

　　Window SetContext, "WindowTag=WEBBrowser", ""

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

　　'

　　FileNumber = FreeFile

　　//循環讀取文件中數據，登陸

　　//自讀形式 打開文件

　　Open "f:\user.txt" For Input As #FileNumber

　　Do While Not EOF(1)

　　// 讀取數據，進行處理

　　Line Input #FileNumber, Temp

　　iPos = InStr(1,Temp," ")

　　//提取用戶名

　　UserName = left(Temp,iPos-1)

　　//提取密碼

　　pw = Right(Temp,len(Temp)-6)

　　Browser("Dynaweb EPS").Page("Dynaweb EPS").WebEdit("username").Set UserName

　　Browser("Dynaweb EPS").Page("Dynaweb EPS").WebEdit("password").Set pw

　　Browser("Dynaweb EPS").Page("Dynaweb EPS").WebButton("v{ _U ").Click

　　Browser("Dynaweb EPS").Page("Dynaweb EPS_2").Link("恄 Q | ~ ").Click

　　Browser("Dynaweb EPS").Page("Dynaweb EPS_3").Sync

　　loop

　　ts.close

　　備注：quick test腳本

　　一.中文注釋要引號加空格

　　二.Vbscript腳本語言有限制，它只是vb語言的子集

　　三.聲明不需要添加類型，否則腳本編譯不通過，差錯很困難

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