Frantz Dorsemaine
2010-12-16 13:53:42 UTC
Bonjour, voici un probleme que n'arrive pas à résoudre d'autant plus
que je n'ai aucun message d'erreur.
Voici 2 requêtes qui fonctionnent a travers PhpMyAdmin. mais la 2eme
ne fonctionne pas avec Perl DBD::mysqPP. Aucun message, le programme
est planté sans erreur ni résultat.
Avez vous une idée?
Voici la contig : MacOsX 10.6.5 Perl 5.8.9 DBD-mysqlPP-0.04
Je n'arrive pas à installer DBD::mysql.
Voici les requêtes :
1)
my $RqtSelectCtc=$Base->prepare("SELECT
id,id_genre,societe,interloc,adresse,adresse2,codpost,ville,tel,fax,web,id_class,id_etat,id_users
FROM tb_fiche_contact_anc
WHERE interloc LIKE '%DUPONT%'
");
$RqtSelectCtc->execute or die "$DBI::errstr";
($IdFct,$IdTypeFCt,$SocFCt,$InterlocFCt,$AddrFCt,$CompAddrFCt,
$CodpostFCt,$VilleFCt,$TelFCt,$FaxFCt,$SiteFCt,
$IdClassFCt,$IdEdtatFCt,$IdCtPhinFCt)=$RqtSelectCtc->fetchrow();
print "$InterlocFCt\n";
2)
our $RqtSelectCtc=$Base->prepare("SELECT
id,id_genre,societe,interloc,adresse,adresse2,codpost,ville,tel,fax,web,id_class,id_etat,id_users
FROM tb_fiche_contact_anc
WHERE interloc = 'DUPONT'
");
$RqtSelectCtc->execute or die "$DBI::errstr";
($IdFct,$IdTypeFCt,$SocFCt,$InterlocFCt,$AddrFCt,$CompAddrFCt,
$CodpostFCt,$VilleFCt,$TelFCt,$FaxFCt,$SiteFCt,
$IdClassFCt,$IdEdtatFCt,$IdCtPhinFCt)=$RqtSelectCtc->fetchrow();
print "$InterlocFCt\n";
que je n'ai aucun message d'erreur.
Voici 2 requêtes qui fonctionnent a travers PhpMyAdmin. mais la 2eme
ne fonctionne pas avec Perl DBD::mysqPP. Aucun message, le programme
est planté sans erreur ni résultat.
Avez vous une idée?
Voici la contig : MacOsX 10.6.5 Perl 5.8.9 DBD-mysqlPP-0.04
Je n'arrive pas à installer DBD::mysql.
Voici les requêtes :
1)
my $RqtSelectCtc=$Base->prepare("SELECT
id,id_genre,societe,interloc,adresse,adresse2,codpost,ville,tel,fax,web,id_class,id_etat,id_users
FROM tb_fiche_contact_anc
WHERE interloc LIKE '%DUPONT%'
");
$RqtSelectCtc->execute or die "$DBI::errstr";
($IdFct,$IdTypeFCt,$SocFCt,$InterlocFCt,$AddrFCt,$CompAddrFCt,
$CodpostFCt,$VilleFCt,$TelFCt,$FaxFCt,$SiteFCt,
$IdClassFCt,$IdEdtatFCt,$IdCtPhinFCt)=$RqtSelectCtc->fetchrow();
print "$InterlocFCt\n";
2)
our $RqtSelectCtc=$Base->prepare("SELECT
id,id_genre,societe,interloc,adresse,adresse2,codpost,ville,tel,fax,web,id_class,id_etat,id_users
FROM tb_fiche_contact_anc
WHERE interloc = 'DUPONT'
");
$RqtSelectCtc->execute or die "$DBI::errstr";
($IdFct,$IdTypeFCt,$SocFCt,$InterlocFCt,$AddrFCt,$CompAddrFCt,
$CodpostFCt,$VilleFCt,$TelFCt,$FaxFCt,$SiteFCt,
$IdClassFCt,$IdEdtatFCt,$IdCtPhinFCt)=$RqtSelectCtc->fetchrow();
print "$InterlocFCt\n";