Article ID: 182355
Article Last Modified on 2/12/2007
ID,Desc,Field3
Line1,Description 1 ,Field3-1
Line2,"Description 2 ",Field3-2
Private Sub Command1_Click ()
Dim db As Database
Set db = CurrentDB ' Access only
Set db = DBEngine(0).OpenDatabase("biblio.mdb") ' Visual Basic
db.Execute "SELECT * INTO TestImport FROM [test#txt] IN '' " _
"'text;database=c:\;FMT=Delimited;HDR=Yes'"
db.Close
End Sub
Additional query words: delimited csv
Keywords: kbhotfixserver kbqfe kbprb KB182355