Lister des états contenu dans un fichier access MDBRésolu

Question

Bonjour


Je souhaiterais afficher dans un programme VB6, la liste des états qui se trouve dans un fichier access.


J'arrive a exporter un état préci mais cela m'oblige a connaitre le nom de celui ci, s'il était possible de récupérer la liste ca serait plus pratique on pourrais lancer une boucle qui remplirait une liste pas exemple.


 


 


Merci d'avance pour votre aide.

Robinwood01 · Accepted Answer

Access.OpenCurrentDatabase App.Path & "\base.mdb", , 
        Dim dbs As DAO.Database
        Dim n As Integer
        Dim i As Integer
        Dim C As Container
        Set dbs = Access.CurrentDb        Set C dbs.Containers("Reports") 'ou Set C dbs.Containers(4)
            n = C.Documents.Count
            For i = 0 To n - 1
               MsgBox dbs.Containers("Reports")(i).Name
            Next i

rastasponch · Answer

Salut Robinwood01,

Tu stock quoi dans ta base access ? les chemin vers les états ?
Si c'est le cas il te suffit de faire un requête SQL du style :

rst.open "SELECT ChampCheminEtat FROM MaBase;", cnx

Ensuite pour la list, si tu utilise une ListBox :
Do while not rst.EOF
    ListBox.AddItem rst("ChampCheminEtat")
    rst.MoveNext
Loop

Robinwood01 · Answer

Non je les stoque pas, mais j'ai trouvé une solution je la posterais tout a l'heure.

Merci quand même

rastasponch · Answer

De rien !
N'oubli pas de marqué le sujet comme résolu.
Bon code à toi !

Lister des états contenu dans un fichier access MDB

4 réponses

Votre réponse

Discussions similaires