Article ID: 182354
Article Last Modified on 2/12/2007
ID,Desc
Line1, Description 1
Line2," Description 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: csv
Keywords: kbctrl kbprb KB182354