dgr243

Super passte fastkomplett.. fehlten nur die Klammern um die einzelnen Werte der SQL Anweisung, aber die hab ich dann ma hinzu gebastelt. Vielen Dank soweit!

Guten morgen zurück. Du bist aber 4silbig heute morgen T - 7 stunden bis abfahrt nach bispingen :marine:

*So mal vom Nebenjob aus meld* Naja zu tief ist auch nicht gut. Also normale Strassen sollte man schon noch fahren können. Bei Kopfsteinpflaster wirds dann teilweise schon schlechter, aber wo ich mich richtig drüber aufregen könnte sind Einfahrten in Parkplätze... da muss ich dann auch ab und an mal schief hoch statt im 90° winkel.. aber damit gefährde ich ja keinen

*lol* So so tiefer und härter ... hatten wir da nicht neulich erst ne diskussion drum? :floet: Nee is ja auch egal .. das "Ich fahre beser schräg in diese einfahrt" Syndrom kommt mir seeeehr bekannt vor Ich mach dann jetzt aber auch FA hier... mein Perl Prob will sich derzeit nicht lösen lassen .. naja morgen is auch noch n Tag Und dann ein Wochenende Bispingen und dann 4 Wochen BS :eek: Verdammt wieso is der Block sooo lang ??? Naja bis morgen ersma !

Hallo Enrico, ok die CSV Datei als Datei und nicht als SQL DB zu öffnen ist natürlich auch ein gangbarer weg Ich habe jetzt folgendes Perl Script und nun das Problem, dass die Datenbank meckert, dass sie mehrere Argumente erwartet aber nur eins bekommt: use DBI; use diagnostics; # Declare variables my $dsn = Access; #DSN im ODBC my @liste; my @eintrag; # Makes a Datebase Handler my $dbh = DBI->connect("DBI:ODBC:$dsn") or die DBI::errstr; #ODBC Access open(CVSFILE,"c:\\repo\\mappe1.csv") or die "Cannot open source file"; while (<CVSFILE>) { @eintrag = split(/;/,$_); my $sth = $dbh->prepare("insert into temps values (@eintrag)") or die $dbh->errstr; $sth->execute(); } $dbh->disconnect(); close(CVSFILE); Ich vermute, dass die Auflösung des SQL Statements nicht so funzt wie ich mir das denke.... @eintrag sollte an dieser Stelle zu einem String der form "Wert1,Wert2,Wert3,[..]" interpoliert werden, was so leider nicht geschieht .... Könnte ich nicht theoretisch nach dem Split folgende Zuweisungen treffen: #Hier nur die while Schleife nach dem Öffnen der Datei while (<CVSFILE>) { @eintrag = split(/;/,$_); my $wert1 = $eintrag[0]; my $wert2 = $eintrag[1]; my $statement = "$wert1 . , . $wert2" my $sth = $dbh->prepare("insert into temps values ($statement)") or die $dbh->errstr; $sth->execute(); } In dem Codeschnipsel will allerdings auch irgendwas noch nicht so wie ich das will ... [OT] Ich sag nur gewachsene Strukturen .. die Access DB existiert schon länger und soll nicht ersetzt werden. Dennoch soll das ganze ins Web bzw. vorab mit CSV Dateien gefüttert werden... [/OT]

Ok die werte sind durch semikolon getrennt, nicht durch komma ... na gut, dass wird na klar schwer das als getrennte werte auszugeben wie trenne ich denn jetzt mal am besten die werte mit komma? bin relativer perl newbie, deswegen grad etwas ratlaos... Spaltentrenner "\\;" da ein einfach ";" sonst als trenner der argumente für dbd:csv gewertet werden würde. deshalb hab ich das mit dem "\\" entwertet, wie das vorgeschlagen wurde in der dbd:csv hilfe ... sollte das nicht richtig sein ?

Das natürlich auch eine hoch interessante Idee sich noch ein positives Argument einfallen zu lassen *lach* nee im Ernst mein Geschmack isses nicht von der Form her, aber wenns dir gefällt is ja alles in Ordnung Was die Ledersitze und den Mini angeht: Handtuch mitnehmen! Ledersitze heizen sich ganz extrem auf. Das kann sogar bei ner Jeans schon kritisch werden. Mit nackter Haut da drauf will ich mir gar nicht vorstellen. Mir fällt der Vergleich Herdplatte ein.... mein alter Wagen hatte schwarzes Leder... das tat wie gesagt schon mit Jeans teilweise aua :eek:

Moin zusammen. Folgende Aufgabenstellung: Nimm eine CSV Datei der Form: "wert1;wert2;[..];wert10" und packe diese per DBI und DBD::ODBC in eine bestehende Access Tabelle. Mein Ansatz ist bis jetzt folgender: use DBI; # Declare variables my $dsn = Access; #DSN im ODBC my $db = 'c:/repo'; #Ort der CSV datei my $separator='\\;' ; #Spaltentrenner ";" my $filename = 'mappe1.csv'; # Makes a Datebase Handler my $dbh = DBI->connect("DBI:ODBC:$dsn") or die DBI::errstr; #ODBC Access my $dbh2 = DBI->connect("DBI:CSV:f_dir=$db;csv_sep_char=$separator") or die "öffnen: DBI::errstr"; #CSV Datei c:\repo\mappe1.csv $dbh2->{csv_tables}->{temps} = {'file' => $filename}; my $sth2 = $dbh2->prepare("select * from temps") or die "1: $dbh2->errstr"; $sth2->execute() or die "2: $dbh2->errstr"; while (my @row = $sth2->fetchrow_array()) { my $sth = $dbh->do("insert into temps values (@row)") or die "3: $dbh2->errstr"; } $dbh->disconnect(); $dbh2->disconnect(); Als Fehlermeldung erhalte ich: Und irgendwo hab ich da jetzt nen kräftigen Block im Kopp wo ich net weiterkomm... Würde mich sehr freuen, wenn mir da wer nen Tip geben könnte. Alternativ nehme ich auch gerne Lösungsvorschläge, wie es komplett anders gehen könnte

Crash: Naja die können sich ja ma vertippen *g* Grueni: Also 140 dann aber bitte auch in der Mitte zwischen linker und rechter Spur. Die Häkelrolle muss ja auch wirklich stimmen.. Alelrdings brauchste noch graue Haare und grauen Bart Wir wollen ja auch alle Klischees erfüllen *g*

Guck, selbst daran kann ich mich net erinnern Ingh: Ja selbst da hab ich noch mecker bekommen. sie wollte nur Entfernungsangaben und keine Landmarken .. naja sind halt doch net alle Frauen gleich Crash: Welcher URL? Aber leicht bewölkt heisst strahlend blauer Himmel. Im Moment jedenfalls

chippie: Hmm ich glaub aufgrund des hohen Adrenalinausstosses währned du fahrstunde hattest und ich hinten sass kann ich mich nicht mehr erinnern :floet: Hmm dazu hab ich ne nette anekdote: Ich erklär meiner frau den weg. Nehme extra Landmarken und nicht sonne sachen wie "nach 300m rechts" und so und was passiert? sie motzt mich an, ob ich ihr das nicht mit meterangaben erklären kann.... frauen kann mann es aber auch nicht recht machen *g* BTW Steffi: Du hast nicht zufällig lust dieses WE nach bispingen zum opeltreffen zu kommen? -> http://www.opelteam-bispingen.de falls du doch lust hast .....

Klar macht der das mit .. wenn dir nicht vorher so ein weibliches Problem wie Einparken über den Weg läuft :floet: *duck und wegrenn*

Richtich. Allerdings lese ich mir dir Wegbeschreibung meines Zieles auch vorher ganz genau durch.. Dadurch passiert mir das recht selten, dass ich mich verfahr. Aber wenn dann frag ich, bzw. geh inne Tanke (*an soap treffen denk*) Steffi mal eben :hodata Schulligung .. :confused .. musste grad ma sein :floet: Edit: Stimmt grueni hat das wirklich schwer mittem Fragen

Huch mixki? :confused: Gar nicht mehr über den Dingen fahren? Der ist ja doch ne ganze Ecke niedriger Aber glückwunsch zum Neuerwerb. Möge er dir lange Spasss und Freude bereiten, wenig rosten und allzeit beulenfrei bleiben! Hawki: 112 Euro für nen Auspuff? Wo kaufst du denn? Oder ist die Montage da mit drin? :confused: BTW: Wenn jemand Ahnung von Perl, insbesondere DBI und DBD:CSV hat, bitte ma per PN melden :floet:

[Mainzelmännchen Stimme] Guuuden Mooorrrgäään [/Mainzelmännchen Stimme] So jetzt alle wach? Werd dann mal zur Arbeit düsen und schauen, dass ich diese blöde DB endlich mal zerlegt bekomm *g*

Apropos beschäftigung ... *richtung tür wackel* Ich mach dann ma FA .. bis morsche!

Also Hawki, wenn bee meine aussage (die sich ja eigentlich auch auf ihn bezog...) sooo schön bekärftigt, dann kannst du dich ja wohl auch nicht beschweren ... ausserdem wärste ja nur n halber studi

Na gut .. ich bin ja schon ruhig :e@sy lass Edit: Guten morgen liebe Studenten. Es ist halb eins durch. Zeit das erste Auge zu öffnen :floet:

Mein Schwesterherz teilen? *Wolve anguck* Na gut .. so grimmig wie der schaut *G*

du nimmst mir das wort aus dem mund ...

Na damit das nicht zum streit kommt kuschel ich mit steffi und hawk und wolve bleiben zusammen... Deal?

*hinterher schleich und stillschweigend daneben auf couch fall*

Moin zusammen, nun hab ich endlich ne praktikable Lösung für mein Problem gefunden. Ich werde mit ODBC arbeiten. Leider bietet mir mein rechner hier das Icon ODBC in der Systemsteuerung nicht an. Wo bekomme ich den ODBC Treiber Manager her? Weil eigentlich sollte der doch bei Windows / Office dabei gewesen sein, oder nicht?

Hmpf immer noch kein Rechner auf Arbeit. Gut, dass ich den Lappi mitgenomen hab. Damit schalf ich zwar beim Tippen ein bzw. kann mir nach dem tippen 5 Minuten zugucken, wie die buchstaben erscheinen, aber besser als nix ... so dann werd ich ma mit Perl spielen gehen.. komm putt putt putt :evil:

morgen zusammen. na dann hoff ich mal, dass ich gleich auf arbeit wieder n rechner hab.... noch n tag ohne irgendwas sinnvolles machen zu können schaff ich echt nicht ...