voici le nouveau code, pas de trop de changement mais bon ce coup si il me dit que dans requete SQL au niveau du & TxtSurname & , il me dit "un objet est requi"
Private Sub Form_Load()
'Connexion à la table Contact via la connexion BD
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.3.51;Persist security info=false;data source=C:\Multi-Gestion\bd\multigest.mdb"
Adodc1.RecordSource = "Contact"
'Définition du contenu du DataCombo
With DtaCName
Set .DataSource = Adodc1
Set .RowSource = Adodc1
.ListField = "Nom"
End With
End Sub
Private Sub TxtSurname_Change()
Adodc1.RecordSource = "Contact"
With DtaCName
Set .DataSource = Adodc1
Set .RowSource = "SELECT Nom FROM Contact WHERE Prenom LIKE '" & TxtSurname.Text & " % ' ORDER BY Prenom ;"
.ListField = "Nom"
End With
DtaCName.Refresh
End Sub
|
je ne comprend pas pourquoi j'ai pourtan suivi ce ke vous m'aviez dit :'(
Une autre petite question mais quel est la différence entre RecordSource, RecordSet et RowSource
Merci de vos réponses
-----------------------------------------------------------
La vie est bien trop courte pour se prendre la tête, alors profité de la vie et développer :)
-----------------------------------------------------------