Ver Mensaje Individual
  #1 (permalink)  
Antiguo 12/03/2002, 07:06
Isabel
 
Fecha de Ingreso: noviembre-2001
Mensajes: 121
Antigüedad: 23 años, 6 meses
Puntos: 0
Error al redimensionar un array

Hola, tengo el siguiente codigo:
Dim Productos(0,6)

actual = UBound(productos,1)

Productos (actual,0) = RsPresu.Fields.Item("Referencia").Value

actual = UBound(Productos,1)+1

redim preserve Productos(actual,6)

y me dice El subíndice está fuera del intervalo

me podeis ayudar, por favor? :(