|
8#
楼主 |
发表于 2006-6-29 14:20:49
|
只看该作者
脚本如下:
Browser("Welcome: Mercury Tours").Page("Welcome: Mercury Tours").WebEdit("userName").Set "rong"
Browser("Welcome: Mercury Tours").Page("Welcome: Mercury Tours").WebEdit("password").SetSecure "44a0e8f1d71fd27369b262775de112f2de4c417a"
Browser("Welcome: Mercury Tours").Page("Welcome: Mercury Tours").Image("Sign-In").Click 19,12
Browser("Welcome: Mercury Tours").Page("Find a Flight: Mercury_2").WebList("fromPort").Select DataTable("departure", dtGlobalSheet)
Browser("Welcome: Mercury Tours").Page("Find a Flight: Mercury_2").WebList("fromMonth").Select "December"
Browser("Welcome: Mercury Tours").Page("Find a Flight: Mercury_2").WebList("fromDay").Select "28"
Browser("Welcome: Mercury Tours").Page("Find a Flight: Mercury_2").WebList("toPort").Select "San Francisco"
Browser("Welcome: Mercury Tours").Page("Find a Flight: Mercury_2").WebList("toMonth").Select "December"
Browser("Welcome: Mercury Tours").Page("Find a Flight: Mercury_2").WebList("toDay").Select "31"
Browser("Welcome: Mercury Tours").Page("Find a Flight: Mercury_2").WebRadioGroup("servClass").Select "Business"
Browser("Welcome: Mercury Tours").Page("Find a Flight: Mercury_2").Image("findFlights").Click 43,7
Browser("Select a Flight: Mercury").Page("Select a Flight: Mercury").Image("reserveFlights").Click 47,6
wait(3)
Browser("Select a Flight: Mercury").Page("Book a Flight: Mercury").WebTable("New York to San Francisco").Check CheckPoint("New York to San Francisco")
Browser("Select a Flight: Mercury").Page("Book a Flight: Mercury").Check CheckPoint("Book a Flight: Mercury")
Browser("Select a Flight: Mercury").Page("Book a Flight: Mercury").WebEdit("passFirst0").Set "rong"
Browser("Select a Flight: Mercury").Page("Book a Flight: Mercury").WebEdit("passFirst0").Check CheckPoint("passFirst0_4")
Browser("Select a Flight: Mercury").Page("Book a Flight: Mercury").WebEdit("passLast0").Set "qian"
Browser("Select a Flight: Mercury").Page("Book a Flight: Mercury").WebEdit("creditnumber").Set "88888888888"
Browser("Select a Flight: Mercury").Page("Book a Flight: Mercury").Image("buyFlights").Click 65,9
Browser("Select a Flight: Mercury").Page("Flight Confirmation: Mercury").Check CheckPoint("New York")
Browser("Select a Flight: Mercury").Page("Flight Confirmation: Mercury").Image("backtoflights").Click
对象属性附件中: |
|