CSV Datei in Oracle transferieren

[Bali]

Hallo zusammen,

ich bin jetzt schon 3 Tage lang am durchsuchen des Forums und habe auch nebenbei noch gegoogled und hab sogar schon die Klassen aus diesesm Forum ausprobiert und ich hab leider immer noch nicht das was ich will :(

Hoffentlich kann einer von euch mir bitte helfen.

Ich habe eine CSV Datei, Beispielaufbau:

Name;Straße;Ort;Email;kannwasdrinstehenmussabernic ht;Telefon
Hans Muster;Musterstraße 11,94385 Muster;[e-mail];;0800844
Sebastian Mustermeier;Kleinstr. 13;26747 Muster;[e-mail];1;983747483983

Die Datei kann bis zu 500 Datensätzen evtl. haben.

Von diesen Daten möchte ich jezt Name, Straße, Ort, Email und telefon in eine Oracle Tabelle einspielen.

Wie kann ich da am besten vorgehen ?

Zur Info, ich benutze Delphi 2005 Pro und ich kenn mich nicht wirklich so gut aus, wurde in der Arbiet quasi ins kalte Wasser geworfen.

Für Vorschläge wäre ich sehr Dankbar.

Dankeschön

Bali

[nahpets]

Hallo,
die Eingabedatei zeilenweise lesen und pro Zeile sowas machen:

Delphi-Quellcode:

sZeile := 'Hans Muster;Musterstraße 11,94385 Muster;[e-mail];;0800844';
iPos   := Pos(';',sZeile);
sName  := Copy(sZeile,1,iPos - 1);
sZeile := Copy(sZeile,iPos + 1,Length(sZeile));
iPos   := Pos(';',sZeile);
sStr   := Copy(sZeile,1,iPos - 1);
sZeile := Copy(sZeile,iPos + 1,Length(sZeile));
iPos   := Pos(';',sZeile);
sOrt   := Copy(sZeile,1,iPos - 1);
sZeile := Copy(sZeile,iPos + 1,Length(sZeile));
iPos   := Pos(';',sZeile);
sMail  := Copy(sZeile,1,iPos - 1);
sZeile := Copy(sZeile,iPos + 1,Length(sZeile));
iPos   := Pos(';',sZeile);
sNix   := Copy(sZeile,1,iPos - 1);
sZeile := Copy(sZeile,iPos + 1,Length(sZeile));
iPos   := Pos(';',sZeile);
sTel   := Copy(sZeile,1,iPos - 1);

tbOracle.Append;
tbOracle.FieldByName('NAME').AsString := sName;
tbOracle.FieldByName('STRASSE').AsString := sStr;
tbOracle.FieldByName('ORT').AsString := sOrt;
tbOracle.FieldByName('MAIL').AsString := sMail;
tbOracle.FieldByName('TELEFON').AsString := sTel;
tbOracle.Post;

Alternativ könntest Du in der Schleife über die Datei auch Insertstatements generieren und die dann zusammen mit einer Query und ExecSQL an die Datenbank geben. Könnte eventuell schneller sein, als satzweise.

[Bali]

Dankeschön, ich werds so schnell wie möglich mal testen und geb hier drin bescheid.

THX
Bali

[Bali]

Ole ! :)

funktioniert so wie ich es mir vorgestellt habe !

Herzlichsten Danke !

Bali