Как удалить первичный ключ в таблице в Access?

Question

У меня есть база данных Accessend со связанными таблицами с бэкэнд. Я бы хотел, чтобы удалить первичный ключ из определенной таблицы с относительной легкостью. Как мне это сделать?

Answer 1

После долгих поисков я обнаружил очень чистый способ сделать это с помощью DAO. Вам даже не нужно прибегать к ADO или использовать коллекцию Index для поиска первичных ключей.

Public Function RemovePrimaryKey(ByRef tdf As TableDef) 
    CurrentDb().Execute "DROP INDEX PRIMARYKEY ON [" & tdf.Connect & "].[" & tdf.Name & "];" 
End Function