Ik heb het volgende stukje code om een tabel te maken en velden erin toe te kennen:
Maar hij geeft bij Fld.Name steeds de foutmelding "Kan niet toewijzen aan een alleen lezen eigenschap"
Wat doe ik fout?
code:
1
2
3
4
5
6
7
8
9
10
11
12
13
| Dim DB As Database
Dim TD As TableDef
Dim Fld As Field
Dim rs As Recordset
'Tabel aanmaken
Set DB = CurrentDb
Set TD = DB.CreateTableDef("Tabel1")
Set Fld = TD.CreateField
Fld.Name = "Datum"
Fld.Type = dbDate
TD.Fields.Append Fld
DB.TableDefs.Append TD |
Maar hij geeft bij Fld.Name steeds de foutmelding "Kan niet toewijzen aan een alleen lezen eigenschap"
Wat doe ik fout?
:strip_icc():strip_exif()/u/20300/icon_shrek.jpg?f=community){kind=icon}