Jan: Über Perlscript Microsoft SQL 2000 Datenbank abfragen!

Beitrag lesen

Hallo,

ich möchte ein bestehendes Perlscript, welches den Inhalt einer Accessdatenbank abfragt, so ändern, dass es nicht mehr eine Access sondern eine MS SQL 2000 Datenbank abfragt.

Hier das Script:#!D:\Perl\bin

use DBI;
use CGI;

my $dsn = "DBI:ODBC:test";
my $dbh = DBI->connect($dsn);

my $SQL = "SELECT * FROM adressen";
 my $Abfrage = $dbh->prepare($SQL);
 $Abfrage->execute();

print "Content-type: text/html\n\n";
print "<HTML>\n";

print "<BODY BGCOLOR=#FFFFFF>\n";
print "<CENTER>\n";
print "<b>Inhalt der DB :</b><BR><br>\n";

while($Row=$Abfrage->fetchrow_hashref)
{
#  print "$Row->{name} \n $Row->{email}\n";
   print "$Row->{name}   $Row->{email} <br>";

}

print "\n";

print "</CENTER>\n";
print "</BODY></HTML>";

Ich kann es nicht 1 zu 1 übernehmen, dashabe ich gemerkt!
ODBC Verbindung ist richtig eingestellt... daran kann es also nicht liegen. irgendetwas an der syntaxmuss anders sein

Danke schon mal

MFG

Jan