Probleme mit Insert, Update und Delete per ODBC und MySQL (gelöst) (Datenbanken und Verzeichnisdienste)

[thread]15836[/thread]

Probleme mit Insert, Update und Delete per ODBC und MySQL [gelöst]

Leser: 16

Articles: hide open all | hide show old branches

+6 replies
andi84

2011-01-11 18:19
User since
2011-01-11
7 Artikel
BenutzerIn
Hallo,

ich habe mir schon fast das ganze Forum durchgelesen und ich hoffe ich den passenden Beitrag nicht überlesen oder übersehen.

Wir wollen per Perl einige SQL-Abfragen starten. Mit "select" Funktioniert alles wunderbar nur wenn wir Insert, Update oder Delete Befehle verwenden wollen. Diese werden ohne einen Fehler ausgeführt, nur ist in der DB nichts von den Befehlen zu sehen. Als hätte er nicht gemacht.

Wenn ich bei einen Insert Befehl den Primärschlüssel kreuze spuckt er diesen Fehler auch sofort aus.

Beispielcode
Code: (dl )

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20

use strict; use warnings; use DBI; binmode(STDOUT , ":encoding(cp437)" ); my $user = 'klaus'; my $pass = 'dieter'; my $dns = 'Hamster'; my $driver = "DBI:ODBC:$dns"; my $dbh = DBI->connect($driver,$user,$pass, { RaiseError => 0, AutoCommit => 0 })|| die "Database connection not made: $DBI::errstr"; my $sth = $dbh->prepare( "delete from hamster", undef); $sth->execute(); $sth->finish(); $dbh->disconnect();
Hat einer von euch vielleicht eine Idee?

LG andi
Last edited: 2011-01-11 18:21:44 +0100 (CET)
- renee
  
  2011-01-11 18:23
  
  User since
  2003-08-04
  14371 Artikel
  ModeratorIn
  
  Stell RaiseError mal auf 1, genauso wie AutoCommit...
  OTRS-Erweiterungen (http://feature-addons.de/)
  Frankfurt Perlmongers (http://frankfurt.pm/)
  --
  
  Unterlagen OTRS-Workshop 2012: http://otrs.perl-services.de/workshop.html
  Perl-Entwicklung: http://perl-services.de/
- topeg
  
  2011-01-11 18:26
  
  User since
  2006-07-10
  2611 Artikel
  BenutzerIn
  
  setze entweder "AutoCommit => 1" oder vor $dbh->disconnect $dbh->commit(). Denn ansonsten verwerfen die DBs die änderungen (machen ein "Rollback").
- +3 replies
- andi84
  
  2011-01-11 18:31
  
  User since
  2011-01-11
  7 Artikel
  BenutzerIn
  
  In dem Moment wo ich auf Thread Abschicken geklickt habe und mir zu 1xx mal den Code angeschaut habe ist mir genau dies auch in den Sinn gekommen. Fehler gelöst, es klappt nun alles wunderbar, Entschuldigung.
  
  Der Thread kann gerne gelöscht werden.
  
  LG Andi und danke für die schnelle Antwort
  - +2 replies
  - pq
    
    2011-01-11 18:35
    
    User since
    2003-08-04
    12208 Artikel
    Admin1
    
    2011-01-11T17:31:00 andi84
    Der Thread kann gerne gelöscht werden.
    
    nö, aber er kann auf gelöst gesetzt werden. kannst du auch selber machen. es gibt einen button direkt unter dem titel.
    ich mach das mal.
    
    warum soll man gelöste threads immer gleich löschen? =)
    Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
    lesen: Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
    - andi84
      
      2011-01-12 10:45
      
      User since
      2011-01-11
      7 Artikel
      BenutzerIn
      
      Da der Fehler fast etwas zu offensichtlich war, nur meine Brille hatte diese Zeile ausgeblendet -.-

View all threads created 2011-01-11 18:19.