Comment définir la clé primaire lors de la liaison avec CreateTableDef

Vous pouvez toujours mettre à jour la table que vous venez de joindre pour inclure une clé index/primaire. Quelque chose comme,

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

Vous ne savez pas si vous devez actualiser CurrentDB avant de créer un INDEX. Essayez d'actualiser sans d'abord, si cela ne fonctionne pas - actualisez-le puis exécutez l'instruction CREATE.