Chargement combo à partir d'un autre

Fermé
js8bleu Messages postés 576 Date d'inscription samedi 14 octobre 2006 Statut Membre Dernière intervention 27 janvier 2014 - 27 nov. 2010 à 11:15
Bonjour à tous,

je code en VB6. J'ai 4 combobox. Lorsque je sélectionne le combo1, en fonction du choix, il charge les données de la combo2. Lorsque je sélection un item de la combo2 il charge les données de la combo3. Ainsi de suite. Je souhaiterai savoir si cette méthode est gourmande en mémoire d'autant plus que mon application est en réseau et que souvent les données chargées par combo peuvent atteindre la dizaine. Ou peut-être que mon code n'est pas optimisé. Voici la partie de mon code qui charge cmbpropriete en fonction du choix de cmbexamen.


    cmbpropriete.Clear
    
    Dim rscmbexamen As New ADODB.Recordset
    rscmbexamen.Open "select numexamen from Tableexamen where nomexamen = '" & Replace(cmbexamen.Text, "'", "''") & "' ", cn, adOpenStatic, adLockPessimistic
    txtnumexamen.Text = rscmbexamen.Fields(0)

    cmbpropriete.Clear

    Dim rspropriete As New ADODB.Recordset
    rspropriete.Open "select nompropriete from Tablepropriete where numexamen = " & txtnumexamen & " order by nompropriete", cn, adOpenDynamic, adLockOptimistic
    
    Do While Not rspropriete.EOF
    cmbpropriete.AddItem rspropriete.Fields(0)
    rspropriete.MoveNext
    Loop



Merci d'avance pour votre très précieuse aide.

Cordialement.