J'ai un pb avec des checkboxs qui se trouvent sur une premiere form. Quand je clique sur un ,je charge une autre form qui permet de saisir une quantité. Sur cette deuxieme form, je teste quel checkbox est coché.Je repete ce code pour tous les checboxs. Le pb se situe au niveau des update, en effet pour le premier checkbox, il ny a pas de pb mais quand jen cocche un 2eme, il y a remise à jour du premier checkbox car il est coché.
Comment faire pour que quand je clique sur un checkbox, il ny ai mise a jour que de ce dernier?
Aidez moi SVP, je pète les plombs!!!!!!
Procédure :
If (frmSaisie.ChkBatterie.Value = vbChecked) Then sql "select qte_acc from accessoire where lib_acc '" & frmSaisie.ChkBatterie.Caption & "'"
rs.Open sql, conn, adOpenDynamic, adLockPessimistic
QtéRestante = rs.Fields(0) - qte1
If (qte1 = 0) Then
MsgBox "La quantité doit être au moins égale à 1!", vbOKOnly, "Erreur"
TxtQtéAccess.Text = ""
ElseIf (qte1 > rs.Fields(0)) Then 'quantité supérieure à la quantité disponible
MsgBox "La quantité désirée est supérieure à la quantité disponible!", vbOKOnly, "Erreur"
TxtQtéAccess.Text = ""
TxtQtéAccess.SetFocus
Else
sql = " update accessoire set qte_acc= " & QtéRestante & " where lib_acc = '" & frmSaisie.ChkBatterie.Caption & "' "
conn.Execute sql
frmSaisie.ChkBatterie.Enabled = True
Unload Me
frmSaisie.Show
je n'ai pas tres bien compris mais tu devrais faire
if(frmSaisie.ChkBatterie.Value = 1) then...
'remettre a blanc ton checkbox
frmSaisie.ChkBatterie.Value = 0
else
....ça peut peut etre t'aider