Discussion :

[brak__]

Bonjour, je souhaiterai avoir une table avec 2 champs : un champ type date, et l'autre peu importe, afin que dès que j'ajoute un enregistrement il m'indique la date de cette enregistrement. je m'exprime mal mais le code sera plus explicite :

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
18
 
'Date MAJ
   Dim rst2 As DAO.Recordset
 
'Exécution de la requête
rst.Open "SELECT gdo AS Expr2 FROM NouveauALLgdo WHERE permut_typ='HS'", cnx
While Not (rst.EOF)
  rst3.Open ("INSERT INTO Permut_HS(gdo) VALUES('" & rst("Expr2") & "');"), cnx
 
'Execution requête2 stockage date
Set rst2 = CurrentDb.OpenRecordset("Permut_HS")
rst2.AddNew
rst2![Date] = Now()
rst2.Update
rst2.Close
 
  rst.MoveNext
Wend

Voila, je ne comprend pas pourquoi il me génère une erreure au niveau de

Code :

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

1
2
 'Date MAJ
   Dim rst2 As DAO.Recordset

'Erreur type compilation, type défini par l'utilisateur non défini'
je ne vois pas pourquoi il me dis ça.....

[Dolphy35]

Bonjour,

Merci de faire une recherche sur le Forum ce sujet a été traité des centaine de fois et signalé dans plusieurs tutos.

Il manque lé réfrence DAO

Microsoft DAO 3.x Object Library

Dolphy

[brak__]

Merci je m'en suis rappeler aussi que j'avais oublier d'ajouter cette référence, en plus il y a 2 ou 3 semaines j'avais posé la même question...
En se trompant, on apprend...
Merci quand même

[Dolphy35]

re,

Merci je m'en suis rappeler aussi que j'avais oublier d'ajouter cette référence, en plus il y a 2 ou 3 semaines j'avais posé la même question...
En se trompant, on apprend...
Merci quand même

tu m'aurais dis 2 ou 3 mois, mais là 2-3 semaines c'est alzheimer