以QTP 11.00自帶的訂飛機(jī)票的小示例程序?yàn)槔?，手工開發(fā)以下腳本代碼：
If Dialog("Login").Dialog("Flight Reservations").Exist(2)Then
Dialog("Login").Dialog("FlightReservations").WinButton("確定").Click
End If
Dialog("Login").WinEdit("Agent Name:").Set "test"
Dialog("Login").WinEdit("Agent Name:").Type micTab
Dialog("Login").WinEdit("Password:").SetSecure"5103f48e3ccaaa3c50b39191d30cc0e56ac005b2"
Dialog("Login").WinEdit("Password:").Type micReturn
If Window("Flight Reservation").Exist(5) Then
Wait(3)
End If
Window("Flight Reservation").ActiveX("MaskEdBox").Type"013113"
Window("Flight Reservation").WinComboBox("Fly From:").Select"Denver"
Window("Flight Reservation").WinComboBox("Fly To:").Select"Paris"
Window("Flight Reservation").WinButton("FLIGHT").Click
Window("Flight Reservation").Dialog("FlightsTable").WinList("From").Select"15791 DEN 03:12PM PAR 05:12PM AF $165.60"
Window("Flight Reservation").Dialog("FlightsTable").WinButton("OK").Click
Window("Flight Reservation").WinEdit("Name:").Set "bussiness"
Window("Flight Reservation").WinButton("Insert Order").Click
msgbox "Finished! Program will exit!"
Window("Flight Reservation").Close |
首先是要判斷主界面是否正常，如果Help按鈕被點(diǎn)擊過了，則先恢復(fù)它。
用戶名和密碼輸入完成之后，因?yàn)椴煌臋C(jī)器性能表現(xiàn)不同，為了腳本達(dá)到同步，檢查軟件主界面是否加載成功，未成功時等待3秒再判斷，直到成功再進(jìn)入下一步。
完成之后輸出提示信息，在用戶確認(rèn)之后再關(guān)閉程序。
好了，最主要的調(diào)整就到這里了，下一步也就是最關(guān)鍵的步驟，就是參數(shù)化了。下期發(fā)布。