salut, sous vb6

je dispose d'une table access 2002  (Produit: Code, libellé,...)

Dans une form je dispose d'un adodc1 relié a la table Produit.

un datacombo est relié a l'adodc1(datasource  et rowsource) et le champs listfield concerne le libéllé.

dans une caption je voudrais en fonction de l'element choisi dans le combo qu'il affiche le libelle du prod corrspondant?

Le code est le suivant:

Private Sub DataCombo1_Click(Area As Integer)

        Adodc1.Recordset.Filter = "LIBELLE='" & DataCombo1.selText & "'"
        lblnumdoc.caption = Adodc1.Recordset!CODE_PRODUIT
       
   
       
End Sub

Ce code n'est pas correct.Je me retrouve avc plusieurs mm libellé pour des codes prod differents!

Aidez moi jsui sur c pas grand choz mai je blok depuis tro logtps
merci