Как да зададете първичен ключ при свързване с CreateTableDef

Винаги можете да актуализирате таблицата, която току-що сте прикачили, за да включите индексен/първичен ключ. Нещо като,

Dim s  As String
s = "ODBC;DSN=mydb;Trusted_Connection=Yes;DATABASE=mydb;"

Dim td As TableDef
Set td = CurrentDb.CreateTableDef("vwMyView", 0, "MySchema.vwMyView", s)

CurrentDb.TableDefs.Append td

CurrentDb.Execute "CREATE UNIQUE INDEX SomeIndex ON vwMyView (PrimaryKeyColumn) WITH PRIMARY".

CurrentDb.TableDefs.Refresh

Set td = Nothing

Не съм сигурен дали трябва да опресните CurrentDB, преди да създадете INDEX. Опитайте да опресните без първо, ако не работи - опреснете го и след това изпълнете командата CREATE.