Bonjour,

Je suis nouveau en VB6.
J'ai trouver sur Youtube un code qui me fallait.
Je l'ai recopier en mettant ce que j'ai besoin et ça ne marche pas pour moi alors que dans la video ça marche.
Pourtant j'ai recopié mot pour mot
Je ne comprend pas l'erreur

Voici le code :

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
 
Private Sub cmdModify_Click()
 
y = ListView1.SelectedItem
ConnectDB
rs.Open "Select * from TypeDeProduit where ID = " & y, db, 3, 3
rs.Update
rs(1) = TxtTypeProduit
rs.Update
Set rs = Nothing
db.Close: Set db = Nothing
LoadData
cmdModify.Enabled = False
cmdSave.Enabled = True
End Sub
Merci d'avance pour votre aide.

Julien