Ver Mensaje Individual
  #1 (permalink)  
Antiguo 15/12/2004, 13:17
nana_01
 
Fecha de Ingreso: octubre-2004
Mensajes: 101
Antigüedad: 20 años, 6 meses
Puntos: 0
error (0x800A0009) ke no he podido solucionar

hola tengo un error, y no se cual es el problema

tengo el siguiente codigo

I = 0
For Each Valor In Request.Form("list2")
Redim Preserve Contenido(I)
if (Valor = "ROL") then
Contenido(I) = Valor
I= I + 1
Contenido(I) = "DV_ROL"
Else
Contenido(I) = Valor
I = I + 1
End if
Next

y me sale el siguiente mensaje de error

Tipo de error:
Error de Microsoft VBScript en tiempo de ejecución (0x800A0009)
El subíndice está fuera del intervalo: '1'
/ir/TabuDirec.asp, line 53

la linea 53 apunta a Contenido(I) = "DV_ROL"

por ke tengo este error?, osea segun yo se puede hacer (no casho mucho asp, me gusta el php :P) algun me puede dar alguna solucion para lo ke necesito hacer..........

gracias