Array dinámicos en ASP Clásico
En asp clásico, es imposible iniciar una matriz sin especificar el tamaño de la matriz. Entonces, tienes que cambiar el tamaño de la matriz dinámicamente, lo puedes hacer de la siguiente forma:
[vb]
Dim arr()
ReDim arr(-1)
Do While objRs.eof = false
ReDim Preserve arr(UBound(arr)+ 1)
arr(UBound(arr)) = objRs("xxx")
objRs.MoveNext
Loop
Dim arr()
ReDim arr(-1)
Do While objRs.eof = false
ReDim Preserve arr(UBound(arr)+ 1)
arr(UBound(arr)) = objRs("xxx")
objRs.MoveNext
Loop
For i = 0 to UBound(arr)
Response.Write "(" & i & ") Value " & arr(i) & "<br>"
Next
[/vb]
