Also, ich habe bis jetzt folgendes:
#!/Perl/bin/perl
use strict;
use Win32::ODBC;
use Data::Dumper;
my $db = undef;
# Win32::ODBC #
$db = new Win32::ODBC("MYANGEB.DB");
my %Felder = $db->DataHash;
print Data::Dumper::Dumper( %Felder );
END {
if( defined $db ){
$db->Close();
}
}
Ausgabe:
Quote$VAR1 = 'REMARKS';
$VAR2 = undef;
$VAR3 = 'TABLE_CAT';
$VAR4 = undef;
$VAR5 = 'TABLE_NAME';
$VAR6 = undef;
$VAR7 = 'TABLE_SCHEM';
$VAR8 = undef;
$VAR9 = 'TABLE_TYPE';
$VAR10 = undef;
Supi.
Wenn ich jetzt versuche mit diversen SQL-Statements was abzufragen bringt das logischerweise kein Ergebnis, weil die Felder ja angeblich alle nicht definiert sind.
Irgendwie komme ich nicht weiter. Egal was ich versuche, ich komme nicht an die Daten.
Probiert es doch mal aus.
Das blöe Programm welches diese Datenbank benutzt kann man sich im Netz runterladen unter
http://www.my-next-home.de
mfg pktm