SQL Befehl Update Datenbank
Ingo
- perl
Hallo,
wer kann mir dem Script weiterhelfen.
Ich möchte eine Datenbank Updaten mit dem SQL Befehl Update.
Die Danten Dank ist eine Übung Sie hat drei Spalten ID, Name ,Tel
Mit $update kommt eine ID die ich updaten möchte was mache ich falsch??
Hier das Script.
#!c:/Perl/bin/perl -w
use strict;
use CGI qw(:standard);
use CGI::Carp qw(fatalsToBrowser);
use DBI;
my $DBH;
my $CGI;
$CGI = new CGI();
my ($ID,$Namen,$Tel,$update)=(param('ID'),param('Namen'),param('Tel'),param('update'));
$DBH = DBI->connect("DBI:CSV:datenbank=c:/Programme/Apache Group/Apache/cgi-bin")
or die "Konnte keine Verbindung zur Datenbank herstellen:$!";
my $STH =$DBH->do("UPDATE datenbank
SET ID = $ID, Namen = $Namen, Tel = $Tel
WHERE ID = $update")
or die "Konnte SQL-Statement nicht bereitstellen:$!";
$DBH->disconnect;
danke Gruß Ingo
versuchs mal hiermit..
my $STH =$DBH->do("UPDATE datenbank
Namen = '".$Namen."', Tel = '".$Tel."'
WHERE ID = '".$update."'")
korregierte version..
my $STH =$DBH->do("UPDATE datenbank set
Namen = '".$Namen."', Tel = '".$Tel."'
WHERE ID = '".$update."'")
ich lese gerade "datenbank", war das nen flüchtigkeitsfehler?
wenn dann muss da tabelle stehen
ich lese gerade "datenbank", war das nen flüchtigkeitsfehler?
wenn dann muss da tabelle stehen
Die datenbank ist die Tabelle ID,Namen;Tel
hier die Tabelle
#!c:/Perl/bin/perl -w
use DBI;
my $dbh = DBI->connect("DBI:CSV:f_dir = d:/testfiles")
or die "Konnte Datenbank nicht oeffnen!\n$!";
my $sth = $dbh->prepare ('CREATE TABLE datenbank
( ID char(30),
Name char(30),
Tel integer)')
or die "Konte datenbank nicht erstellen!$!";
$sth->execute();
$sth->finish();
$dbh->disconnect;
Vielleicht ist es der Feldname "Namen". In Deinem letzten Posting hast Du angegeben, dass Du eine Tabelle mit dem Feld "Name" (ohne n) angelegt hast.