Discussion :

[Jim_Nastiq]

DBI::db=HASH(0x21aba34)->disconnect invalidates 1 active statement handle (either destroy statement handles or call finish on them before disconnecting) at recup_list_index.pl line 31.

voila l'erreur pourtant le script marchouille(enfin un petit peu, il fonctionne pas tres bien quoi ) et la ligne 31 c'est juste la commande de déconnection :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

$dbh->disconnect();

est ce que quelqu'un a deja eu cette erreur?merci

[Mr6]

quelle idée de faire un disconnect !

plus sérieusement, mets un test :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
$dbh->disconnect() or warn "Echec de la déconnexion : $DBI::errstr\n";

de manière plus générale, "un problème à la déconnexion signifie habituellement que la connexion a déjà été perdue pour un raison ou une autre. Après la déconnexion, le descripteur de base de données ne peut plus être utilisé pour quoi que ce soit d'utile." dixit Tim Bunce

[Jim_Nastiq]

l'erreur est toujours la! mais j'ai trouvé(enfin je pense), l'erreur vient de mon code perl plus haut car je voulais recuperer la liste d'un des champs d'une table mais j'arrive pas a remplir mon tableau(enfin je sais pas faire quoi )! je pense que ca vient de la!

[Jim_Nastiq]

en fait c'est bizarre(pas tant que ca en fait) je recupere que le dernier element a chaque fois!

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
my $request = $dbh->prepare(qq{SELECT * FROM anomaly_follow_up WHERE Number = ? });
$request->execute( $num );
 
my $result = $request->fetchrow_array;
 
print $result;

je sais que mon probleme vient du fait que mon tableau ne se remplit pas mais je ne voit pas comment effectuer une boucle pour tout recuperer dans le tableau. et puis comme j'ai du mal a comprendre la doc DBI !

si quelqu'un a deja fait ca ou a une idée de passe-passe,merci

[Jim_Nastiq]

PS : j'ai evidement essayé avec: @result mais ca n'y change rien evidement comme je n'ai pas de boucle

[Mr6]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
while (my @result = $request->fetchrow_array)  {
.....
}

[Jim_Nastiq]

oui c'est bien ce que j'avais essayé de faire mais je recupere que la derniere valeur !

[Jim_Nastiq]

j'ai rien dit j'avais oublier de changer ma requete sql , ca marche tres bien en fait! je suis vraiment dans le gaz depuis lundi! ! va falloir arreter de faire le fou le week end