
18/05/2006, 16:19
|
 | | | Fecha de Ingreso: marzo-2006
Mensajes: 59
Antigüedad: 19 años, 1 mes Puntos: 0 | |
UGOLDMAN, gracias por tu atención
Este es el SCRIPT donde estan las funciones que utilizo: <SCRIPT LANGUAGE="Javascript">
<!--
function Tupla ( campo1, campo2 )
{
this.campo1 = campo1;
this.campo2 = campo2;
}
<%
'ARREGLO PARA LISTA DE SUCURSALES
'Vamos a crear nuestros arrays de productos desde ASP
'El primer if detecta un cambio en la categoría para
'crear un nuevo array en Javascript
SQL="SELECT DISTINCT LOCALIDADES.[Codigo Oficina Comercial] AS SUC, LOCALIDADES.[Descripcion Oficina Comercial] AS DESCSUC, LOCALIDADES.[Codigo Agencia] AS OFI, LOCALIDADES.DescABRV AS DESCOFI FROM METAS LEFT JOIN LOCALIDADES ON METAS.LOCALIDAD = LOCALIDADES.[Codigo Agencia] ORDER BY LOCALIDADES.[Codigo Oficina Comercial]"
rs.Open SQL, oConn
cuenta=0
cat="basura"
while not rs.EOF
if cat<>rs.Fields("SUC") then
' cambio de categoria, empiezo a contar en 0
cuenta=0
cat=rs.Fields("SUC")
'además tengo que crear un nuevo array para la categoría
%>
var opciones<%=cat%> = new Array();
<%
end if
%>
opciones<%=cat%>[<%=cuenta%>]=new Tupla("<%=rs.Fields("DESCOFI")%>","<%=rs.Fields("O FI")%>");
<%
cuenta=cuenta+1
rs.MoveNext
wend
%>
<%
'Limpiamos objetos
rs.Close
set rs=nothing
set rs1=nothing
oConn.Close
set oConn=nothing
%>
var contador;
function ComponerLista ( array ) {
// Compone la lista dependiente a partir
// del valor de la opcion escogida en la lista "padre"
BorrarLista();
array = eval("opciones" + array);
for (contador=0; contador<array.length; contador++)
{
// añade elementos nuestro combobox
var optionObj = new Option( array[contador].campo1, array[contador].campo2 );
Listas.OFICINAS.options[contador] = optionObj;
} // for
} // ComponerLista
function BorrarLista() {
Listas.OFICINAS.length=0;
}
//Inicializamos
ComponerLista (1);
-->
</SCRIPT>
Esta parte es donde lo llamo dentro del SELECT y funciona perfecto. <SELECT NAME="SUCURSALES" SIZE="1"
OnChange="ComponerLista (document.forms.Listas.SUCURSALES[selectedIndex].value);" >
Por ultimo esta parte es de donde llamo la función fuera del SELECT y me genera error.
XSUC=REQUEST.FORM("SUCURSALES")
XOFI=REQUEST.FORM("OFICINAS")
IF XSUC="" OR XSUC=0 THEN
ELSE
ComponerLista("XSUC");
END IF
Debo aclarar que la variable XSUC trae el valor correcto, todo esta dentro de los <% y %> necesarios....
Agradezco tu ayuda.... |