Arrays

03/10/2005 - 17:22 por Javier Torres | Informe spam
Hola Amigos.
Tengo un problemon(al menos para mi..) con el manejo de los arreglos.
Resulta que tengo declarado un arreglo, de (5,5), lo lleno en asp con 2
elementos de un recorset y despues en un script de Java cargo mas elementos,
el nuevo elemento se agrega sin problema alguno, el detalle esta al momento
de intentar realizar operaciones son este,(dento de un Script Java), ya no
veo el elemento agregado..
esto es parte del codigo.
Code:


<%
Dim i, ArrPol, ArrCatPol 'Variables para Arreglos

redim ArrPol(5,5)
i=0
‘En Rs recojo los resultados de una consulta SQL
Rst_PolTrans.MoveFirst
Do while not Rst_PolTrans.EOF
ArrPol(i,1)=Trim(Rst_PolTrans.Fields("Cve_NumSec"))
ArrPol(i,2)=Trim(Rst_PolTrans.Fields("Cve_Politica"))
ArrPol(i,3)=Trim(Rst_PolTrans.Fields("Cmp_Desc"))
ArrPol(i,4)=Trim(Rst_PolTrans.Fields("Cmp_Porcentajes"))
ArrPol(i,5)="X"
i=i+1
Rst_PolTrans.MoveNext
Loop
‘De entrada en el array se cargan solo 2 elementos, quedando
libre 3
%>

<script LANGUAGE="JScript">

function AgregaItem()
{
*****
//DimArray retoma la sig pos, del array.
<%ArrPol(DimArray,1) = "0" & DimArray+1 %>
<%ArrPol(DimArray,2) = ArrCatPol(i,1) %>
<%ArrPol(DimArray,3) = ArrCatPol(i,2) %>
<%ArrPol(DimArray,4) = 10 %>
<%ArrPol(DimArray,5) = ""%>
*****
//Hasta aca el array ya tiene un elemento mas, se agrego sin problemas
// Si en este bloque yo sonsulto el nvo item, lo veo sin problema..
};

function tonclick(id)
{
<%for i = 0 to 4 %>
{
if ( Cad == "<%=ArrPol(i,2)%>")
{
//Aca realizo operaciones con los elementos del array.. es en esta
//parte dodne ya no veo el elemento agragado del array ArrPol
}

}
<%next%>
};




Espero me puedan ayudar..
Gracias
 

Leer las respuestas

#1 Gabriel S.
03/10/2005 - 18:13 | Informe spam
La forma correcta de trabajar con variables/arrays creados del lado del
server y luego usados del lado del servidor seria mas o menos asi:


<%
DIM ar1(10)
ar1(1) = "abc"
ar1(2) = "otgra"

%>
<script language="vbscript">

Dim ar1(<%=uBound(ar1)%>

<%For i=1 to uBound(ar1))%>
ar1(<%=i%>)="<%=ar1(i)%>"
<%Next%>

sub window_onload

ar1(3)="mas un"

For i=1 to len(ar1)
Alert(ar1(i))
Next
Endsub
</script>

El secreto esta en ir declarando y pasando las variables del lado del server
para el cliente.
Gabriel.


"Javier Torres" wrote in message
news:
Hola Amigos.
Tengo un problemon(al menos para mi..) con el manejo de los arreglos.
Resulta que tengo declarado un arreglo, de (5,5), lo lleno en asp con 2
elementos de un recorset y despues en un script de Java cargo mas


elementos,
el nuevo elemento se agrega sin problema alguno, el detalle esta al


momento
de intentar realizar operaciones son este,(dento de un Script Java), ya no
veo el elemento agregado..
esto es parte del codigo.
Code:


<%
Dim i, ArrPol, ArrCatPol 'Variables para Arreglos

redim ArrPol(5,5)
i=0
'En Rs recojo los resultados de una consulta SQL
Rst_PolTrans.MoveFirst
Do while not Rst_PolTrans.EOF
ArrPol(i,1)=Trim(Rst_PolTrans.Fields("Cve_NumSec"))
ArrPol(i,2)=Trim(Rst_PolTrans.Fields("Cve_Politica"))
ArrPol(i,3)=Trim(Rst_PolTrans.Fields("Cmp_Desc"))
ArrPol(i,4)=Trim(Rst_PolTrans.Fields("Cmp_Porcentajes"))
ArrPol(i,5)="X"
i=i+1
Rst_PolTrans.MoveNext
Loop
'De entrada en el array se cargan solo 2 elementos, quedando
libre 3
%>

<script LANGUAGE="JScript">

function AgregaItem()
{
*****
//DimArray retoma la sig pos, del array.
<%ArrPol(DimArray,1) = "0" & DimArray+1 %>
<%ArrPol(DimArray,2) = ArrCatPol(i,1) %>
<%ArrPol(DimArray,3) = ArrCatPol(i,2) %>
<%ArrPol(DimArray,4) = 10 %>
<%ArrPol(DimArray,5) = ""%>
*****
//Hasta aca el array ya tiene un elemento mas, se agrego sin problemas
// Si en este bloque yo sonsulto el nvo item, lo veo sin problema..
};

function tonclick(id)
{
<%for i = 0 to 4 %>
{
if ( Cad == "<%=ArrPol(i,2)%>")
{
//Aca realizo operaciones con los elementos del array.. es en esta
//parte dodne ya no veo el elemento agragado del array ArrPol
}

}
<%next%>
};




Espero me puedan ayudar..
Gracias

Preguntas similares