07-23-2008, 01:56 AM
I was trying to implement what you said for the appln http://www.flyairdeccan.net/. Was trying to retrieve the values of "From" Select box
Cnt = browser("Deccan").Page("Deccan").WebList("ctlAvailCriteria_cboOrigin").GetROProperty("items count")
wait(3)
Dim FromCities(Cnt)
For i = 0 to Cnt -1
FromCities(i) = browser("Deccan").Page("Deccan").WebList("ctlAvailCriteria_cboOrigin").GetItem(i)
msgbox (FromCities(i))
Next
It gives me two errors
Error for the Line#Expected integer Constant
Error for the Line#The statement contains one or more invalid function arguments
Can you pls let me know where i am doing wrong
Cnt = browser("Deccan").Page("Deccan").WebList("ctlAvailCriteria_cboOrigin").GetROProperty("items count")
wait(3)
Dim FromCities(Cnt)
For i = 0 to Cnt -1
FromCities(i) = browser("Deccan").Page("Deccan").WebList("ctlAvailCriteria_cboOrigin").GetItem(i)
msgbox (FromCities(i))
Next
It gives me two errors
Error for the Line#
Code:
Dim FromCities(Cnt)
Error for the Line#
Code:
FromCities(i) = browser("Deccan").Page("Deccan").WebList("ctlAvailCriteria_cboOrigin").GetItem(i)
Can you pls let me know where i am doing wrong