Lister les dossiers des disques locaux, avec la méthode wmi + classe collection

Soyez le premier à donner votre avis sur cette source.

Vue 6 113 fois - Téléchargée 752 fois

Description

Cette source sert à lister tous les dossiers des disques locaux.
Selon le choix du Disque, les dossiers sont proprosés dans une liste, puis après choix, quelques infos s'affichent.
(possiblité d'en mettre plus, dites le si vous êtes intéressés)

Je vais essayer de rajouter aussi les fichiers.

Source / Exemple :


Public Function Add(ByVal Drive As String, ByVal FolderType As String, _
                    ByVal Hidden As String, ByVal Name As String, _
                    ByVal Path As String, ByVal Readable As String, _
                    ByVal Writable As String) As clsInfoFolder
                    
    Dim NewInfos         As New clsInfoFolder
    Static Counter       As Long
    Static sDriveTemp    As String
   
    If sDriveTemp <> Drive Then
        Counter = Counter + 1
        sDriveTemp = Drive
        mcolDrive.Add Drive, CStr(Counter)
        ReDim Preserve mcolNewInfos(Counter)
    Else
        With NewInfos
           .ID = Path
           .sDrive = Drive
           .sFolderType = FolderType
           .sHidden = Hidden
           .sName = Name
           .sPath = Path
           .sReadable = Readable
           .sWritable = Writable
           mcolNewInfos(Counter).Add NewInfos
        End With
        Set Add = NewInfos
    End If
End Function

Codes Sources

A voir également

Ajouter un commentaire

Commentaires

mortalino
Messages postés
6812
Date d'inscription
vendredi 16 décembre 2005
Statut
Membre
Dernière intervention
21 décembre 2011
15 -
Super, merci pour le renseignement ;) (n'ai que XP)
++
violent_ken
Messages postés
1822
Date d'inscription
mardi 31 mai 2005
Statut
Membre
Dernière intervention
26 octobre 2010
-
Je rajouterais le test était effectué sous Vista Professionel (6000) ^^

@+
mortalino
Messages postés
6812
Date d'inscription
vendredi 16 décembre 2005
Statut
Membre
Dernière intervention
21 décembre 2011
15 -
Salut Violent_Ken,

merci pour ton comm, je suis donc rassuré sur le bon fonctionnement de la source, car je n'ai pu le tester que sous 2 PC différent.

J'ai fait cette source pour m'habituer à utiliser WMI, en prévi d'une future source (+ intéressante, j'espère ;) )

@++
violent_ken
Messages postés
1822
Date d'inscription
mardi 31 mai 2005
Statut
Membre
Dernière intervention
26 octobre 2010
-
Salut, personnellement je n'utilise jamais WMI (notamment car c'est trop lent), mais sinon le code fonctionne bien (pas mal d'nfos récupérables).

@+
mortalino
Messages postés
6812
Date d'inscription
vendredi 16 décembre 2005
Statut
Membre
Dernière intervention
21 décembre 2011
15 -
Le Listing des dossiers est +/- long, suivant le nombre de dossiers.
La fonction liste les DD locaux, virtuels, réseaux et clés USB.

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.