[usuarios_fox] Serial de Fabrica de las unidades de disco

 

Hola, quiero obtener el serial de fabrica de las unidades de disco, buscando encontré una rutina en La Web de Davphantom: que es esta:

*-Serial de Fabrica.

objWMI = GETOBJECT("winmgmts:\\")
cCadWMI = "Select * from Win32_PhysicalMedia"
oSistema = objWMI.ExecQuery(cCadWMI)

FOR EACH Disco IN oSistema
lnSerial = Disco.SerialNumber
? "Serial de fabrica :" + lnSerial
? "Serial de fabrica :" + STRCONV(lnSerial, 16)
NEXT

El resultado es este:

Serial de fabrica: 2020202057202D44435756414A35363035343436
Serial de fabrica: W -DCWVAJ5605446

Pero tendría que ser: WD-WCAV5J064564

Como lo podría solucionar? Muchas gracias.

[Se han eliminado los trozos de este mensaje que no contenían texto]

__._,_.___

Responder a remitente | Responder a grupo | Responder mediante la Web | Crear un tema nuevo

Mensajes con este tema (1)

Actividad reciente:

Visita tu grupo

Comentarios, observaciones o si deseas darte de baja avísame a: jamorquecho@hotmail.com

Cambiar a: Solo Texto, Rese\xc3\xb1a Diaria • Cancelar suscripción • Condiciones de uso

.

__,_._,___