Perl dbi et mysql : fetchrow_array failed
Bonjour à tous,
Tout d'abord, excusez moi si ma question est bete mais je débute juste et n'arrive pas à trouver de solution sur le net depuis ce matin, je vous appelle donc a l'aide :)
Je cherche simplement à récupérer une liste via une requete SQL.
Comme ceci :
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
| $dbh = DBI->connect( "dbi:mysql:dbname=$BaseDeDonnees;host=$NomHote;",$login, $MotDePass ) or die "Connection impossible à la base de donnees $BaseDeDonnees !";
$sth = $dbh->prepare("SELECT entity_id FROM catalog_product_entity");
$sth->execute()or die $DBI::errstr;
while ( @id = $sth->fetchrow_array())
{
$prd_id = @id;
$marque = getManufacturer($prd_id,$marque_id);
$name = getName($prd_id,$name_id);
$shortDesc = getShortDescription($prd_id,$desc_id);
$prix = getPrice($prd_id,$prix_id);
$sku = getSku($prd_id, $sku_id);
$urlPrd = $baseURL.getUrlPrd($prd_id, $urlPrd_id).".html";
$urlImg = $baseUrlImg.getUrlPrd($prd_id, $urlImg_id);
$ecoTaxe = getEcoTaxe($prd_id, $ecoTaxe_id);
$ean = getEan($prd_id, $ean_id);
print "$name\n";
} |
Alors que genre cela fonctionne sur un autre script, ici le script sort de la boucle après la première occurrence.
Citation:
DBD::mysql::st fetchrow_array failed: fetch() without execute() at exportEffiliation.pl line 58.
Quelqu'un aurait il une explication svp ?
Merci d'avance
