Adodc2.recordsource="select * from table where champs = '" & liste1 & '"' liste2.additem "tout" for i=0 to ADODC2.recordcount liste.additem adodc2.recodset.field(numeros du champs) adodc2.recordset.movenext Liste2.visible = true
Adodc2.recordsource="select * from table where champs = '" & liste1 & '"'
set liste2.rowsource = adodc2 Liste.listfield = "Champs
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question