Discussion :

[Cereal123]

Bonjour,

Existe t-il une méthode "propre" pour récupérer dans VB.net le numéro de série d'un disque ? J'ai trouvé des exemples en C++, en delphi, avec les API,.. mais il doit bien exister une classe du Framework qui permette d'accéder à cette info, non ?

Merci de votre aide,

C.

[freddyboy]

Bonjour,

Existe t-il une méthode "propre" pour récupérer dans VB.net le numéro de série d'un disque ? J'ai trouvé des exemples en C++, en delphi, avec les API,.. mais il doit bien exister une classe du Framework qui permette d'accéder à cette info, non ?

Merci de votre aide,

C.

je pense que cela est faisable avec les WMI.
http://dotnet.developpez.com/tutoriels/wmi1/

@+

[bidou]

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
    Private Function GetDiskSerial() As String
 
        Dim diskClass As New System.Management.ManagementClass("Win32_LogicalDisk")
        Dim disks As System.Management.ManagementObjectCollection = diskClass.GetInstances()
        Dim disk As System.Management.ManagementObject
        For Each disk In disks
            If CStr(disk("Name")) = "C:" Then
                GetDiskSerial = disk("VolumeSerialNumber").ToString
            End If
        Next disk
 
    End Function

[Cereal123]

Merci de ces tuyau : je vais essayer tout de suite...