
remove index from field or delete a indexed field
You can first delete the index, here is a sample:
Dim cn As New ADODB.Connection
cn.Open "provider=microsoft.jet.oledb.4.0;data source=c:\temp\db1.mdb"
Dim cx As New ADOX.Catalog
Set cx.ActiveConnection = cn
cx.Tables("table1").Indexes.Delete 0
Luke
(This posting is provided "AS IS", with no warranties, and confers no
rights.)