Serial del disco duro

Question

Saludos, necesito saber como obtener el serial del disco en Visual Basic Net, si es posible a través de una función

Answer 1

Saludos. A ver si esto te ayuda

' BIOS.

Dim

mc AsNew ManagementClass("Win32_BIOS")

Dim

moc As ManagementObjectCollection = mc.GetInstances()

For

Each moAs ManagementObjectIn moc

    Console.WriteLine(mo(

"SerialNumber").ToString())

Next

 

' Volume.

Dim

objQuery AsNew ObjectQuery("SELECT * FROM Win32_LogicalDisk WHERE Name = 'C:'")

Dim

mos AsNew ManagementObjectSearcher(objQuery)

For

Each moAs ManagementObjectIn mos.Get()

    Console.WriteLine(mo(

"VolumeSerialNumber").ToString())

Next

 

' HD físico.

Dim

mos1 AsNew ManagementObjectSearcher("SELECT * FROM Win32_PhysicalMedia")

For

Each moAs ManagementObjectIn mos1.Get()

    Console.WriteLine(mo(

"SerialNumber").ToString())

Next

---

[]s.

Alan.

Answer 2

hola

por ahi este link ayude

Use WMI to get the serial number from the provided HDD's drive letter

si la unidad que es fija podrias ponerla directo en la query a WMI

saludos

---

Leandro Tuttini

Blog
Buenos Aires
Argentina

Answer 3

Hola:

Si te refieres a conocer el número de serie del disco duro, el número que viene «de fábrica», tienes que utilizar los servicios de «Windows Management Instrumentation». Para ello, tienes que referenciar en tu proyecto el ensamblado .net «System.Management», y ejecutar algo parecido a lo siguiente:

        Dim disco As New  _
            System.Management.ManagementObject( _
            "Win32_PhysicalMedia='\\.\PHYSICALDRIVE0'")

        Try
            MessageBox.Show(disco.Properties("SerialNumber").Value.ToString, _
                "Número de Serie", _
                MessageBoxButtons.OK, MessageBoxIcon.Information)

        Catch ex As Exception
            MessageBox.Show(ex.Message)

        End Try

Si no puedes leer el número de serie, tienes que procurar ejecutar el código fuente con una cuenta de Administrador, o con otra cuenta de usuario que tenga los suficientes permisos para leer el número de serie del disco duro.

Es otra alternativa a la tercera opción indicada por el usuario Alan C.

Un saludo

---

Enrique Martínez [MS MVP - VB]

Answer 4

"Leandro Tuttini" escribió:

> por ahi este link ayude
>
> Use WMI to get the serial number from the provided HDD's drive letter

Pero el código que aparece en ese enlace, es para leer el número de serie del VOLUMEN de la unidad, es decir, la información que devuelve la clásica función API «GetVolumeInformation», número éste que según tengo entendido cambia al FORMATEAR la unidad.

El número de serie del DISCO DURO, es otro número bien diferente, y como es natural, no cambia cada vez que se formatea la unidad. :-)

 

 

---

Enrique Martínez [MS MVP - VB]