07-23-2008, 02:09 AM
I would try it this way:
You cannot dimension an array with a variable, you have to ReDim it.
Code:
Dim FromCities()
ReDim FromCities(Cnt-1)
For i = 0 to Cnt - 1
FromCities(i) = browser("Deccan").Page("Deccan").WebList("ctlAvailCriteria_cboOrigin").GetItem(i)
msgbox FromCities(i)
Next
You cannot dimension an array with a variable, you have to ReDim it.