Import files from C:\

[Wayne L]

I am trying to import all files from a directory on my hard drive. The file names start with the same letters ie.. AB but the are sequenced ie AB001, AB002 when they are created. I want to look for the new files and import them. Can this be done?
thanks

[TSIGOS1]

it can be done of course, but you need to used the command dir$(AB*.txt). check out help section.

[Wayne L]

it can be done of course, but you need to used the command dir$(AB*.txt). check out help section.

thanks I figured it out

[missinglinq]

Forum etiquette requires that when a question that you've posted is resolved, off line, as it were, that you make the answer available. This allows other members/visitors to the forum, who may be researching a similar problem, to be enlightened!

Welcome to TheScripts!

Linq ;0)>

[Wayne L]

Ok this is the final for exporting .dbf files and exporting only the lates file created.


Private Sub Mass_Import_Click()
Dim strPath As String
Dim strmsg As String
Dim strFile1Name As String
Dim strFile2Name As String
Dim dbs As Database

Set dbs = CurrentDb
'DoCmd.RunMacro ("delete name of table in access") ' macro delete object
'Set the path to the directory where the files will be.
ChDir ("C:\FOLDER")
strPath = "C:\FOLDER\"
strFile1Name = Dir("XXX*.dbf")
Do While Len(strFile1Name) > 0
strFile2Name = strFile1Name
strFile1Name = Dir
Loop
DoCmd.TransferDatabase acImport, "dBase IV", strPath, acTable, strFile2Name, "Name of table in access", False
strmsg = "Sucessfully Imported " & strPath & strFile2Name
MsgBox (strmsg)

End Sub