Access-o-Mania

Access-Forum (Deutsch/German) => Tabelle/Abfrage => Thema gestartet von: Pils am September 20, 2010, 13:08:54

Titel: TXT-File mit unterschiedlichem Dateinamen importieren
Beitrag von: Pils am September 20, 2010, 13:08:54
Ich habe folgendes Problem:

Ich habe eine Datei, welche im importieren muss. Die Datei kommt täglich und der Dateiname unterscheidet sich etwas.
z.B.
heute: 1234.111.AAAA.20100203192866611.dat.txt
morgen: 1234.111.AAAA.20100204233777633.dat.txt
der werde Teil "1234.111.AAAA" ist immer gleich.

Gibt es eine Möglichkeit, wie ich diese Datei importieren kann?

Besten Dank für eure Hilfe
Titel: Re: TXT-File mit unterschiedlichem Dateinamen importieren
Beitrag von: database am September 20, 2010, 13:41:56
Hallo,

du KÖNNTEST dazu in VBA die Methode TransferText verwenden.
Gehe davon aus, dass die Textfiles IMMER im gleichen Verzeichnis liegen und nach dem Import von dort gelöscht werden.


Dim strVerzeichnis as String, strDatei as String

strVerzeichnis = "DeinLfw:\DeinBilderVerzeichnis\"   
strDatei = Dir(strVerzeichnis & "\*.txt")    'liest den Namen der *.txt - Datei aus deinem Verzeichnis

DoCmd.TransferText acImportDelim, , "DeineZieltabelle", strDatei



UNGETESTET!

nähere Infos mit einem Beispiel fidest du hier:
http://www.blueclaw-db.com/transfertext-docmd.htm (http://www.blueclaw-db.com/transfertext-docmd.htm)

HTH

peter

Titel: Re: TXT-File mit unterschiedlichem Dateinamen importieren
Beitrag von: Pils am September 20, 2010, 13:45:26
An dies habe ich auch schon gedacht, in meinem Verzeichnis liegen aber mehrere TXT Dateien, und ich brauche nur diese.
Titel: Re: TXT-File mit unterschiedlichem Dateinamen importieren
Beitrag von: database am September 20, 2010, 15:01:43
Hallo,
versuch mal:   strDatei = Dir(strVerzeichnis & "\1234.111.AAAA*.txt")