Zum Inhalt springen

VB: Textdatei->Datenbank per ADO


Maugan

Empfohlene Beiträge

Hallo ich hab folgendes Problem

ICh möchte den Inhalt einer Personal.txt in eine entsprechende Tabelle in einer Datenbank importieren über ADO.

In erster Linie gehts mir um das lesen der Textdatei ( den Rest mit ADO krieg ich hoffentlich irgendwie hin :rolleyes: )

Die TExtdatei is wie folgt aufgebaut

123456;Mustermann;Peter;Musterstr.15;34533;02304/564833;

.........

das Semikolon hab ich als Trennzeichen für die einzelnen Felder gewählt wobei auch andere Trennzeichen erlaubt sind.

Bin für jeden kleinen Tipp dankbar

btw die Textdatei enthält naürlich mehrere zu importierende Datensätze (Zeilen).

Vielen dank im voraus!

MfG Maugan

Link zu diesem Kommentar
Auf anderen Seiten teilen

Hi Maugan ..

Im Grunde ist das ganz einfach ...

Open "c:\dateimittext.txt" For Input As #1

Do

Line Input #1, zeile

Teile = Split(zeile, ";")

t = 0

While Teile(t) <> ""

RS!Spalte1 = Teile(1)

RS!splate2 = Teile(2)

rs! .....

Next t

Wend

Loop Until EOF(1)

Close #1

So sollte es gehen, wobei RS das ADO Recordset ist.

Gruß

Fraggy

Link zu diesem Kommentar
Auf anderen Seiten teilen

Dein Kommentar

Du kannst jetzt schreiben und Dich später registrieren. Wenn Du ein Konto hast, melde Dich jetzt an, um unter Deinem Benutzernamen zu schreiben.

Gast
Auf dieses Thema antworten...

×   Du hast formatierten Text eingefügt.   Formatierung wiederherstellen

  Nur 75 Emojis sind erlaubt.

×   Dein Link wurde automatisch eingebettet.   Einbetten rückgängig machen und als Link darstellen

×   Dein vorheriger Inhalt wurde wiederhergestellt.   Editor leeren

×   Du kannst Bilder nicht direkt einfügen. Lade Bilder hoch oder lade sie von einer URL.

Fachinformatiker.de, 2024 by SE Internet Services

fidelogo_small.png

Schicke uns eine Nachricht!

Fachinformatiker.de ist die größte IT-Community
rund um Ausbildung, Job, Weiterbildung für IT-Fachkräfte.

Fachinformatiker.de App

Download on the App Store
Get it on Google Play

Kontakt

Hier werben?
Oder sende eine E-Mail an

Social media u. feeds

Jobboard für Fachinformatiker und IT-Fachkräfte

×
×
  • Neu erstellen...