Text File Import Issue

[kopy]

I have to import a text file that has a suffix in the name that changes every time it runs. Here is an example of the file name with the suffix.

DoCmd.TransferText acImportDelim, "", "PHR_HS_OCC_HLT_BBP_DB-1212845.csv", True, ""

I've tried to put a wildcard into the name so that the most current file with any suffix will be imported.

DoCmd.TransferText acImportDelim, "", "PHR_HS_OCC_HLT_BBP_DB" & "*" & ".csv", True, ""

My problem is that the file can not be found and it appears that the wildcard isn't working.

Any help will be appreciated. Thanks, Kopy

 

[Remou]

How about using the FileSystemObject to get the latest version of the file, would that work?

 

[kopy]

Thanks for getting back to me.

I'm not sure how to use the FileSystemObject. Can you show me?

Kopy

 

[PHV]

http://msdn2.microsoft.com/en-us/library/z9ty6h50.aspx

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886

 

[Remou]

'Reference: Microsoft Scripting Runtime
Dim f As File, fl As Folder, fs As FileSystemObject
Dim fd As Date
Dim fname As String

    Set fs = CreateObject("Scripting.FileSystemObject")
    Set fl = fs.GetFolder("C:\Docs")
    
    For Each f In fl.Files
        If IsNull(fd) Or f.DateCreated > fd Then
            fd = f.DateCreated
            fname = f.Name
        End If
    Next
    
    Debug.Print fd, fname

--

http://wiki.lessthandot.com/index.php/Most_Recently_Created_File_in_a_Folder

 

[JBinQLD]

One word of warning - some email/virus checkers can, by default, block .mdb files that utilise the filesystemobject. I recently used it to great effect but when it came to distributing it to regional offices throughout Australia our software, "Mail Marshal" prevented it from being delivered, even internally within our own company network!

I'm sure there is a way to stop this blockage happening but if you happen to work for a large company where the appropriate department are 4000km away and as useful as mud-flaps on a tortoise this can be rather annoying.

Sorry this is a bit off thread but just wanted to mention it JB

 

[Remou]

Even when the mdb is zipped?