Filling Arrays dyanmically

[somisays]

Dear Srinivas,

Please see the modified code using Dynamic Array...

Code:

Dim calypsoarray()

x=JavaWindow("Legal ").JavaList("Role(s)").GetROProperty("items count")

For i=0 to x-1
             Redim calypsoarray(x)
    rolei=javawindow("Legal ").JavaList("Role(s)").GetItem(i)
    msgbox i
[size=x-large]calypsoarray(i)=rolei[/size]
   msgbox rolei

Next

For Dynamic arrays you have to specify the size by using the Redim statement .


Hope this helps..