Alle Tabellen selektieren: Wie ? (Datenbanken und Verzeichnisdienste)

[thread]3363[/thread]

Alle Tabellen selektieren: Wie ?

havi

2003-10-21 12:10

User since
2003-08-04
2036 Artikel
BenutzerIn

Hi!

Hab folgendes Problem!

Ich hab eine Access-Datenbank mit 50 Tabellen!

Nun will ich alle Tabellen in dieser Datenbank selektieren!

Hier mein Code:

Code: (dl )

#!/usr/bin/perl

use strict;
use warnings;
use DBI;

my $mdb_file = "d:\\access.mdb";

my $connection_string = q{;Provider=Microsoft.Jet.OLEDB.4.0;Jet OLEDB:System database=d:\\system.mdw};

my $cn = DBI->connect("dbi:ADO:Data Source=".$mdb_file.$connection_string, "");

my $alles = $cn->selectall_arrayref("SELECT * FROM SchluesselwortDasIchNichtWeiss");

foreach my $row ( @{$alles} )  {
   print join ("\t", @{$row}), "\n";
}

1;

Kann mir jemand helfen ?

Gruss\n\n

Perl-Zeitung - http://perl-zeitung.at/
Perl-Blog - http://usr-bin-perl.blogspot.com/

Strat

2003-10-30 02:19

User since
2003-08-04
5246 Artikel
ModeratorIn

da muss man in der from-clause die Namen der Tabellen angeben, z.B.
SELECT * FROM table1, table2, table3
und damit du eine zuordnung zwischen den tabellen hast, solltest du sie irgendwie verknuepfen, z.B.
SELECT * FROM table1, table2, table3 WHERE table1.id = table2.id AND table1.id = table3.id

wenn du gleiche feldernamen in verschiedenen Tabellen hast, wird SQL da jedoch ein wenig durcheinanderkommen. dann kannst du aliasnamen vergeben, z.B:
SELECT table1.id AS id1, table2.id AS id2, ...weitere spaltennamen... FROM table1, table2, table3 WHERE table1.id = table2.id AND table1.id = table3.id

perl -le "s::*erlco'unaty.'.dk':e,y;*kn:ai;penmic;;print"
http://www.fabiani.net/

havi

2003-10-30 10:09

User since
2003-08-04
2036 Artikel
BenutzerIn

Vielen Dank!
Genau das hab ich gesucht!

Gruss

Perl-Zeitung - http://perl-zeitung.at/
Perl-Blog - http://usr-bin-perl.blogspot.com/

View all threads created 2003-10-21 12:10.