CREATE TABLE avec argument WITH COMPRESSION

Version imprimable

08/09/2018, 17h18
ketchson

CREATE TABLE avec argument WITH COMPRESSION

Bonjour,

Je suis devant un mini casse-tête depuis quelques heures et je demande si je suis le seul à avoir été confronté à ce problème.

J'aimerais créer une table en langage SQL grâce à l'instruction CREATE TABLE. Mon souci est au niveau de l'usage de l'argument WITH COMPRESSION qui permet d'indiquer qu'on veut bien de la compression unicode sur les champs TEXT ou MEMO. Sans cette indication la Compression Unicode n'est pas indiquée et en travaillant avec une table créée comme cela les champs concernés gardent un nombre d'espaces correspondant, ce qui devient embêtant pour les traitements futurs.

Par exemple si j'ai un champ TEXT (255) où j'écris "Bonjour" au lieu de conserver juste le "Bonjour" dans la table, sans compression unicode il sera conservé "Bonjour" + (255 - 7 = 248) caractères d'espacement.

Voici le code qui ne marche pas pourtant il respecte bien la syntaxe indiquée dans l'aide d'Access

Code:

CREATE TABLE SOLDES ([N° Solde] AUTOINCREMENT CONSTRAINT MyFieldConstraint PRIMARY KEY, [Titre Solde] CHAR WITH COMPRESSION, [Solde Global] YESNO)

Il provoque une "erreur de syntaxe dans l'instruction CREATE TABLE" au niveau du With

Des idées du problème, et/ou de sa solution ?
08/09/2018, 18h00
bertiny

Bonjour
As-tu essayé de préciser la taille du champ ?

Salut,
Ainsi ça devrait le faire

Code:

1
2
3
4
5
CurrentProject.Connection.Execute "CREATE TABLE SOLDES (" & _
"[N°Solde] AUTOINCREMENT, " & _
"[Titre Solde] text(255) WITH COMPRESSION, " & _
"[Solde Global] YESNO)"
CurrentProject.Connection.Execute "Alter table SOLDES ADD CONSTRAINT MyFieldConstraint Primary Key (N°Solde)"

08/09/2018, 22h41
ketchson

Merci

Un grand merci hyperion13 ! Ca marche très bien

Et donc si je comprends bien l'ajout de l'index pour la clé primaire n'est pas compatible avec la précision WITH COMPRESSION dans la même instruction.

Salut,
Ça marche également

Code:

1
2
3
4
5
CurrentProject.Connection.Execute "CREATE TABLE SOLDES (" & _
"[N°Solde] AutoIncrement CONSTRAINT MyFieldConstraint PRIMARY KEY, " & _
"[Titre Solde] text(255) WITH COMPRESSION, " & _
"[Solde Global] YESNO)"
RefreshDatabaseWindow

09/09/2018, 10h30
ketchson

OK OK c'est vrai que ça marche aussi. Le souci vient de l'objet que j'ai utilisé, Currentdb.execute plutôt que CurrentProject.Connection.Execute

Mon but est de mettre à jour des bases de données chez des clients par automation et en ouverture exclusive, avant cette nouvelle information je pense que je vais trouver comment faire. Une série de tests s'impose...
10/09/2018, 15h23
marot_r

Bonjour.

Juste un point a propos des champs texte.

Citation:

Par exemple si j'ai un champ TEXT (255) où j'écris "Bonjour" au lieu de conserver juste le "Bonjour" dans la table, sans compression unicode il sera conservé "Bonjour" + (255 - 7 = 248) caractères d'espacement.

Si tu passes par l'editeur de table, les champs textes sont crees automatiquement en longueur variable donc quand tu crees un champ texte de 255 caracteres tu indiques seulement a Access que le champ peut contenir au maximum 255 caracteres pas qu'il occupe toujours 255 caracteres.

A+
10/09/2018, 17h40
ketchson

Citation:

Envoyé par marot_r

Bonjour.

Juste un point a propos des champs texte.

Si tu passes par l'editeur de table, les champs textes sont crees automatiquement en longueur variable donc quand tu crees un champ texte de 255 caracteres tu indiques seulement a Access que le champ peut contenir au maximum 255 caracteres pas qu'il occupe toujours 255 caracteres.

A+

Après tests, je suis d'accord. Via l'éditeur de table il n'y a aucun problème.

Mais via l'instruction CREATE TABLE si je n'indique pas WITH COMPRESSION Access conserve bien le nombre maximum de caractères, en comblant par des espaces !
10/09/2018, 20h22
marot_r

Merci d'avoir fait le test.

J'utilise rarerement le Create Table, je lui prefere un delete suivi d'un append sur une table existante.
Et si j'ai une nouvelle table a ajouter en production je le fais par copie de ma table en developpement, meme par script.

A+
11/09/2018, 00h07
ketchson

Citation:

Envoyé par marot_r

Merci d'avoir fait le test.

J'utilise rarerement le Create Table, je lui prefere un delete suivi d'un append sur une table existante.
Et si j'ai une nouvelle table a ajouter en production je le fais par copie de ma table en developpement, meme par script.

A+

OK

Mais là ma curiosité est attisée. Pourrais-je avoir un petit exemple de copie d'une table par script s'il te plaît ?
11/09/2018, 13h00
marot_r

Correction code

Bonjour.

Je n'en ai pas sous la main mais regarde les commandes DoCmd.TransferDatabase et aussi DoCmd.CopyObject.

Si je me fie a une des dernieres discussion auquelle j'ai participee, CopyObject est moins capricieux que TransferDatabase mais plus limite.

A+
12/09/2018, 00h01
ketchson

Correction code

Citation:

Envoyé par marot_r

Bonjour.

Je n'en ai pas sous la main mais regarde les commandes DoCmd.TransferDatabase et aussi DoCmd.CopyObject.

Si je me fie a une des dernieres discussion auquelle j'ai participee, CopyObject est moins capricieux que TransferDatabase mais plus limite.

A+

Merci bien.

Avec ces 2 méthodes je suis dans le cas typique du "tu as déjà vu, tu sais que ça existe, mais tu n'as jamais essayé"

Je ferai des tests.