Pregunta: | 62055 - SERIAL DE FABRICA DISCO DURO |
Autor: | Carlos Molina |
Saludos foristas. Tengo un programa hecho en visual basic 6.0 que lee el serial de fabrica del disco duro: Dim wmi As Object Dim mos As Object Dim mo As Object Set wmi = GetObject("winmgmts:\. ootcimv2") cCadWMI = "Select * from Win32_PhysicalMedia" Set oSistema = wmi.ExecQuery(cCadWMI) For Each disco In oSistema Text1.Text = Text1.Text & Chr(13) & " Serial de fabrica :" + disco.Serialnumber Next Me funciona de maravilla, pero ahora tengo una maquina con 3 disco duros y necesito saber cual es la letra del disco que le corresponde el serial. Ayuda por favor, como hago ya provee colocando driveletter, path, name, etc. y ninguna me funciona. Que estoy haciendo mal?... |