IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Langage Perl Discussion :

[MySql] Manipulation resultat requetes


Sujet :

Langage Perl

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre éclairé Avatar de Katachana
    Profil pro
    Inscrit en
    Avril 2007
    Messages
    755
    Détails du profil
    Informations personnelles :
    Localisation : France, Loire Atlantique (Pays de la Loire)

    Informations forums :
    Inscription : Avril 2007
    Messages : 755
    Par défaut [MySql] Manipulation resultat requetes
    Bonjour,

    Voila mon code :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    23
    24
    25
    26
    27
    28
    29
    30
    31
    32
        my $db_trap =
          "SELECT * FROM traps ;";
        verb("Mysql Query: $db_trap");
        my $sth_trap = $dbh->prepare($db_trap);
        if ( !$sth_trap->execute() ) {
            print
    "CRITICAL ERROR - Unable to execute '$db_trap' on server '$HOSTNAME' connected as user '$USERNAME' - $DBI::errstr\n";
            exit $ERRORS{"CRITICAL"};
        }
     
      my $db_trap_relation ="SELECT * FROM traps_service_relation ;";
        verb("Mysql Query: $db_trap_relation");
        my $sth_trap_relation = $dbh->prepare($db_trap_relation);
        if ( !$sth_trap_relation->execute() ) {
            print
    "CRITICAL ERROR - Unable to execute '$db_trap_relation' on server '$HOSTNAME' connected as user '$USERNAME' - $DBI::errstr\n";
            exit $ERRORS{"CRITICAL"};
        }
     
        my $compteur=1;
       while ( my @list_trap = $sth_trap->fetchrow_array ) {
                                while ( my @list_trap_relation = $sth_trap_relation->fetchrow_array ) { 
                              if($list_trap[0] == $list_trap_relation[1]){
                               my $db_nom_service = "SELECT service_description FROM service WHERE service_id = '$list_trap_relation[2]' LIMIT 1;";
                                  my $sth_nom_service = $dbh->prepare($db_nom_service);
                                  $sth_nom_service->execute();  
                                  my $nom_service = $sth_nom_service->fetchrow_array();
     
                              }
                              }
       $compteur=$compteur+1;
      }
    J'aimerais pouvoir incrémenter les données contenu dans list_trap_relation a chaque boucle de list_trap.
    Apres avoir fait quelque test , je me rend compte que seul la premiere valeur de list_trap est accessible dans :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    while ( my @list_trap_relation = $sth_trap_relation->fetchrow_array ) {
    En gros j'ai une liste d'un champ ID dans la premiere table @list_trap, et j'aimerais comparer chaque valeur de ce champs aux valeur du champs TEMP_ID contenu dans @list_trap_relation

    Merci pour votre aide.

  2. #2
    Membre éprouvé
    Avatar de Jasmine80
    Femme Profil pro
    Bioinformaticienne
    Inscrit en
    Octobre 2006
    Messages
    3 157
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Âge : 45
    Localisation : Royaume-Uni

    Informations professionnelles :
    Activité : Bioinformaticienne
    Secteur : Santé

    Informations forums :
    Inscription : Octobre 2006
    Messages : 3 157
    Par défaut
    Bonjour,


    Voici ce que je ferais :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    23
    24
    25
    26
    27
    28
    29
    30
    my $db_trap = "SELECT * FROM traps ;";
    my $sth_trap = $dbh->prepare($db_trap) or die "ERROR\n";
    $sth_trap -> execute or die "Could not execute SQL statement ... maybe invalid?";
    my @list_trap;
    my %H_list_trap;
    while (@list_trap=$sth_trap->fetchrow_array)
    {
            $H_list_trap{$list_trap[0]}=1;
    }
     
     
     
    my $db_trap_relation ="SELECT * FROM traps_service_relation ;";
    my $sth_trap_relation = $dbh->prepare($db_trap_relation) or die "ERROR\n";;
    $sth_trap_relation -> execute or die "Could not execute SQL statement ... maybe invalid?";
    my @list_trap_relation;
    my %H_list_trap_relation;
    while (@list_trap_relation=$sth_trap_relation->fetchrow_array)
    {
            $H_list_trap_relation{$list_trap_relation[1]}=1;
    }
     
     
    foreach my $Key (%H_list_trap)
    {
            if (exists $H_list_trap_relation{$Key})
            {
                    ...
            }
    }

    Jasmine,

Discussions similaires

  1. exporter resultat requete mysql en excel
    Par Xeuch dans le forum Langage
    Réponses: 4
    Dernier message: 13/08/2013, 10h27
  2. [MySQL] message php si requete mysql sans resultat
    Par heteroclite dans le forum PHP & Base de données
    Réponses: 2
    Dernier message: 07/10/2006, 12h31
  3. probleme resultat requete MYSQL
    Par cilies38 dans le forum Bases de données
    Réponses: 8
    Dernier message: 10/04/2006, 17h23
  4. Resultat requete dans une seule colonne
    Par mathieu--g dans le forum Sybase
    Réponses: 2
    Dernier message: 08/07/2003, 13h42
  5. Resultat requete SQL
    Par PierDIDI dans le forum Bases de données
    Réponses: 2
    Dernier message: 23/07/2002, 13h43

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo