error 0x800A03ED

[nana_01]

hola a todos............. el problema puede ser muy sencillo pero ya no tengo idea como poder solucionarlo.............


estoy trabajando con arreglos y en el momento de mostrar el arreglo me sale el siguiente error

Microsoft VBScript compilation (0x800A03ED)
Expected '('
/Remuneraciones/Mant_gene_empresa.asp, line 293, column 22


la linea 293 es la siguiente


Redim Preserve PondRem&x(J)

lo ke tengo es lo siguiente

tengo un for de 1 hasta n (numero no mas alto de 10)
aki donde hago una consulta segun un determinado filtro.............
despues muestro el contenido del resultado mediante un while y en el momento de kerer guardar la consulta me aparece el errormostrado anteriormente

lo ke desea eralizar ke el arreglo me kede la de la siguiente manera
PondRem_1(1) PondRem_1(2) PondRem_1(3) PondRem_1(4) ... PondRem_1(9)
PondRem_2(1)
PondRem_3(1)
PondRem_4(1)

les muestro el script

For x=1 to I
Sql3 = "exec pa_listar_pond_empresa_generica "&Cint(Generica(x))
Rs3.open Sql3, conexionBD, 1, 2 %>
<tr align="center" class="txt_11_negro_normal">
<td width="49" bgcolor="#E1F4FF"><%=Generica(x)%></td>
<td width="71" align="left" bgcolor="#E1F4FF" class="txt_9_negro_negrita">Pond rem</td>
<% J = 1

While Not rs3.EOF
Redim Preserve PondRem&x(J)
PondRem_&""&x(J) = rs3.fields("POND_I_rem")
'response.write PondRem_x(J)&"<br>"%>
<td width="49" bgcolor="#E1F4FF"><input name="TxtRem<%=J%>_<%=x%>" type="text" class="caja_texto_lock" size="6" maxlength="6" OnKeypress="javascript:solodecimales();" OnkeyDown="PresionaEnter();" value="<%=PondRem_&""&x(J)%>" disabled="disabled"></td>
<% J = J + 1
rs3.movenext
Wend
rs3.close

[u_goldman]

Que es lo que pretendes hacer exactamente aqui?

Redim Preserve PondRem&x(J)

Que es lo que vale PondRem?
Estas concatenando un arreglo llamado x en un indice de j?

Por que no nos muestras el codigo?

Salu2,

[u_goldman]

mmmhhh ya veo...pero supongo que no estas dimensionando ese arreglo PondRem en ningun lado no?

Otra cosa mas, me parece que por estructura, tu tratamiento de arreglos deberia comenzar en el indice 0

Una cosa mas, parece que estas trabajando con diferentes elementos, te falta por ahi un _

Redim Preserve PondRem&x(J)
PondRem_&""&x(J) = rs3.fields("POND_I_rem")

Mi consejo es que como solo tu sabes que traes en la cabeza , hagas response.write de todos estos elementos dinamicos, por ahi debe ser un fallo como un simple guion bajo o no dimensionar el arreglo.

Salu2,

[nana_01]

por lo ke estoy hacuendo necesito inicializar en uno y no en cero......... por ke despues ocupo los valores de x y j dentro del escript.................

si es ke me falta agun _ es por ke he modificado tanto el escrip ke puede ke se me haya pasado uno...........

el problema cuando kiero mostrar el arreglo me aparece puros ceros y necesitio hacer una suma de ponderaciones con esos datos.............

voy a volver hacer unos cambios como me los señalas y de ahi te ciento

gracias