linearImport von Textdatei ohne Trennzeichen
Peter Wakolbinger 
, Mauerbach bei Wien, Freitag, 11. Dezember 2009, 09:43
Hallo Gemeinde!
Mich Fuxt schon seit Tagen ein Problem. Ich möchte eine *.txt Datei in Access einlesen. Mit folgenden Cod habe ich kein Glück
/Code
Dim F As String
Dim A As String
Dim Fld
F = FreeFile
Open "C:\Datan\Produkte.txt" For Input As #F
Line Input #F, A
Do Until EOF(F)
Line Input #F, A
Fld = Split(A, " ")
'Zuweisung zu einer Tabelle
...........
Loop
Close #F
/Code Ende
Das System bleibt einfach stehen. (Keine rückmeldung)
Die Datei ist Getrennt mit Tab.
Das 2. Problemwähre ncoht, das Format im Preis. Die Komma ist mit einen "." (Punkt getrennt. Wie Kann ich denn "." in ein "," Ändern?
Besten Dank im Voraus
mfg
Peter
Import von Textdatei ohne Trennzeichen
Hi,
natürlich könnte man den von dir vorgeschlagenen Weg gehen. Allerdings suchst du mit
Split(A, " ")
nach drei Leerzeichen als Trennzeichen. Statt dessen müsstest du nach Tabulatoren suchen.
Egal, das ist so oder so wohl kaum der optimale Weg. Schau dir mal die Onlinehilfe zu "TransferText" an. Kurz zusammengefasst; du gehst auf "externe Daten/Importieren". Dort im Dateiauswahldialog wählst du deine Txt-Datei aus, drückst im dann erscheinenden "Textimport-Assistenten" den Button "Weitere", und erstellst dort eine eigene Importspezifikation, die du in VBA mit "DoCmd.TransferText" aufrufen kannst.
bis denn
Martin
RSS Einträge