|
请问以下代码:
Browser("Welcome: Mercury Tours").Page("Welcome: Mercury Tours").WebEdit("userName").Set "diegozhang"
Browser("Welcome: Mercury Tours").Page("Welcome: Mercury Tours").WebEdit("password").SetSecure "4c2c60ff8722d20aa3a2bde477e2a37d546483c6"
Browser("Welcome: Mercury Tours").Page("Welcome: Mercury Tours").Image("Sign-In").Click 27,12
Browser("Welcome: Mercury Tours").Page("Find a Flight: Mercury").WebList("fromPort").Select DataTable("departure", dtGlobalSheet)
Browser("Welcome: Mercury Tours").Page("Find a Flight: Mercury").WebList("passCount").Select RandomNumber("intpassnum")
Browser("Welcome: Mercury Tours").Page("Find a Flight: Mercury").WebList("fromMonth").Select "May"
Browser("Welcome: Mercury Tours").Page("Find a Flight: Mercury").WebList("toMonth").Select "June"
Browser("Welcome: Mercury Tours").Page("Find a Flight: Mercury").WebList("toDay").Select "20"
Browser("Welcome: Mercury Tours").Page("Find a Flight: Mercury").Image("findFlights").Click 41,10
Browser("Welcome: Mercury Tours").Page("Select a Flight: Mercury_2").Output CheckPoint("Select a Flight: Mercury")
Browser("Welcome: Mercury Tours").Page("Select a Flight: Mercury_2").Check CheckPoint("Select a Flight: Mercury_2")
Browser("Welcome: Mercury Tours").Page("Select a Flight: Mercury").Image("reserveFlights").Click 51,11
Browser("Welcome: Mercury Tours").Page("Book a Flight: Mercury_2").WebEdit("passFirst0").Check CheckPoint("passFirst0_2")
Browser("Welcome: Mercury Tours").Page("Book a Flight: Mercury_2").WebTable("New York to Acapulco").Check CheckPoint("New York to Acapulco_2")
Dim i
For i = 0 to (intPassNum)-1
Browser("Welcome: Mercury Tours").Page("Book a Flight: Mercury_2").WebEdit("passFirst"&i).Set "diego"
Browser("Welcome: Mercury Tours").Page("Book a Flight: Mercury_2").WebEdit("passLast"&i).Set "zhang"
Next
1。为何到FOR NEXT的时候直接跳过了并未进行测试啊。。。?
2。在passFirst处可以设置一个类或者数组么?这样的话两个乘客的名字就不一样了
3。Debug时将BREAKPOINT设置在FOR所在行,但是为什么我一是用DEBUG测试全部FAIL啊? 这和STEP有关么?
4。winedit和webedit有什么区别啊?
新人问题有点多,希望各位高手指教。。。最好留下QQ或者+13671900谢谢了哈。。 |
|