Discussion :

[mister3957]

Bonjour à tous,

J'utilise une base de donnée ACCESS avec ADODB et j'aimerai créer une table via une requête SQL.

Je fais "CREATE TABLE client(id AUTOINCREMENT, nom VARCHAR(50));" ça passe correctement.

Maintenant si je souhaite définir une valeur par défaut je fais
"CREATE TABLE client(id AUTOINCREMENT, nom VARCHAR(50) DEFAULT 'user');" et là ça génère une erreur?

J'ai essayé plein de syntaxe différente, mais pas moyen de définir cette valeur par défaut...

Quelqu'un peut m'aider svp?

Merci

A bientôt

[Fablondon]

Peut etre avec DefaultValue, acces est capricieux avec sql...

[LedZeppII]

Bonsoir

sur mon PC ça marche (Acces 2000)

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
 
Dim oConn As New ADODB.Connection
Dim strSQL As String
 
oConn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=" & CurrentProject.FullName & ";"
oConn.Open
 
strSQL = "CREATE TABLE DUMMY (F1 CHAR(10) DEFAULT AB, " & vblcrlf & _
         "F2num INT NOT NULL DEFAULT -1, " & vbCrLf & _
         "Dt DATETIME DEFAULT Now()" & vbCrLf & _
         ")"
 
oConn.Execute strSQL
 
oConn.Close
Set oConn = Nothing

Que dit le message d'erreur ?

[mister3957]

Ok c'est bon j'ai trouvé

En fait je dois le faire pour plusieurs base alors je m'aide de la configuration de liaison de donnée sous Windows pour faire la chaine de connexion, et c'était foireux.

Là j'ai refait avec Jet 4.0 et ça passe nikel.

Merci pour vos réponses

A bientôt

Aurélien