Bonjour à tous,

j'ai un problème avec une requete Update sous Visual Basic 6.0

J'ai le code suivant :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
 
Dim cmd As New ADODB.Command
cmd.ActiveConnection = connexion
cmd.CommandText = "Update avoir " & _
        " set Code_MC=(Select Max(Code_MC) from Main_Courante)" & _
        " where Code_Equipe=" & Feuille_Démarrage.Nom_Equipe.ItemData(Feuille_Démarrage.Nom_Equipe.ListIndex) & _
        " and Code_Vacation=" & Feuille_Démarrage.Libellé_Vac.ItemData(Feuille_Démarrage.Libellé_Vac.ListIndex) & _
        " and Numero_Agent=" & Feuille_Démarrage.Nom_Ctq_Ou_Adjoint.ItemData(Feuille_Démarrage.Nom_Ctq_Ou_Adjoint.ListIndex) & _
        " and Date_Vacation=#" & Format(Feuille_Démarrage.Label9.Caption, "mm/dd/yyyy") & "#;"
MsgBox cmd.CommandText
cmd.Execute
Mais il me fait l'erreur suivante :

Erreur d'éxecution '-2147467259(80004005)'
L'opération doit utiliser une requête qui peut être mise à jour.

Pouvez-vous m'aider?

Merci d'avance.[/code]