Speccy showing wrong Windows 8 Pro PRODUCT KEY

[SpeccyFan]

I am using latest Speccy version 1.19.411 as of 29 December 2012. Under system summary, Speccy is displaying the wrong product key which does not even remotely match with the actual product key with which I have activated Windows 8 Professional.

 

Please Help!

[hazelnut]

Did you install Windows Media Center with a key also?

 

Was Win 8 a clean install or an upgrade?

[SpeccyFan]

No I have not installed Windows Media Center. I have done a clean install of Windows 8 Professional. (I received this Windows 8 Pro as a free software from Microsoft Dreamspark)

 

Do you think there is some configuration problem with my pc?

[Super Fast]

As the key has to come from somewhere, wonder if you search the "wrong" key that Speccy gives you in the registry if it finds it?

[hazelnut]

I have just had a look at my Win8 64bit machine with Speccy and the key shown in Speccy is not the product key I used when I clean installed Win 8.

 

Nor is it the key for Windows media center (just to discount that theory)

 

Can anyone else with Windows 8 have a look with Speccy and see if theirs is the right product key? I am looking under Operating System, serial key info, 5 digits shown in blocks of 5.

[Nergal]

I've had this issue (with multipke key finding programs) in 7 and 8. Do other key revealers do the same key?

Edited December 29, 2012 by Nergal

[SpeccyFan]

Well hopefully they would correct it soon..........

 

SuperFast can you be more specific.......coz I did a string search of a small part of both the original key as well as the one Speccy is showing and couldn't find both...

[SpeccyFan]

I've had this issue (with multipke key finding programs) in 7 and 8. Do other key revealers do the same key?

 

I haven't tried any other key "revealing" programs...

[nodles]

I've had this issue (with multipke key finding programs) in 7 and 8. Do other key revealers do the same key?

Same here (on Win7). They might encrypt the key differently or it depends which kind of key is used..? Is it Retail, OEM, which Win version etc?

[FrankUK]

Just trying to create a list of my software keys in one place and encountered this problem. In November I bought a new Dell laptop with Win7 installed and Speccy found the correct Win7 key. In late November I did the low cost Windows 8 Pro upgrade (not certain that was a good thing to do based on how Win8 works) and now the license key displayed by Speccy is nothing like either the Win7 or Win8 keys. I know what the keys are (because I wrote them down). I don't know if this helps the problem solvers or just makes it more difficult. Frank

[barneypoo69]

I just checked my Speccy program. The product key # on the tag on the case of the PC is different from the serial # (is this product key #?) in the summary of operating system.

[RunAmok]

For what it's worth, Speccy 119 still shows the correct product key under XP. Of course, you won't find in in the registry since it's encoded/encrypted there. From the above, I'm guessing that they changed the encryption under W7 and W8 and Speccy is not decrypting it correctly?

[vpcnc]

Speccy 1.23.569 also reports the wrong product key for windows 8 and windows 8.1

 

for what it's worth - Here is some vb.net code that will properly display the windows 8 and windows 8.1 key.

I've used this in my Own Key finder application, so I know it works correctly.

 

 

 

'// Open source product key decryptor by 'The Dev'
'// No limitations on this code, you may pass, share
'// and use it however you like. Enjoy.
'//
'// Thanks to nononsense for the decryptor method
'This option is important, remove it and see what happens.
Option Explicit Off
Public Class main
#Region "Form Load Event" ' We call our key decryption here in the load event.
   Private Sub loadevent(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
    ' Calling the decryption method and specifying the location of our encrypted product key
    Me.decodedkey.Text = ConvertToKey(WshShell.RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion" & "\DigitalProductId"))
   End Sub
#End Region
   'Original decryptor without the bugfix has been commented out.
#Region "Previous DigitalProductId Decryptor"
   ' Public KeyOutput As String
   ' Public WshShell As Object = CreateObject("WScript.Shell")
   ' Function ConvertToKey(ByVal Key)
   'Offsets for Windows are 52-67
   '  Try
   ' Const KeyOffset = 52
   '    isWin8 = (Key(66) \ 6) And 1
   '  Key(66) = (Key(66) And &HF7) Or ((isWin8 And 2) * 4)
   '   i = 24
   'Hex
   '   Chars = "BCDFGHJKMPQRTVWXY2346789"
   '   Do
   '	  Cur = 0
   '	  X = 14
   '	 Do
   '	   Cur = Cur * 256
   '	    Cur = Key(X + KeyOffset) + Cur
   '	   Key(X + KeyOffset) = (Cur \ 24)
   '	  Cur = Cur Mod 24
   '	  X = X - 1
   '   Loop While X >= 0
   '   i = i - 1
   '    KeyOutput = Mid(Chars, Cur + 1, 1) & KeyOutput
   '	   Last = Cur
   ' Loop While i >= 0
   '  If (isWin8 = 1) Then
   '   keypart1 = Mid(KeyOutput, 2, Last)
   '   insert = "N"
   '   KeyOutput = Replace(KeyOutput, keypart1, keypart1 & insert, 2, 1, 0)
   '   End If
   '    aa = Mid(KeyOutput, 1, 5)
   '   bb = Mid(KeyOutput, 6, 5)
   '   cc = Mid(KeyOutput, 11, 5)
   '   dd = Mid(KeyOutput, 16, 5)
   '   ee = Mid(KeyOutput, 21, 5)
   '   ConvertToKey = aa & "-" & bb & "-" & cc & "-" & dd & "-" & ee
   '  Catch ex As Exception
   '	  MessageBox.Show(ex.Message)
   '  End Try
   ' End Function
#End Region
#Region "Updated DigitalProductId Decryptor"
   Public KeyOutput As String
   Public WshShell As Object = CreateObject("WScript.Shell")
   Function ConvertToKey(Key)
    Const KeyOffset = 52
    isWin8 = (Key(66) \ 6) And 1
    Key(66) = (Key(66) And &HF7) Or ((isWin8 And 2) * 4)
    i = 24
    Chars = "BCDFGHJKMPQRTVWXY2346789"
    Do
	    Cur = 0
	    X = 14
	    Do
		    Cur = Cur * 256
		    Cur = Key(X + KeyOffset) + Cur
		    Key(X + KeyOffset) = (Cur \ 24)
		    Cur = Cur Mod 24
		    X = X - 1
	    Loop While X >= 0
	    i = i - 1
	    KeyOutput = Mid(Chars, Cur + 1, 1) & KeyOutput
	    Last = Cur
    Loop While i >= 0
    If (isWin8 = 1) Then
	    keypart1 = Mid(KeyOutput, 2, Last)
	    insert = "N"
	    KeyOutput = Replace(KeyOutput, keypart1, keypart1 & insert, 2, 1, 0)
	    If Last = 0 Then KeyOutput = insert & KeyOutput
    End If
    a = Mid(KeyOutput, 1, 5)
    b = Mid(KeyOutput, 6, 5)
    c = Mid(KeyOutput, 11, 5)
    d = Mid(KeyOutput, 16, 5)
    e = Mid(KeyOutput, 21, 5)
    ConvertToKey = a & "-" & b & "-" & c & "-" & d & "-" & e
   End Function
#End Region
End Class

 

If it helps make Speccy better,

i'd accept a copy of the pro version as a thank you gift...