Bonjour,

Je ne trouve rien sur mon problème. Qui est pourtant bien basique ....

Je n'arrive pas à éxécuter un update en vb. Mon select * from Table se passe correctement, donc le problème doit résider dans la syntaxe de ma requête. Le problème est que je ne trouve rien de suffisamment complet pour pouvoir résoudre mon soucis en terme de syntaxe :


en gros j'ai deux paramètres qui me servent à updater ma table (problématique de gestion de stock)

voici mon code :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
Private Sub MAJ_Click()
Dim db As DAO.Database, rst As DAO.Recordset
Dim sSQL As String
' Ouverture de la base de données
Set db = CurrentDb
 
sSQL = " UPDATE EFFET_EN_STOCK SET EFFET_EN_STOCK.[QTE_STOCK]=forms!EFFET_EN_STOCK1!QTE_STOCK - forms!EFFET_EN_STOCK1!QTE_DOTATION WHERE EFFET_EN_STOCK.[CODE_EFFET]= forms!EFFET_EN_STOCK1!CODE_EFFET"
Set rst = db.OpenRecordset(sSQL, dbOpenForwardOnly, dbReadOnly)
 
 
End Sub
Merci pour votre aide