Discussion :

[albator113]

Bonjour à tous,

voila, dans un formulaire j'ai crée un bouton qui lance quelques actions sur une base de donnée access.

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
 
Private Sub bout_Curatif_Enter()
Dim RS As DAO.Recordset
Dim SQL As String
Dim SQL2 As String
 
Texte59 = Modifiable34
 SQL = "SELECT curatif FROM  temps where semaine ='" & Texte59 & "'"
 Set RS = CurrentDb.OpenRecordset(SQL)
 Texte61 = RS(0)
 
 
    SQL2 = "INSERT INTO  temps(curatif) VALUES (51) FROM  temps where semaine ='" & Texte59 & "'"
DoCmd.RunSQL (SQL2)
 
End Sub

quand j'excecute le bouton , il me renvoit l'erreur point virgule absent à la fin de l'instruction erreur 3137 au niveau de DoCmd.RunSQL (SQL2)
merci d'avance de votre aide

[6ril25]

Salut,

Euh ta requête Insert est mal rédigée:

Code :

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

1
2
3
4
 
INSERT INTO table (champs1, champs2)
VALUES(val1, val2)
WHERE condition

[Jean-Philippe André]

Bonjour,
bienvenue sur DVP
le code que tu souhaites exécuter ne peut pas fonctionner, à cause de l'erreur qui se situe dans la requête SQL.

Tu sembles faire une confusion entre le

Code SQL :

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

INSERT INTO ... VALUES ...

et le

Code SQL :

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

INSERT INTO ... SELECT ...

De nombreuses ressources sont disponible sur DVP, entre autres une
http://access.developpez.com/faq
et de nombreuses ressources (cours/tutoriaux/sources/etc.)

Concernant la syntaxe SQl, je t'encourage à lire ce très bon article de SQLPro :
http://sqlpro.developpez.com/cours/sqlaz/dml/#LII

bonne lecture, et n'hésite pas à poser des questions si certaines notions t'échappent

[albator113]

tu veux dire enlever le FROM
car si j enleve le "WHERE...."
l'insert marche tres bien il rajoute 51 à la fin de la base et pas d'erreur 3137

Merci jpcheck pour les liens , je vais regarder de pres, et tenter de voir où se trouve ma confusion

[Jean-Philippe André]

En l'occurence, s'il s'agit d'une mise à jour, il faut utiliser UPDATE et non pas INSERT


Vérifie quelques éléments :
- les types de champs que tu souhaites compléter/ajouter
- le critère d'ajout/de mise à jour

[albator113]

merci 6til25 pour ta proposition mais VBA n'a pas l'air d aimer beaucoup plus.

dans ma table , le champ curatif est completement vide. l'UPDATE est approprié ?
dsl je suis pas tres bon en bdd; longtemps sans pratique

[albator113]

merci pour votre aide apres etude des divers liens, j'ai reussi à m'en sortir avec un UPDATE