Win10 Product Key

Started by stanl, January 21, 2019, 04:22:20 AM

Previous topic - Next topic

stanl

Code (WINBATCH) Select


strComputer = "."
oWMI = GetObject( "winmgmts:\\" : strComputer : "\root\cimv2")
WQL = 'SELECT * FROM SoftwareLicensingService'
oLicSvc = oWMI.ExecQuery(WQL)


ForEach m in oLicSvc
   v="Version: ":m.Version
   c="Client ID: ":m.ClientMachineID
   p="Product Key: ":m.OA3xOriginalProductKey
   k="KMS ID: ":m.KeyManagementServiceProductKeyID
   message("",v:@LF:c:@LF:p:@LF:k)
Next


oLicSvc=0
oWMI=0


Exit

a14erman!