AYUDA URGENTE!!!!!
Publicado por George (2 intervenciones) el 14/06/2007 09:03:58
Hola, buenos dias
tengo un pequeño problema con este codigo. Me funciona en todos los equipos de mi
oficina menos en uno.
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
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
tengo un pequeño problema con este codigo. Me funciona en todos los equipos de mi
oficina menos en uno.
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
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