Récuperer taille d'un disque. [Résolu]

Messages postés
77
Date d'inscription
vendredi 31 décembre 2004
Dernière intervention
6 septembre 2010
- 6 mai 2009 à 10:15 - Dernière réponse :
Messages postés
77
Date d'inscription
vendredi 31 décembre 2004
Dernière intervention
6 septembre 2010
- 6 mai 2009 à 11:05
Bonjour a tous.

Je souhaite récuperer la taille de mon disque dur en VB 2005. Pour cela j'utilise WMI.
 
  Public Function get_hard_disk() As String
        Dim strSN As Int64
        Dim strQuery As String = "SELECT * FROM Win32_PhysicalMedia"
        Dim query As ManagementObjectSearcher = New ManagementObjectSearcher(strQuery)
        Dim queryCollection As ManagementObjectCollection = query.Get()
        Dim mo As ManagementObject

        For Each mo In queryCollection
            strSN = mo("Capacity")

        Next
        Return strSN
    End Function

Le probleme est qu'il me retourne ... 0 ...

Si quelqu'un vois le probleme, ou peut me donné une autre maniere de récuperer la taille de mon disque, je suis preneur.

Cordialement.

DeWaRs.
Afficher la suite 

Votre réponse

6 réponses

Meilleure réponse
Messages postés
401
Date d'inscription
mercredi 19 avril 2006
Dernière intervention
6 juin 2011
- 6 mai 2009 à 10:34
3
Merci
Bonjour,







For
Each dd As System.IO.DriveInfo In My.Computer.FileSystem.Drives

Debug.WriteLine(dd.TotalSize)

Next





Bonne Prog

Merci lesdis 3

Avec quelques mots c'est encore mieux Ajouter un commentaire

Codes Sources a aidé 88 internautes ce mois-ci

Commenter la réponse de lesdis
Meilleure réponse
Messages postés
401
Date d'inscription
mercredi 19 avril 2006
Dernière intervention
6 juin 2011
- 6 mai 2009 à 10:57
3
Merci
Suffit de chercher juste un peu dans l'intellisense :

 For Each dd As System.IO.DriveInfo In My.Computer.FileSystem.Drives
            If dd.IsReady Then
                Debug.WriteLine(dd.TotalSize)
            End If
        Next

Bonne Prog

Merci lesdis 3

Avec quelques mots c'est encore mieux Ajouter un commentaire

Codes Sources a aidé 88 internautes ce mois-ci

Commenter la réponse de lesdis
Messages postés
77
Date d'inscription
vendredi 31 décembre 2004
Dernière intervention
6 septembre 2010
- 6 mai 2009 à 10:49
0
Merci
Merci.

Cependant, il me met " The device is not ready. " dans Debug.WriteLine(dd.TotalSize).

Une idée ?
Commenter la réponse de cs_DeWaRs
Messages postés
77
Date d'inscription
vendredi 31 décembre 2004
Dernière intervention
6 septembre 2010
- 6 mai 2009 à 10:55
0
Merci
En fait il fait le scan pour le lecteur CD aussi, et vu qu'il n'y a rien, cela ne fonctionne pas. Comment puis-je selectionner uniquement le disque dur ??
Commenter la réponse de cs_DeWaRs
Messages postés
77
Date d'inscription
vendredi 31 décembre 2004
Dernière intervention
6 septembre 2010
- 6 mai 2009 à 11:01
0
Merci
Cool !

Le probleme maintenant, c'est qui me donne tous les lecteurs réseau mapper. Je peux spécifier le nom du lecteur par exemple, ou le fait qu'il soit en local ?
Commenter la réponse de cs_DeWaRs
Messages postés
77
Date d'inscription
vendredi 31 décembre 2004
Dernière intervention
6 septembre 2010
- 6 mai 2009 à 11:05
0
Merci
surement ac dd.name ... Je vais chercher un peu :)
Commenter la réponse de cs_DeWaRs

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.