[VBA] TransferText, importeren van tekstfiles naamgeving

[BovenHond]

Ik probeer in VBA via Docmd.TransferText gegevens te importeren. Dit gaat prima totdat er files in de reeks zitten die een extra punt in hun bestandsnaam hebben.

Visual Basic:

'dit gaat prima
Docmd.TransferText acImportDelim, "specfile", "tblImport", "c:\temp\testfile.txt", True

'dit gaat niet
Docmd.TransferText acImportDelim, "specfile", "tblImport", "c:\temp\test.file.txt", True

Weet iemand wat ik er aan kan doen?

[RobIII]

Krijg je een foutmelding? En zo ja, welke? Wat heb je zelf al gedaan om je probleem (te trachten) op te lossen?

[ Voor 45% gewijzigd door RobIII op 19-06-2007 12:37 ]

[BovenHond]

Ik krijg de foutcode

code:

De Microsoft Jet-database-engine kan het object test.file_20070101.txt
 niet vinden. zorg ervoor dat het object bestaat en dat u de naam en het 
pad correct heeft gespeld.

Ik heb de syntax van de Docmd.TransferText methode nagekeken en gezocht op dit forum en op Google.

Als ik vervolgens het pad en het bestand nakijk dan bestaan deze gewoon.

edit:

Ik heb het voorlopig opgelost door alle bestanden van te voren te renamen conform
strBestandsnaamNieuw = Replace(strBestandsnaamNieuw,"".","_")
alvorens ik de importeerslag doorloop

[ Voor 30% gewijzigd door BovenHond op 19-06-2007 14:10 ]