Discussion :

[victorzecat]

Bonjour je souhaiterai connaître le code SQL pour modifier le format d'un champ dans une table.

Je souhaiterai les convertir en format texte, ainsi qu'activer la compression unicode.

De même j'utilise une boucle VBA pour désigner le champ:

Dans mon Docmd.SQL, faut il mettre ma variable à l'intérieur des guillement ou bien la séparer de ces dernier

Je m'explique par cet exemple:

Faut t'il écrire Docmd.RunSQL "ALTER TABLE mavariable;"

ou bien

Docmd.RunSQL "ALTER TABLE" & mavariable & "suite de l'instruction;"

Merci pour votre aide

[fgiambelluco]

Bonjour
Pour la compression unicode, je ne sais pas, mais pour le type de champ j'avais récupéré ce code sur le Net

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Sub ModificationTypeChamp()
 
 
    DoCmd.RunSQL ("Alter Table MaTable alter Column MonChamp float")
 
 
End Sub
 
'Type alphanumérique CHAR(n) Chaîne de caractères de longueur fixe n (n<16383)
'Type alphanumérique VARCHAR(n) Chaîne de caractères de n caractères maximum (n<16383)
'Type numérique NUMBER(n,[d]) Nombre de n chiffres [optionnellement d après la virgule]
'Type numérique SMALLINT Entier signé de 16 bits (-32768 à 32757)
'Type numérique INTEGER Entier signé de 32 bits (-2E31 à 2E31-1)
'Type numérique FLOAT Nombre à virgule flottante
'Type horaire DATE Date sous la forme 16/07/99
'Type horaire TIME Heure sous la forme 12:54:24.85
'Type horaire TIMESTAMP Date et Heure

[LedZeppII]

Bonsoir,

Un exemple :

Code :

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

1
2
3
4
5
6
7
Dim strSQL As String
Dim strTable As String, strChamp As String
 
strTable = "Table1"
strChamp = "REFERENCE"
strSQL = "ALTER TABLE [" & strTable & "] ALTER COLUMN [" & strChamp  & "] TEXT(20) WITH COMPRESSION"
CurrentProject.Connection.Execute strSQL

WITH COMPRESSION (compression unicode) n'est pas supporté via DoCmd.RunSQL.
C'est pour ça que j'utilise la connexion ADO d'Access.

D'après ce que j'ai pu constater, WITH COMPRESSION ne fonctionne que si le champ n'est pas déjà de type texte.
Autrement dit, on ne peut pas utiliser ALTER ...ALTER COLUM ... WITH COMPRESSION pour activer la compression unicode d'un champ texte.

A+