Problemas con WMI
Publicado por jorge (2 intervenciones) el 13/06/2007 15:39:54
Private Sub GetSerialNumber()
Dim search As New ManagementObjectSearcher("SELECT * FROM Win32_BIOS")
Dim info As ManagementObject
For Each info In search.Get()
GlobalValue += info("SerialNumber").ToString()
Next
End Sub
Hola, buenas tardes
tengo un pequeño problema con este codigo. Me funciona en todos los equipos de mi oficina menos en uno.
He comprobado los servicios WMI del equipo (XP SP2) y aparentemente esta todo correcto.
El problema es que no me deja acceder a la BIOS. me salta una excepcion de NullReference.
Alguien sabe que puede ser.
Gracias
Dim search As New ManagementObjectSearcher("SELECT * FROM Win32_BIOS")
Dim info As ManagementObject
For Each info In search.Get()
GlobalValue += info("SerialNumber").ToString()
Next
End Sub
Hola, buenas tardes
tengo un pequeño problema con este codigo. Me funciona en todos los equipos de mi oficina menos en uno.
He comprobado los servicios WMI del equipo (XP SP2) y aparentemente esta todo correcto.
El problema es que no me deja acceder a la BIOS. me salta una excepcion de NullReference.
Alguien sabe que puede ser.
Gracias
Valora esta pregunta
0