This is how i make a database with VB5.

Dim dbsNaam As String
Dim dbsNieuw As Database

dbsNaam = "C:\Temp\Newdb.mdb"

Set dbsNieuw = DBEngine.CreateDatabase(dbsNaam, dbLangDutch)

dbsNieuw.Execute "CREATE TABLE Historie " & " (Datum DATE, Video1 TEXT, Video2 TEXT, Video3 TEXT, Video4 TEXT, Video5 TEXT, Video6 TEXT, Video7 TEXT, Video8 TEXT);"

dbsNieuw.Execute "CREATE INDEX NewIndex ON Historie" & "(Datum);"

dbsNieuw.Close

Maybe it isn't good then i hope others will help you further.

Greeting,
Nico Berg

[This message has been edited by Nico Berg (edited 11-17-1999).]

[This message has been edited by Nico Berg (edited 11-17-1999).]