今天工作的时候，为了检查一台服务器的序列号，没必要在跑到机房里了，所以在系统下就可以看机器序列号了。如下：

1、linux取序列号：

命令执行：dmidecode |grep "Serial Number"

2、windows取序列号：

strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\CIMV2")
Set colItems = objWMIService.ExecQuery("SELECT SerialNumber FROM Win32_BIOS")
For Each objItem In colItems
      WScript.Echo "SerialNumber: " & objItem.SerialNumber
Next

或

strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\CIMV2")
Set colItems = objWMIService.InstancesOf("Win32_BIOS")
For Each objItem In colItems
      WScript.Echo "SerialNumber: " & objItem.SerialNumber
Next

保存为get-sn.vbs，在windows下直接运行便可。