Discussion :

[SSJconsult]

Bonjour,

En Access 2003, je voudrais pouvoir exécuter un ALTER TABLE (pour réinitialiser un champ autonumber) sur une table (vide) liée à partir d'un formulaire.

Pour information, j'utilise le code suivant :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
DoCmd.RunSQL ("ALTER TABLE Appl_Data ALTER COLUMN idx COUNTER(1,1)")

Ceci ne fonctionne évidemment pas puisqu'il s'agit d'une table liée et par conséquent (à priori) non modifiable.

Existe-t-il néanmoins une technique permettant de contourner le problème et de quand même arriver à modifier une table liée ?

D'avance merci

[SSJconsult]

En cherchant dans le forum, j'ai trouvé la solution...
Si la base dans laquelle se trouve la table à modifier s'appelle MyDb_Data.mdb :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
Sub sAlterTable()
 
Dim MyDB  As Database
 
    Set MyDB = DBEngine.OpenDatabase("c:\MyDb_Data.mdb", True)
 
    MyDB.Execute "ALTER TABLE Appl_Data ALTER COLUMN idx COUNTER(1,1)", dbFailOnError
 
    MyDB.Close
    Set MyDB = Nothing
 
End Sub

Et ça marche !