|
请各位帮忙看看,刚开始学习QTP。
尝试对 WebRadioGroup 对象进行描述性编程,但是还是没用。还是报通用的错误。
错误提示如下图:
Dim i
Browser("Web Tours").Page("Web Tours").Frame("navbar").WebEdit("username").Set "expect"
Browser("Web Tours").Page("Web Tours").Frame("navbar").WebEdit("password").SetSecure "4d81a2d3a6f57036d1eff57b"
Browser("Web Tours").Page("Web Tours").Frame("navbar").Image("Login").Click 34,6
Browser("Web Tours").Page("Web Tours").Frame("navbar").Image("Search Flights Button").Click
Browser("Web Tours").Page("Web Tours").Frame("info").WebList("depart").Select "London"
Browser("Web Tours").Page("Web Tours").Frame("info").WinButton("WinButton").Click
Window("Select Departure Date").WinButton("20").Click
Browser("Web Tours").Page("Web Tours").Frame("info").WinButton("WinButton_2").Click
Window("Select Return Date").WinButton("22").Click
Browser("Web Tours").Page("Web Tours").Frame("info").Image("findFlights").Click 32,13
'i = Browser("Web Tours").Page("Web Tours").Frame("info").WebRadioGroup("outboundFlight").GetROProperty("items count")
'MsgBox i
Browser("Web Tours").Page("Web Tours").Frame("info").WebRadioGroup("outboundFlight").Select "201;301;03/20/2011"
Browser("Web Tours").Page("Web Tours").Frame("info").Image("findFlights").Click 13,7
Browser("Web Tours").Page("Web Tours").Frame("info").WebEdit("creditCard").Set "888888"
Browser("Web Tours").Page("Web Tours").Frame("info").Image("findFlights").Click 12,12
Browser("Web Tours").Page("Web Tours").Frame("navbar").Image("SignOff Button").Click
对象库如下:
|
|