Obtener el número de serie del ordenador en Windows
Publicado por lcflores en Diciembre 5th 2007
Hay veces en las que necesitamos el número de serie de nuestro equipo informático para saber si hay algún componente hardware que debe ser reemplazado, comprobar si hay defectos reconocidos por los fabricantes… etc.
La mayoría de los fabricantes incluyen una pegatina o similar con el número de serie del equipo, por ejemplo, en los portátiles es típico que esta aparezca en la base identificando el número como S/N. Si nuestro equipo no dispone de esa etiqueta o no somos capaces de localizarla, podemos usar el siguiente Script (WSH) para entornos Windows.
On Error Resume NextDim System If Wscript.Arguments.Count>0 then sSystem=Wscript.Arguments(0) End if pc=“localhost” winmgmt = “winmgmts:{impersonationLevel=impersonate}!//”& pc &“” Set grupoSN = GetObject( winmgmt ).InstancesOf (“Win32_BIOS”) For each SN in grupoSN MsgBox “El número de serie es: “ & SN.SerialNumber Next
Crear un nuevo fichero de texto, copiar el código anterior y salvar el fichero cómo “ObtenerSN.vbs”, es importante que la extensión sea “.vbs” y no “.txt” para que podáis ejecutarlo.
Publicado en Trucos | 1 Comentario »