[VBA] .mdb maken werkt niet

[Verwijderd]

Ik maak in VBA (Excel) een database aan (.mdb). Dat lijkt goed te gaan maar als ik de database wil openen in Access97 krijg ik de volgende foutmelding: "Onbekende database indeling" Dit is mijn code:

Set wspCurr = DBEngine.Workspaces(0)
Set dbsCurr = wspCurr.CreateDatabase(strTempPath & "\Group Calendar.mdb", dbLangDutch)
Set tdfCurr = dbsCurr.CreateTableDef("tblDiaryTemp")

With tdfCurr
.Fields.Append .CreateField("Start", dbDate)
.Fields.Append .CreateField("End", dbDate)
.Fields.Append .CreateField("Name", dbText, 5)
.Fields.Append .CreateField("Title", dbText, 250)
.Fields.Append .CreateField("BusyStatus", dbByte)
.Fields.Append .CreateField("Location", dbText, 50)
.Fields.Append .CreateField("IsRecurring", dbBoolean)
.Fields.Append .CreateField("Recurrence", dbByte)
.Fields.Append .CreateField("Instance", dbLong)
.Fields.Append .CreateField("Interval", dbLong)
End With
dbsCurr.TableDefs.Append tdfCurr
tdfCurr.Fields("Title").AllowZeroLength = True
tdfCurr.Fields("Location").AllowZeroLength = True
Set rstCurr = dbsCurr.OpenRecordset("tblDiaryTemp")

Iemand een idee wat hier niet goed aan is?

[ Voor 10% gewijzigd door Verwijderd op 25-05-2004 09:17 ]

[farlane]

Omdat je een Access 2000 database aanmaakt als je geen versienummer opgeeft.

[Verwijderd]

Aha, waar geef ik dat aan dan?

[farlane]

Verwijderd schreef op 25 mei 2004 @ 09:36:
Aha, waar geef ik dat aan dan?

Misschien zijn de docs van de CreateDatabase functie wel een geschikte plaats om te beginnen.

[Verwijderd]

Daar heb je gelijk in maar in mijn boek wordt dit topic heel summier behandeld, kun je me niet effe een hint geven?

[Janoz]

Er zijn meer resources dan ene boek. Probeer het eens bij http://msdn.microsoft.com Desnoods vul je de functie in bij google. Het is iig niet de bedoeling dat alles heir compleet voorgekauwd wordt. Zie voor meer informatie onze faq.