vb6 syntax alter column

Bonjour,
Je voudrais modifier la longueur de 5 zones dans une meme table (access). j'ai teste plusieurs syntaxes pour essayer de tout mettre dans une seule requete mais sans succes. Peut-on specifier plusieurs "ALTER COLUMN" dans une meme requete ou doit-on faire x requete ?

Code:

---

sql = "alter table toto ALTER COLUMN nom01 TEXT(25) NULL"

---

Code:

---

1 2	ALTER TABLE toto CHANGE nom01 TEXT(25) NULL;

---

Merci de ta reponse Hariman.
Pour 1 zone oui, mais pour x zones ?

Code:

---

1 2	ALTER TABLE toto CHANGE nom01 TEXT(25) NULL, nom02 TEXT(25) NULL, nom03 TEXT(25) NULL;

---

ne marche pas

Code:

---

1 2 3 4 5

ALTER TABLE toto CHANGE nom01 TEXT(25) NULL, CHANGE nom02 TEXT(25) NULL, CHANGE nom03 TEXT(25) NULL;

---

Content ? ;)

ca semble logique mais j'ai tout de meme "erreur de syntaxe".
En fait, j'accede en VB6 à une table access 2000 et pour ca je ne peux utiliser l'instruction 'CHANGE' mais plutot 'ALTER COLUMN' qui marche tres bien. Mais c'est lorsque je veux regrouper ds une meme requete la modif de plusieurs zones que ca bloque. en calquant sur ton modele :

Code:

---

1 2 3

sql = "alter table toto ALTER COLUMN nom01 TEXT(25) NULL, " _ & "ALTER COLUMN nom02 TEXT(25) NULL," _ & "ALTER COLUMN nom03 TEXT(25) NULL"

---

meme erreur de syntaxe :?

Est-ce que tu peux poster le message d'erreur ?

Tu peux aussi mettre les 3 modifications dans 3 requetes différents !

oui en faisant 3 requetes ca marche sans pb mais je vais devoir reprendre plusieurs tables avec a chaque fois des modif de plusieurs zones. Plutot que de faire 25 requetes il est plus logique d'optimiser la(es) requete(s).

le message d'erreur est : err2147217900 erreur de syntaxe dans l'instruction ALTER TABLE

L'instruction ALTER COLUMN ne peut se faire qu'une fois dans une requête.

Je vois plus d'autres solutions si on ne peut pas utiliser CHANGE ou MODIFY.
T'as qu'à faire une boucle dans ton code, par exemple en utilisant un tableau à 2 dimensions contenant les noms des champs à modifier et les modifications à faire.

Merci de ton aide Hariman.
Bon finalement, je me suis résolue a faire :

Code:

---

1 2 3 4 5 6

db.Execute "alter table toto ALTER COLUMN nom01 TEXT(25) NULL" db.Execute "alter table toto ALTER COLUMN nom02 TEXT(25) NULL" db.Execute "alter table toto ALTER COLUMN nom03 TEXT(25) NULL" db.Execute "alter table toto ALTER COLUMN nom04 TEXT(25) NULL" db.Execute "alter table toto ALTER COLUMN nom05 TEXT(25) NULL"

---

Ca ne me parait pas tres propre mais ca marche. :aie: