Error link between table and text file

[Zdz16]

Hi Expert;



I have a small problem with the following command:

 
sTabNam = "TmpTab"
sFilNam = "C:\Data.Txt"
 
DoCmd.TransferText TransferType:=acLinkDelim, TableName:=sTmpTab, FileName:=sFilNam, HasFieldNames:=True

The file C:\Data.Txt contains 5 columns, separated by a semicolon with the first line containing the names of the columns. The concern is that when the linked table is created, I get a single column with all fields concatenated value. the following style :

Col1;Col2;Col3; : Column name
Val1;Val2;Val3; : Row value

What does do to have columns separated with the corresponding values?

Thanks in advance, best regard

[ItsMe]

I suggest you use the wizard to import a sample copy of your text file. You can create, name, and save an import procedure that you can then reference in your VBA. After the import procedure is saved, you can delete the sample data from your table and rely on VBA for the production data.

[Zdz16]

Thinks for your Replay;

I solved the problem by using the method you suggest. And by replacing the command as follows:

DoCmd.TransferText acLinkDelim, "Import_Procedure", sTmpTab, sFilNam, True

Where Import_procedure is the name of save import procedure.

Best regard

[ItsMe]

Looks good, post if you have any other questions.

Also, you can import that saved procedure to other DB's by using the "Advanced Options" while importing objects from one DB to another.