Discussion :

[Oliv'83]

Bonjour à tous,

Je veux créer un champ dans une table en passant par un formulaire.

Dans ce formulaire j'ai 2 zones : strNomDuChamp (Zone de Texte) et ListeType (Zone de liste déroulante rattachée à une table qui contient deux champs).

J'ai aussi un bouton avec notamment le code ci-dessous qui est rattaché :

Code :

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

Set MonChamp = MaTable.CreateField(Me.strNomChamp, Me.ListeType)

La partie Me.strNomChamp fonctionne sans problème mais pas Me.ListeType...

Pourtant quand je mets un :

Code :

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

MsgBox Me.ListeType

il me met bien la valeur que je souhaite (c'est à dire : dbBoolean ou dbInteger par exemple) mais ensuite le code Set MonChamp provoque un avertissement Erreur d'exécution '3421'.

J'avoue que je ne comprends pas pourquoi ?

Oliv'

[User]

Salut,

Il me semble, que dbBoolean ou dbInteger sont des constantes (numérique) et non des chaines de caractères comme dans ton cas

A+

[Oliv'83]

Salut User,

Tu dois avoir raison mais lorsque l'on définit le champ normalement la syntaxe est par exemple:

Code :

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

Set MonChamp = MaTable.CreateField(Me.strNomChamp, dbBoolean)

Donc il faut bien transmettre une chaine de caractères. Non ?

Oliv'

[Oliv'83]

Il semblerait que cela fonctionne si au lieu de transmettre la constante en toute lettre on transmet sa valeur :

1 pour dbBoolean
2 pour dbByte
3 pour dbInteger
...

Je teste cela demain matin et je vous tiens au courant.

Bonne soirée

Oliv'

[User]

Il semblerait que cela fonctionne si au lieu de transmettre la constante en toute lettre on transmet sa valeur :

1 pour dbBoolean
2 pour dbByte
3 pour dbInteger
...

Je teste cela demain matin et je vous tiens au courant.

Bonne soirée

Oliv'

Oui, bien vu, ça devrait fonctionner :

c'est ce que l'on fait habituellement dans les requêtes qui n'acceptent pas les constantes

[Oliv'83]

Je confirme ce que je disais hier soir, cela fonctionne avec les valeurs.

Bonne journée à tous et merci à User pour son aide.

Oliv'