hola,
estoy intentando crear varios arrays dinamicamente pero me peta en la linea que declaro el array.
Alguna idea, yo soy nuevo en esto.
Este es el codigo:
Código:
dim numArray
for numArray = 1 to 31sql="SELECT * FROM TPRODUCTO where IDTIPOPRODUCTO="&numArray
Set rs=CreateObject("ADODB.Recordset")
rs.CursorType=1
rs.Open sql, con
dim [pro&numArray]()
redim [pro&numArray](rs.recordcount)
i=0
do while not rs.EOF [pro&numArray](i)=rs("NOMBRE")
response.write([pro&numArray](i)&"<br>")
i=i+1
rs.movenext
loop
rs.Close
set rs=nothing
response.write("<br>")
next