Bonjour,
Lorsque je procède dynamiquement à la création d'une table, les champs de la
table ont par défaut la propriété 'chaîne vide autorisée' à la valeur 'Non'
alors que je voudrais qu'elle soit à Oui. Pour cela j'utilise mais à mauvais
escient, la formule suivante :
Set dft = bds.CreateTableDef("TTTT")
With dft
.Fields.Append .CreateField("Code_EE", dbText, 2).AllowZeroLength = True
.Fields.Append .CreateField("Code_BB", dbText, 5).Required = False
etc ...
Mais à l'exécution le système m'envoie le message 'Erreur de compilation -
Type incompatible'.
Quelqu'un aurait-il une idée ?
Merci et bonne journée.
Rédiger le CreateField avec ses bons arguments, puis juste après .Fields("Code_EE").AllowZeroLenght = true
Bonne chance, pgz
"
3stone
Salut,
"Exodus" | Lorsque je procède dynamiquement à la création d'une table, les champs de la | table ont par défaut la propriété 'chaîne vide autorisée' à la valeur 'Non' | alors que je voudrais qu'elle soit à Oui. Pour cela j'utilise mais à mauvais | escient, la formule suivante : | Set dft = bds.CreateTableDef("TTTT") | With dft | .Fields.Append .CreateField("Code_EE", dbText, 2).AllowZeroLength = True | .Fields.Append .CreateField("Code_BB", dbText, 5).Required = False | etc ... | Mais à l'exécution le système m'envoie le message 'Erreur de compilation - | Type incompatible'.
"Exodus"
| Lorsque je procède dynamiquement à la création d'une table, les champs de la
| table ont par défaut la propriété 'chaîne vide autorisée' à la valeur 'Non'
| alors que je voudrais qu'elle soit à Oui. Pour cela j'utilise mais à mauvais
| escient, la formule suivante :
| Set dft = bds.CreateTableDef("TTTT")
| With dft
| .Fields.Append .CreateField("Code_EE", dbText, 2).AllowZeroLength = True
| .Fields.Append .CreateField("Code_BB", dbText, 5).Required = False
| etc ...
| Mais à l'exécution le système m'envoie le message 'Erreur de compilation -
| Type incompatible'.
"Exodus" | Lorsque je procède dynamiquement à la création d'une table, les champs de la | table ont par défaut la propriété 'chaîne vide autorisée' à la valeur 'Non' | alors que je voudrais qu'elle soit à Oui. Pour cela j'utilise mais à mauvais | escient, la formule suivante : | Set dft = bds.CreateTableDef("TTTT") | With dft | .Fields.Append .CreateField("Code_EE", dbText, 2).AllowZeroLength = True | .Fields.Append .CreateField("Code_BB", dbText, 5).Required = False | etc ... | Mais à l'exécution le système m'envoie le message 'Erreur de compilation - | Type incompatible'.
