Problema con los combos para enlazarlos

Foros de discusión -> Básico

Lun Abr 24, 2006 9:25 am

jcuza
Perlero Nuevo

Registrado: 06 Abr 2006
Mensajes: 5

Problema con los combos para enlazarlos

Buenos días amigo. ¿Alguien me podría ayudar?. Lo que quiero es que lo seleccionado en el primer combo se carge en otro combo. Ejemplo:

Primer combo tengo:

Cita:

Computadora
Redes

Si yo selecciono computador me debería de mostrar en el segundo combo:

Cita:

Cable malo
Teclado malo
etc

Mi código del segundo combo es este y el select del sql está bueno. Otra cosa. El primer combo también carga bien.

Código:

($mun,$dep,$template,$driver,$usuario1,$clave1)=@_;
$driver = "dbi:Pg:dbname=soporteservicio;host=localhost;port=5432";
if ($dbh = DBI->connect($driver,"jcuza","123")){
      $operacion="select b.nombre_servicio_espe from tservicios a, tservicios_especificos b where a.cod_servicio =
         b.cod_servicio and a.cod_servicio = '$dep'";
      $statement=$operacion or die "\n Error($DBI::err): $DBI::errstr\n)";
      $statement->execute or die "\n Error($DBI::err): $DBI::errstr\n";

      my @loop;
         my ($nmunicipio,$dmunicipio);
         while (($nmunicipio,$dmunicipio)=$statement->fetchrow_array){
            $mun1=$dmunicipio;

            if ($mun eq "$nmunicipio"){ $select_mun="selected='true'";
            }else{
               $select_mun ="";
            }
            my %loop_mun=(var_mun =>"<OPTION $select_mun value=$nmunicipio>$mun1</option>");
            push (@loop,\%loop_mun);
         }
         $template -> param(loop_mun => \@loop);
   }
   return ($template);

Lun Abr 24, 2006 10:17 am

macgregor
Perlero Frecuente

Registrado: 09 Dic 2004
Mensajes: 117
Ubicación: españa



Este tema ya se ha tratado en el foro, puedes ver las posibles soluciones en este link. http://perlenespanol.baboonsoftware.com/foro/viewtopic.php?t=848 Espero que te sea útil. Un saludo

Lun Abr 24, 2006 12:07 pm

jcuza
Perlero Nuevo

Registrado: 06 Abr 2006
Mensajes: 5

problema con los combos para enlazarlos

gracias mi pana pero necesito es saber exactamente en q parte del codigo tengo el error ademas estoy trabajando con perl no php

Lun Abr 24, 2006 12:16 pm

explorer
Moderador

Registrado: 24 Jul 2005
Mensajes: 4082
Ubicación: Valladolid, España



La línea de error te la dice el propio Perl. Ejecuta tu programa con la opción use warnings; para obtener más información. Si lo ejecutas como un cgi, el mensaje de error estará en los registros de actividad del servidor web.

	Foros de discusión -> Básico	Todas las horas son GMT - 6 Horas
Página 1 de 1