[PERL] Liste des tables dans Access.... SQL commande ?

Liste des tables dans Access.... SQL commande ? [PERL] - SQL/NoSQL - Programmation

Marsh Posté le 18-04-2002 à 15:17:15    

Re bonjour à tous et a toutes,
 
Bon, jevais vous semblez bizarre (si si) mais je dois gérer un script perl qui va chercher des données dans access et me les ressortir.....
 
Je sais Access... c'est pas le pied, y a mieux etc...
mais, je ne peux pas faire autrement car la base c'est pas moi qui la remplis.. (la vie est ainsi faites).
 
donc afin de me faciliter la vie, je souhaiterais faire un script, qui me sors tous les noms de table inclus dans cette base, puis en prenant chaque nom de table, me sorte la liste des champs....
 
pour le perl pas de souci... C'est sur la commande SQL que je peche.....
 
LIST TABLES qui marche très bien sous Mysql ne fonctionne pas du tout sous Access....
 
quelqu'un connaitrait t-il la commande SQL qui permet de faire cela sous access ??
 
Un tutorial ou un site web consacré a ce probleme ??
 
merci d'avance
cadou

Reply

Marsh Posté le 18-04-2002 à 15:17:15   

Reply

Marsh Posté le 18-04-2002 à 19:57:03    

désolé de ne pouvoir apporter de flotte à ton moulin :D mais quel(s) module(s) utilise-tu pour te connecter à Access via Perl ?
 
Juste DBI.pm ou autre chose encore ?


---------------
Samsung Galaxy S1 -> Samsung Galaxy S2 -> Samsung Note 2 -> Huawei Ascend Mate 7 -> ZTE Axon 7 -> OnePlus 6T -> Oppo Find X2 PRO -> Google Pixel 9 PRO XL
Reply

Marsh Posté le 18-04-2002 à 20:35:08    

:hello:
 
Cherche ya un Package ki s'appelle DBI::ADO
ca veut tout dire ;)


---------------
Tout à commencé par un rêve...
Reply

Marsh Posté le 19-04-2002 à 08:20:36    

Ah... Pas con dobermann, j'y avais pas pensé...
 
ben je me connecte comme ceci :
 
sub askbase {
($bdd, $sql) = @_; my $f=0; my @renvoi="";
 
#######################Connexion a la base de donnees############################
my $dbh = DBI->connect("DBI:ODBC:driver=Microsoft Access Driver (*.mdb);dbq=database/$bdd.mdb;" );
#######################Lecture des enregistrements#############################
$dbh->{LongReadLen} = 2**16 - 8 ;
$sth=$dbh->prepare("$sql" );
$sth->execute();
while (@fetchy = $sth->fetchrow_array()) {
$renvoi[$f] = join('|', @fetchy); $f++;
}
$sth->finish();
$dbh->disconnect();
return(@renvoi);
}#end sub ask_base
 
@+
cadou

Reply

Marsh Posté le 19-04-2002 à 15:19:04    

ben non rien a faire... J'arrive pas a sortir la liste des tables de cette *#~%% de table...
 
que ce soir avec DBI::ADO DBI::ODBC ou autre...
 
La commande SQL que j'utilise est on ne peut plus simple.
 
LIST TABLES
 
Une idée ??
 
@+
cadou

Reply

Marsh Posté le 19-04-2002 à 15:22:57    

la norme ODBC donne la commande SHOW TABLES FROM Mabase
 
moi ca marche pour un truc en jdbc multi base  
j'ai tester sous mysql, postgresql et oracle
 
ODBC c l'oueuvre de kro$oft donc ca devrai le faire sous Access

Reply

Marsh Posté le 19-04-2002 à 15:31:18    

Hello,
 
je viens d'essayer dans l'ordre :
 
SHOW TABLES FROM "catalogue"
SHOW TABLES FROM 'catalogue'
SHOW TABLES FROM "catalogue.mdb"
SHOW TABLES FROM 'catalogue.mdb'
SHOW TABLES FROM catalogue
SHOW TABLES FROM catalogue.mdb
 
sous DBI::ADO on me dit :
 
Can't call method "EOF" on an undefined value at C:/Perl/site/5.6.0/lib/DBD/ADO.pm line 298.  
 
sous DBI::ODBC on me dit :
 
Can't call method "execute" on an undefined value at c:/program files/apache group/apache/i-tech/cfs/cgi-bin/aa_catalogue/templatetest.cgi line 30.  
 
Le genre de truc qui enerve grave...
Surtout quand tu sais que cela fais un mois que je suis sur le sujet !!
 
 :gun:  :gun:  :gun:  :gun:  
 
Merci quand meme
Quelqu'un a une autre idée ??
 
@+
cadou

Reply

Marsh Posté le 19-04-2002 à 18:51:28    

tu l'utilise comment ?
ta lu le How TO avant ?
 
l'adresse pour savoir comment l'utiliser
http://www.perldoc.com/perl5.6.1/lib/DBD/ADO.html

 

[jfdsdjhfuetppo]--Message édité par SteF_DOBERMANN--[/jfdsdjhfuetppo]


---------------
Tout à commencé par un rêve...
Reply

Marsh Posté le 24-04-2002 à 14:56:26    

oui je l'ai lu...
rien a faire je suis toujours dans les chous....
 
Putain si je trouve un jour je monte 5 sites web pour donner la reponse en 5 langues differentes.....
Comme cela on trouvera la reponse plus faciulement...
 
Mais bon cela ne fais pas avncer le schmilblick tout cela.....
 
 
Quelqu'un aurait une idée SVP ??
 
@+
cadou
et merci a tous de se penchger sur ce probleme a 2 centimes d'euros...

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed