Discussion :

[Cri Cross]

[Formulaire]

Bonjour,

Sur un formulaire, je souhaite créer un bouton qui me permettrait de rajouter dans le champ mémo, descritpionInter, la date et l’heure avant chacune de mes interventions. Ce fameux bouton a pour but de structurer les divers informations noter dans le champ mémo.

Exemple :
----------------------------------------------------------------
04/11/2006 10:17


J’arrive déjà à afficher l’heure avec :

Code :

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

MsgBox Now

Oui, je sais ce n'est pas dur ! C’est tt de même un bon début, il me semblait .. Mais pour aller l’écrire dans le champs spécifié, c’est une autre histoire.

J’ai essayé :

Code :

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

1
2
3
Private Sub InserDate_Click()
INSERT INTO Inter (descriptionInter) VALUES ( “now” )
End Sub

Mais je dois faire une erreur de syntaxe, il me bloque à chaque fois que je fais une modification.

Lorsque je recherche de l’aide pour trouver la syntaxe correct, je ne trouve que des pistes par rapport à des requêtes ..
Il doit bien avoir un moyen plus simple .. ?

Avez-vous une suggestion, ca fait une semaine que je cherche partout sur le net et dans l’aide d’access ? Je commence à vraiment à désespérer, cela semblait si simple en théorie ..

Merci d’avance


Désolé d'avoir été un peu long, mais c’était pour essayer d'être clair.

[Faw]

Salut, essaye ceci

Code :

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

CurrentDb.Execute "INSERT INTO Inter (descriptionInter) VALUES ( now )"

[alexandrebergercyr]

Bonjour Cri Cross, il faudrait que tu te crée une requête d'ajout (le mode assistant peut t'aider pour cela) et ensuite que tu attache ta requête à ton bouton. Pour faire une conversion de ton type date à ton type string, c'est cstr(now).

Bonne journée
Alex

[Kalite]

si tu tien a le faire avec du code vb tu fai comme sa :

Code :

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

1
2
3
private sub insert()
Application.docmd.RunSql "INSERT INTO Inter (descriptionInter) VALUES (" & Now & ");"
End Sub

si le format ne te convien pas tu peut utilisé la fonction format qui permet de formater une donnée (l'aide est dispo sur access et elle est assez complet).
petit exemple d'utilisation:

Code :

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

 Format(Date , 'mm')

format te renvoi le numéro du moi de la date que courrante (Date est une fonctioàn qui permet de connaitre la date du système).

[Cri Cross]

Bonjour à chacun,

Merci pour vos idées !
Excusez-moi de ne répondre que maintenant, j'avais des soucis de connexion .
Je tiens effectivement à rester en VB.
Merci Kalite pour votre précision !

J'ai essayé tout d'abord

Code :

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

CurrentDb.Execute "INSERT INTO Inter (descriptionInter) VALUES (Now)"

Je n'ai pas de message d'erreur, mais rien ne se rajoute dans le champ descriptionInter.

Puis

Code :

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

Application.DoCmd.RunSQL "INSERT INTO Inter (descriptionInter)  VALUES (" & Now & ");"

Access a l'air de bien retrouver l'heure, mais il lui manque apparement un opérateur :
Erreur d'exécution '3075'
Erreur de suntaxe (opérateur absent) dans l'expression '27/02/2007 9:48:05'.

J'ai essayé plusieurs autres syntaxe, mais c'est encore pire ..

Avez-vous des suggestions à me faire ?
Merci encore

[Faw]

Salut, bizarre...la 1ère syntaxe fonctionne chez moi.
Sinon pour l'erreur de la seconde syntaxe, essaye plutôt

Code :

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

"insert into inter (descriptionInter) VALUES ('" & Now & "');"

[Cri Cross]

Bonjour Faw,

Merci pour ta réactivité !
J'ai voulu voir si le souci ne venait pas du fait que je voulais complété un champ mémo. Je l'ai donc passer en texte, mais aucun changement.
Par contre cela m'a permi de voir plus long, en fait effectivement ta proposition fonctionne bien ! Désolé ..

Code :

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

CurrentDb.Execute "INSERT INTO Inter (descriptionInter) VALUES (Now)"

Mais au lieu de compléter le champ descriptionInter d'une intervention donnée, le code VB cree une nouvelle intervention avec tous les champs vides excepté descriptionInter. Donc je ne voyais pas cette création depuis mon formulaire.

Comment présicer que je souhaite compléter le champ descriptionInter se rapportant à l'intervention visualisé par mon formulaire et pas en creer une nouvelle?
Merci d'avance