Foros del Web » Programando para Internet » ASP Clásico »

Como pongo valores por default en estos combos ??

Estas en el tema de Como pongo valores por default en estos combos ?? en el foro de ASP Clásico en Foros del Web. Hola que tal Ya que en el foro de javascript no me respondieron, pongo mi duda o problema aqui, para kien sepa. Este codigo lo ...
  #1 (permalink)  
Antiguo 03/02/2004, 09:18
 
Fecha de Ingreso: julio-2002
Ubicación: stgo rec
Mensajes: 438
Antigüedad: 21 años, 10 meses
Puntos: 3
Como pongo valores por default en estos combos ??

Hola que tal

Ya que en el foro de javascript no me respondieron, pongo mi duda o problema aqui, para kien sepa.

Este codigo lo uso para llenar un combo que depende de un combo mayor para su llenado, el problema que tengo es que ambos deben partir con un valor que obtengo desde una base de datos (ASP), para poner el valor por default en el primer combo no tengo problemas, el llenado del segundo combo tambien lo hace bien, pero nose como poner el valor por default del segundo.
Código PHP:
<SCRIPT LANGUAGE="Javascript">
 <!--
                    function 
Tupla campo1campo2 ){
                        
this.campo1 campo1;
                        
this.campo2 campo2;
                    }
                    <% 
'Vamos a crear nuestros arrays de lmcomunas desde ASP
                    '
El primer if detecta un cambio en la categoría para
                    
'crear un nuevo array en Javascript
                    Set Conn = Server.CreateObject("ADODB.Connection")    
                    Set Rs =Server.CreateObject("ADODB.RecordSet")
                    Conn.Open DefConexionBDD
                    sSQL="SELECT * FROM Comunas ORDER BY IdRegion,IdComuna"
                    RS.Open sSQL,Conn,3,&H0001
                    cuenta=0
                    cat="basura"
                    while not rs.EOF 
                        if cat<> RS.Fields("IdRegion") then
                            '
cambio de categoriaempiezo a contar en 0
                            cuenta
=0
                            cat
RS.Fields("IdRegion")
                            
'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("Comuna") %>","<%= RS.Fields("IdComuna") %>");
                        <% cuenta=cuenta+1
                        RS.MoveNext
                    wend %>
                    <% '
Limpiamos objetos
                    RS
.Close
                    Conn
.Close
                    Set RS 
Nothing
                    Set Conn 
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=0contador<array.lengthcontador++){
                            
// añade elementos nuestro combobox
                            
var optionObj = new Option( array[contador].campo1, array[contador].campo2 );
                            
formdatosenvio.lmcomunas.options[contador] = optionObj;
                        } 
// for                        
                    
// ComponerLista
                    
function BorrarLista(){
                        
formdatosenvio.lmcomunas.length=0;
                    }
                    
//Inicializamos
                    
ComponerLista (<%= iregion %> );
                    -->
                    
</SCRIPT> 
De ante les agradesco cualquier ayuda.
Saludos
Leo
__________________
Saludos
Leo
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 16:51.