Importing Text Delimited

[BLD21]

2007, I am using a button and when clicked it will run an event procedure to import a text file. The text file looks like this:

Acct number, Company
"1", "CCCC"
"77","ABC"
etc, etc.

My VB is :

Private Sub Command10_Click()



DoCmd.Hourglass (HourglassON)
DoCmd.DeleteObject acTable, "CUSTOMER_040711"
DoCmd.TransferText acImportDelim, , "CUSTOMER_040711", "U:\BruceD\CUSTOMER_040711.txt", False

CurrentDb.TableDefs("CUSTOMER_040711").Fields("F1" ).Name = "ACCT_NUMBER"

CurrentDb.TableDefs("CUSTOMER_040711").Fields("F2" ).Name = "COMPANY_NAME"

DoCmd.RunMacro ("Macro3")
End Sub

This all works but after the import in my table the first record is always the field name for each. Is there a way to use a text qualifier of "" somehow so I will avoid having a record in my table with the field names.

Thanks to all,
Bruce D.

[ajetrumpet]

bruce,

why don't you do the import manually one time, save it with a name, and then simply run:

docmd.runimportexport "name"

that's all you need to do. that'll stop the first record issue.

[thhui]

Use the schema.ini to control whether the header text should be imported or not.

For example, you want to import Journal.txt into the access table

Schema.ini would be like this:-
[Journal.txt]
ColNameHeader=true