QuickTestProfessional基本使用示例

QuickTestProfessional基本使用示例（原創）

1          設置腳本間的間隔時間

Wait(2)，單位：秒

2          循環語句while

i=0

do while(i<10)

Window("Opera").Restore

Window("Opera").WinObject("OperaWindowClass").Click 446,232

Window("Opera").WinObject("OperaWindowClass").Click 461,278

i=i+1

loop

3         循環語句for

For i=1 to 3

       Window("Opera").Restore

Window("Opera").WinObject("OperaWindowClass").Click 446,232

Window("Opera").WinObject("OperaWindowClass").Click 461,278

Next

4          判斷語句

Do while(i<20)

Browser("XX項目").Page("XX項目").Frame("wap").Link("啤酒").Click

wait(2)

Browser("XX項目").Page("XX項目").Frame("wap_2").Link("商鋪詳情").Click

wait(2)

i=i+1

If i=5 Then

       Exit do

End If

Loop

5          With語句

Do while(i<20)

With Browser("XX項目")

.Page("XX項目").Frame("wap").Link("生活家居").Click

.Page("XX項目").Frame("wap_5").Link("出租(火爆招租中)").Click

.Page("XX項目").Sync

With .Page("XX項目")

.Frame("wap_6").Image("image").Check CheckPoint("image")'檢查點

.Frame("wap_6").Link("返回XX首頁").Click

.Sync

.Frame("wap").Check CheckPoint("生活家居")'檢查點

End with

End with

i=i+1

If i=3 Then

    i=21

End If

Loop

6         檢查點

Browser("XX項目").Page("XX項目").Frame("wap").Link("生活家居").Click

Browser("XX項目").Page("XX項目").Frame("wap_5").Link("出租(火爆招租中)").Click

Browser("XX項目").Page("XX項目").Sync

Browser("XX項目").Page("XX項目").Frame("wap_6").Image("image").Check CheckPoint("image")'檢查點

Browser("XX項目").Page("XX項目").Frame("wap_6").Link("返回XX首頁").Click

Browser("XX項目").Page("XX項目").Sync

Browser("XX項目").Page("XX項目").Frame("wap").Check CheckPoint("生活家居")'檢查點

7           引用函數

Function  hjq(i)

   msgbox("hjq")

End Function

 

Do while(i<20)

'開始

Browser("XX項目").Page("XX項目").Frame("wap").Link("啤酒").Click

wait(2)

Browser("XX項目").Page("XX項目").Frame("wap_2").Link("商鋪詳情").Click

'詳情

i=i+1

If i=3 Then

    i=21

End If

Call hjq(i)

Loop

原文轉自：http://www.anti-gravitydesign.com