perl und Mysql

Hi @ all,
bin gerade dabei mit Perl etwas zu Spielen,
nun möchte ich ne Verbindung mit Mysql aufbauen aber irgendwie mag dass net so.

Habe den Myodbc treiber installiert und benutze Win32::ODBC.

use Win32::ODBC;
$DriverType = "MySQL ODBC 3.51 Driver";  
$DSN = "SQL1DSN";  
$DataBase = "test.db";  

bekomme keine Fehlermeldung aber auch nichts anders.

Was mache ich falsch???

Thx im Voraus

Bitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben

Content-ID: 37787

Url: https://administrator.de/contentid/37787

Ausgedruckt am: 25.11.2024 um 14:11 Uhr

3 Kommentare

Neuester Kommentar

hallöchen,

hast du die DSN auch unter Windows eingetragen???
Und es muss eine System DSN sein.

und eigentlich musst du keine DB angeben das übernimmt ja ODBC für dich.

bei fragen melden

mfg godlike P

Hi,
hatte einen benutzer DSN erstellt habe jetzt ein System DSN erstellt.

Wie kann ich denn ne SQL abfrage oder ähnliches starten?

so dürfte das klappen:

#!/usr/bin/perl -w

# Wir verwenden ein Windows-spezifisches Perl-ODBC-Modul
use WIN32::ODBC;

# Wir wollen uns etwas disziplinieren beim Einsatz von Perl
use strict;

# ======================================================================
# Variablen
# ======================================================================
# Es muß eine System-DSN mit dem unten stehenden Namen definiert sein
my $DSN = "datasourcename";  


# Unser Bezeichner zum Zugriff auf eine geöffnete Datenbankinstanz

my $db_user = "user";  
my $db_pass = "pass";  

# Hier landen die jeweils zurück gegebenen Zeilen
my %Zeile;


$DB = new Win32::ODBC($DSN);
my $sql_stmt = "select * from table";  

$DB->Sql($sql_stmt);

     while($DB->FetchRow()){
       %Zeile = $DB->DataHash();
       print $Zeile{"spalte1"}."\t".$Zeile{"spalte2"};  

     }
$DB->Close();