How to create a msaccess database?

[paul]

Hi
I am trying to figure out how to create a MS Access database from a file (with code not from within access).This file has many lines in it. Can anyone help me to get started? Each line will have 3 to 4 fields in it. Any help would be appreciated.

[Geoff Gunson]

Hi heres the code that I am using to dynamically create a database, I can't claim any credit as it was an example on this site.

Don't forget get to reference the DAO object.

Hope it helps

Geoff

Dim wrkDefault As Workspace
Dim newConfig As Database
Dim SQLstr As String

On Error GoTo ERRdataBase

Set wrkDefault = DBEngine.Workspaces(0)
Set newConfig = wrkDefault.CreateDatabase(DEFAULTcfg, dbLangGeneral)

With newConfig

'create a tabled called TableY with two feilds

SQLstr = "CREATE TABLE TableY (FirstName TEXT, LastName TEXT);"
.Execute SQLstr
.Close

End With



Exit Sub
ERRdataBase:
MsgBox Err.Description & " " & Err.Number