Discussion :

[Crazyblinkgirl]

Bonjour,

Je souhaiterai définir une valeur par défaut pour un champ lors de la création d'une table mais j'ai une erreur de syntaxe dans ma requête.

J'utilise :

Code :

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

1
2
3
4
5
 
create table T_USER (
....
T_USER_CREATION datetime DEFAULT getdate() ,
.... )

J'ai essayé plusieurs formules mais sans succès.

Merci d'avance pour votre aide

[fdraven]

Le DEFAULT n'existe pas en SQL/ACCESS.

Par contre tu peux créer ta table avec une requête et ensuite utiliser DAO pour modifier la valeur par défaut.

En espérant t'avoir aidé.

[Crazyblinkgirl]

Merci de ta réponse.

Par contre je fais comment pour changer la valeur par défaut si je ne peux pas spécifier la notion "default" qui ne sera pas acceptée dans access?

[cafeine]

fdraven te l'a dit, c'est par DAO.

http://warin.developpez.com/access/d...tie_4#L4.4.2.4

[Crazyblinkgirl]

J'utilise ADO et DefaultValue n'est pas reconnu mais je ne trouve pas l'équivalent

[keita]

Et si on regardait du coté de la methode APPEND de DAO;
Syntaxe:
fields.Append Name, Type, DefinedSize, Attrib, FieldValue

[Tofalu]

Tout à fait possible avec ADO et plus particulièrement ADOX.

Il vous faut ajouter une référence Microsoft ADO Ext à votre projet puis dans un module :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
Public Sub changerValeurDefaut()
On Error GoTo err
Dim oCat As New ADOX.Catalog
Set oCat.ActiveConnection = CurrentProject.Connection
oCat.Tables("NomDeLaTable").Columns("NomChampDate").Properties("Default") = "Now()"
GoTo fin:
err:
  MsgBox "Impossible d'accéder au champ"
fin:
Set oCat = Nothing
End Sub

[Crazyblinkgirl]

Merci à tous, je vais essayer vos propositions