Discussion :

[yagrasdemonde]

Bonsoir

Sur une zone de liste je souhaite, au double clic sur un enregitrement executer une requete UPDATE, mais elle ne fonctionne pas, je ne comprend pas pourquoi !!!

voici mon code, qu'est ce qui ne vas pas ?

Code :

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

1
2
3
4
5
6
7
8
 
Private Sub ListeRetourDVD_DblClick(Cancel As Integer)
    Dim oDb As DAO.Database
    Set oDb = CurrentDb
    oDb.Execute "UPDATE Location SET rendu_location = 1 WHERE id_dvd=" & ListeRetourDVD.Column(0) & ""
    MsgBox (ListeRetourDVD.Column(0))
 
End Sub

[alexandrebergercyr]

Code :

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

1
2
3
 
Set oDb = CurrentDb 
oDb.Execute "UPDATE table1 SET champ = 1 WHERE champ='2'"

Ce code marche... Donc, je crois que c'est "ListeRetourDVD.Column(0)" qui a un bug...

Dis moi où ça bug et le message d'erreur stp.
Merci d'avance
Alex

[tAKAmAkA]

Bonjour,

Si ta liste te retourne un texte il faut des simples cotes.

Code :

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

= '" & ListeRetourDVD.Column(0) & "' " & ";"

[yagrasdemonde]

Olalala honte à moi....
Me suis trompé dans la requete au niveau du WHERE
Il s'agissait de id_location et non de id_dvd.....

Hahum No comment

En tout cas merci bien a vous de vous etres penché sur la question....

[Heureux-oli]

Mais de toute façon c'est la solution de takamaka qui est la bonne.

C'est le nombre de " qui compte.

[yagrasdemonde]

vi je suis d'accord mais la ce sont des id (numéro auto) qui me sont retournés

[Heureux-oli]

Je pense que c'est normal, c'est la colonne 0 et en général elle contient la clé primaire qui est cachée par l'assistant.
Essaie avec la colonne 1.