ODBC Passwort übergeben (gelöst) (Datenbanken und Verzeichnisdienste)

[thread]16284[/thread]

ODBC Passwort übergeben [gelöst]

Tags: perl5 Oracle ODBC Ähnliche Threads

Leser: 19

Articles: hide open all | hide show old branches

+10 replies
ottto

2011-05-12 15:36
User since
2008-09-11
21 Artikel
BenutzerIn
Hallo,
ich möchte per Perl Daten in einer Oracle-DB ändern.
Hab dafür eine ODBC-Datenquelle (OracleClient10R2) eingerichtet. Kann diese an der Stelle auch erfolgreich testen, wenn ich das Passwort mitgebe.
Mein Script
Code (perl): (dl )

1 2 3 4 5 6 7 8

#!c:\perl\bin\perl.exe -w # Datenbank -- Zelleninhalt verändern use Win32::ODBC; $db = new Win32::ODBC('test'); $db->Sql("UPDATE Tab2 SET SP2='444333' where Sp1 = '333'"); $db->Close();
läuft aber auf den Fehler:
Can't call method "Sql" on an undefined value at C:\Ablage\p\DB_update.pl line 6.

Ich vermute, dass an der Stelle zumindest das Passwort zur DB-Verbindung fehlt.

Wie kann ich das übergeben?

Danke.
ottto

modedit Editiert von pq: code-tags hinzugefügt, tags ODBC, Oracle ergänzt
Last edited: 2011-05-12 15:53:36 +0200 (CEST)
- +9 replies
- GwenDragon
  
  2011-05-12 16:31
  User since
  2005-01-17
  14533 Artikel
  Admin1
  Du überprüfst nicht, ob in $db ein gültiger Wert ist?
  
  Versuche mal das testweise:
  
  Code (perl): (dl )
  
  1 2 3 4 5 6 7 8 9 10 11
  
  #!c:\perl\bin\perl.exe -w # Datenbank -- Zelleninhalt verändern use strict; use warnings; use Win32::ODBC; my $db = new Win32::ODBC('test') or Win32::ODBC::DumpError(); $db->Sql("UPDATE Tab2 SET SP2='444333' where Sp1 = '333'") or $db->DumpError(); $db->Close() or $db->DumpError();
  
  die Drachin, Gwendolyn
  
  Unterschiedliche Perl-Versionen auf Windows (fast wie perlbrew) • Meine Perl-Artikel
  - +8 replies
  - ottto
    
    2011-05-13 08:29
    
    User since
    2008-09-11
    21 Artikel
    BenutzerIn
    
    Hallo GwenDragon,
    vielen Dank für Deine Unterstützung!
    hab's probiert. Hier die Ausgabe.
    
    ---------- Error Report: ----------
    Errors for the package:
    Use of uninitialized value in concatenation (.) or string at C:/perl/site/lib/Win32/ODBC.pm line 730.
    Connection Number:
    Error number: 1005
    Error message: "[Oracle][ODBC][Ora]ORA-01005: Kein Kennwort angegeben; Anmeldung
    abgewiesen
    "
    -----------------------------------
    Can't call method "Sql" on an undefined value at C:\Ablage\p\DB_update.pl line 9.
    
    Ich hab noch nicht viel mit Perl gemacht, daher fehlt mir auch noch der Überblick.
    Ich werd mal parallel schauen, ob ich mit DBI weiter komme.
    Schönen Tag.
    ottto
    - +7 replies
    - GwenDragon
      
      2011-05-13 09:20
      
      User since
      2005-01-17
      14533 Artikel
      Admin1
      
      Hast du denn mit WIndows ODBC-Manager auch eine Verbindung (DSN) eingerichet?
      Siehe http://www.roth.net/perl/odbc/faq/#SystemDSN
      http://www.roth.net/perl/odbc/faq/
      
      Aber vielleicht liegt dir ja die Verwendung DBI eher.
      die Drachin, Gwendolyn
      
      Unterschiedliche Perl-Versionen auf Windows (fast wie perlbrew) • Meine Perl-Artikel
      - +6 replies
      - ottto
        
        2011-05-13 10:27
        
        User since
        2008-09-11
        21 Artikel
        BenutzerIn
        
        Hallo GwenDragon,
        die ODBC-Verbindung ist eingerichtet. Die kann man beim Einrichten auch testen.
        Es wird an der Stelle ein Passwort abgefragt. Damit funktioniert der Test dann auch. Ich weis halt nicht, wie man in meinem Script das Passwort mitgeben kann.
        Danke.
        ottto
        
        +5 replies
        
        GwenDragon
        
        2011-05-13 11:54
        
        User since
        2005-01-17
        14533 Artikel
        Admin1
        
        Statt
        
        Code: (dl )
        
        1 2
        
        my $db = new Win32::ODBC('test') or Win32::ODBC::DumpError();
        
        dann
        
        Code: (dl )
        
        1 2 3 4 5
        
        my $password = 'verysecretpassword'; my $user = 'John'; my $database_name = 'test'; my $db = new Win32::ODBC("DSN=$database_name;UID=$user;PWD=$password") or Win32::ODBC::DumpError();
        
        die Drachin, Gwendolyn
        
        Unterschiedliche Perl-Versionen auf Windows (fast wie perlbrew) • Meine Perl-Artikel
        
        +4 replies
        
        ottto
        
        2011-05-13 14:23
        
        User since
        2008-09-11
        21 Artikel
        BenutzerIn
        
        Hallo GwenDragon,
        jetzt komme ich schon etwas weiter.
        ottto
        
        ---------- Error Report: ----------
        Use of uninitialized value in subroutine entry at C:/perl/site/lib/Win32/ODBC.pm
        line 390.
        Errors for "54" on connection 1:
        Use of uninitialized value in concatenation (.) or string at C:/perl/site/lib/Win32/ODBC.pm line 730.
        Use of uninitialized value in concatenation (.) or string at C:/perl/site/lib/Win32/ODBC.pm line 730.
        Use of uninitialized value in concatenation (.) or string at C:/perl/site/lib/Win32/ODBC.pm line 730.
        Connection Number:
        Error number:
        Error message: ""
        -----------------------------------
        
        +3 replies
        
        GwenDragon
        
        2011-05-13 18:07
        
        User since
        2005-01-17
        14533 Artikel
        Admin1
        
        Der Code $db = new Win32::ODBC(.... klappt jetzt?
        die Drachin, Gwendolyn
        
        Unterschiedliche Perl-Versionen auf Windows (fast wie perlbrew) • Meine Perl-Artikel
        
        +2 replies
        
        ottto
        
        2011-05-18 11:39
        
        User since
        2008-09-11
        21 Artikel
        BenutzerIn
        
        Hallo GwenDragon,
        sorry, dass ich mich erst jetz melde. Ich war einige Tage weg.
        Der Code klappt aus meiner Sicht.
        Es kommt nur die unten genannte ErrorMeldung. Wenn ich absichtlich einen falschen User mitgebe, bringt er dann auch die entsprechende Meldung:
        
        Error number: 1017
        Error message: "[Oracle][ODBC][Ora]ORA-01017: invalid username/password; logon denied"
        
        Also gehe ich davon aus, dass der Zugang funktioniert.
        Danke.
        ottto
        
        ottto
        
        2011-05-25 13:46
        
        User since
        2008-09-11
        21 Artikel
        BenutzerIn
        
        Hallo,
        ich hab den DB-Zugriff mit DBI hin bekommen.
        Vielen Dank für die Unterstützung.
        Ich hab noch ein Problem mit einer Fehlerabfrage, werde dazu aber einen neuen Thread erstellen.
        ottto

View all threads created 2011-05-12 15:36.