PDA

View Full Version : Need Help decoding Vista and Win7 Product IDS


AtYourService
08-19-2009, 06:17 AM
Working on my program and trying to finish up the productID decoder that decodes the registry key to what type of windows version it is, I need more examples to determine vista/win7 version


HKEY_LOCAL_MACHINE\Software\Microsoft\WindowsNT\Cu rrent Version\
"ProductID" ^its the first 5chars and the 2nd 3chars that i need

00428 = Windows 7 - Ultimate Edition RC 32-bit
00447 = Windows 7 - Ultimate Edition RC 64-bit
89578 = Vista Home Premium
89587 = Vista Ultimate 64-Bit???



http://img442.imageshack.us/img442/5781/getkey.jpg

if you have vista or win7 you can run its vbs script and it will output the info ineed to a text file in the same directory that its run in

Dim strValueData

strComputer = "."
Set fso = CreateObject("Scripting.FileSystemObject")
Set TxtFile = fso.CreateTextFile("Info.txt", True)
Set WshShell = WScript.CreateObject("WScript.Shell")
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colOperatingSystems = objWMIService.ExecQuery _
("Select * from Win32_OperatingSystem")

For Each objOperatingSystem in colOperatingSystems
TxtFile.WriteLine "ProductName: " & objOperatingSystem.Caption

strValueData = objOperatingSystem.SerialNumber
strValueData = Left(strValueData, Len(strValueData) - 14)



TxtFile.WriteLine "ProductId: " & strValueData
Next
TxtFile.Close

it will look something like this
ProductName: Microsoft Windows 7 Ultimate
ProductId: 00428-321

acs
08-19-2009, 06:36 AM
ProductName: Microsoft® Windows Vista™ Home Premium
ProductId: 89578-OEM

AtYourService
08-19-2009, 09:22 PM
thank you , thats 2 home premiums that match :)

iisjman07
08-20-2009, 06:48 AM
I'll run it later today, bit busy atm

EDIT:

Spare 5 minutes:

ProductName: Microsoft® Windows Vista™ Home Premium
ProductId: 89578-OEM