Get Serial Number of Operating system Installed - VBScript

Set SNSet = GetObject("winmgmts:").InstancesOf ("win32_OperatingSystem")


for each SN in SNSet
MsgBox "The serial number for the installed OS is: " & SN.SerialNumber
Next