Enregistrer une valeur vide dans un champ date
Bonjour,
J'ai une base de données comprenant des champs "date" dans lequel je dois enlever les informations enregistrées.
Ce champs a comme propriété Null interdit = Non.
Comment peut-on vider un champs date. Lorsque j'essaie, j'ai un message d'erreur ou une date erronée.
Voici un exemple de mon code:
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13
|
Dim dbases As Database
Dim TArch As Recordset
Dim reSQL As String
Dim stNoProjet As String
Set dbases = CurrentDb
reSQL = Forms![bProjet]![bSSDosLst].Form.RecordSource
Set TArch = dbases.OpenRecordset(reSQL)
...
TArch.Edit
TArch.Fields("aEnDateTra") = ""
...
TArch.MoveNext |
Lorsque j'active le code, j'ai un message d'erreur : "3421 - Erreur de conversion de type de données."
Si je modifie mon code pour :
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13
|
Dim dbases As Database
Dim TArch As Recordset
Dim reSQL As String
Dim stNoProjet As String
Set dbases = CurrentDb
reSQL = Forms![bProjet]![bSSDosLst].Form.RecordSource
Set TArch = dbases.OpenRecordset(reSQL)
...
TArch.Edit
TArch.Fields("aEnDateTra") = IsNull("")
...
TArch.MoveNext |
Je n'ai pas d'erreur mais la valeur inscrite dans ce champs est "1899-12-30".
Ce que je dois avoir est aucune date. Le champs doit être vide. Comment faire.
Merci.