Opened by andi84 at 2011-01-11 18:19
User since
2011-01-11
7 Artikel
BenutzerIn
![[default_avatar]](/battie/theme/default/default_avatar.gif)
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
Hat einer von euch vielleicht eine Idee?
LG andi
Last edited: 2011-01-11 18:21:44 +0100 (CET)
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)