Foro - Perl en Español

por **aredjack** » 2011-05-16 17:49 @784

¿Qué tal?

Finalmente se ha solucionado y me ha servido lo que me habías sugerido hace unos meses. Manipulando el cambio de las variables con la variable de indice y cambiándola en el dialplan de Asterisk, se empiezan a extractar una a una las diferentes materias y notas.

A continuación expongo el código, gracias:

¡¡éxitos!!

Sintáxis: [ Descargar ] [ Ocultar ]

Using perl Syntax Highlighting

my $i = 1;
while (($nombre,$apellido,$materia,$nota1,$seminarios,$actividades) = $sth->fetchrow_array()) {
    $AGI->set_variable("NOMBRE",      $nombre     );
    $AGI->set_variable("MATERIA$i",   $materia    );
    $AGI->set_variable("NOTA1$i",     $nota1      );
    $i++;
}
Coloreado en 0.002 segundos,  usando GeSHi 1.0.8.4

Sintáxis: [ Descargar ] [ Ocultar ]

Using text Syntax Highlighting

[macro]

exten => s,n,Playback(Grabacion/notas${ARG1})

exten => s,n,Set(VAR=1)

exten => s,n,While($["${VAR}"<="${TOTAL}"])

exten => s,n,SayAlpha(${MATERIA${ARG1}1})

exten => s,n,SayAlpha(${NOTA${ARG1}1})

exten => s,n,SayAlpha(${MATERIA${ARG1}2})

exten => s,n,SayAlpha(${NOTA${ARG1}2})

exten => s,n(siguiente),Set(VAR=$[${VAR}+1])

exten => s,n,EndWhile()Coloreado en 0.000 segundos,  usando GeSHi 1.0.8.4

Foro - Perl en Español

Extraer varias filas de una base de datos Mysql

Re: Extraer varias filas de una base de datos Mysql

Publicidad

¿Quién está conectado?