problems with . in the middle of filenames

[noccy]

Hello!

I use this code to import a list of text files to my db.

It works just fine, but not when the filenames had a . in the middle like 001.test.txt

Any suggestions on how to get by this problem?

For i = 0 To Me.Liste39.ListCount - 1

    varFile = Me.Liste39.ItemData(i)

    DoCmd.TransferText acImportDelim, "MySpec", "tblMyTable", varFile, HasFieldNames = False
Next i

liste39 is a listbox btw