B
Bo Hansson
Following attemt fails - how to do it?
Dim dbs As Database, tdf As TableDef, idx As DAO.Index
Set dbs = OpenDatabase("DataBaseName")
Set tdf = dbs.TableDefs("TableName")
Set idx = tdf.Indexes("FieldName")
idx.Unique = False
"Cannot set the property of an objekt that is part of a collection"
????
Bo Hansson
Dim dbs As Database, tdf As TableDef, idx As DAO.Index
Set dbs = OpenDatabase("DataBaseName")
Set tdf = dbs.TableDefs("TableName")
Set idx = tdf.Indexes("FieldName")
idx.Unique = False
"Cannot set the property of an objekt that is part of a collection"
????
Bo Hansson