Discussion :

[kirua2150]

Bonjour à tous,

J'ai de nouveau un probleme de compatibilité de code entre access 2000 et 2003.

J'utilise une zone de liste modifiable, que je manipule en VBA.
J'utilise notamment les fonctions :
-> pour vider la liste :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
    cpt = listeAttributs.ListCount
    For I = 0 To cpt - 1
        listeAttributs.Remove (0)
    Next

-> pour ajouter un élément :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
    Set myrs = myDB.OpenRecordset("SELECT ...")
    Do While Not myrs.EOF
        Listeattribut.AddItem (myrs("name"))
        myrs.MoveNext
    Loop

Cela fonctionee bien sur 2003 mais pas sur 2000, où les méthodes remove et additem ne sont pas implantés. Ya t'il d'autres méthodes pour ajouter/supprimer un élément, ou d'autres moyen d'effectuer ce que je souhaite faire?

Merci

[Janny]

Salut,

déjà pour vider ta liste, tu n'est pas obligé de faire une boucle :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

listeattributs.RowSource = ""

ce code là est suffisant

Ensuite concernant l'ajout d'un élément, je ne connais pas d'autres possibilités que additem mais ça doit bien exister...

[Invité]

Bonjour

Pour ajouter les éléments sous 2000, il faut utiliser la méthode suivante

1 - Déclarer une variable de type String
2 - Faire une boucle pour remplir cette variable de manière à ajouter un élément à chaquer fois en les séparant par un ; du type
Exemple :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

strSource = strSource & ";" & mavaleur

3 - Ensuite tu alimentes ta combobox avec cette variable.

Starec

[kirua2150]

Merci à tous les deux, vos deux solutions fonctionnent.