Recovery windows 8 product key from windows.old

thunder

New Member
Messages
7
Hi all,
I have upgraded to windows 8.1. I was wondering if the product key that is now associated to 8.1 is the same that were associated to my windows 8. Unfortunately, I have lost the product key of windows 8, and I would like to know how to recovery the old product key from the windows.old folder that have been created during the upgrade. Is it possible?



Thank you!
 

My Computer

System One

  • OS
    Windows 8.1
Is this a OEM manufacturer's PC with Pre-installed Windows 8?
If yes
Have you made the OEM manufacturer's Recovery Disks?
 

My Computer

System One

  • OS
    ME, XP,Vista,Win7,Win8,Win8.1
    Computer type
    PC/Desktop
    Other Info
    Notebooks x 3

    Desktops x 5

    Towers x 4
I have lost the product key of windows 8,

The product key will be in box or in the MS Store email.
 

My Computer

System One

  • OS
    ME, XP,Vista,Win7,Win8,Win8.1
    Computer type
    PC/Desktop
    Other Info
    Notebooks x 3

    Desktops x 5

    Towers x 4
The 8.1 key is the same as the 8.0 key after the upgrade. Run this VB script to get the key:

Open Notepad. Then copy all the data in the Code box below and paste it into Notepad.

Click File / Save as and save it as "ShowKey.vbs" on the Desktop. Include the double quotes or Notepad will add .txt to the end of the name.

Right click on ShowKey.vbs on the Desktop and select Run as Administrator.

Output is in a window on the Desktop. Click Yes to save it to Windows Key.txt in the same folder Showkeys.vbs is in which in this case should be your Desktop. It would be a good idea to print that file or save it somewhere so when you need it, it's available.

Code:
        Set WshShell = CreateObject("WScript.Shell")
        Key = "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\"
        DigitalID = WshShell.RegRead(key & "DigitalProductId")

        ProductName = "Product Name: " & WshShell.RegRead(Key & "ProductName") & vbNewLine
        ProductID = "Product ID: " & WshShell.RegRead(Key & "ProductID") & vbNewLine
        ProductKey = "Installed Key: " & ConvertToKey(DigitalID)
        ProductID = ProductName & ProductID & ProductKey

        If vbYes = MsgBox(ProductId & vblf & vblf & "Save to a file?", vbYesNo + vbQuestion, "Windows Key Information") then
           Save ProductID
        End if

        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

        Function Save(Data)
            Const ForWRITING = 2
            Const asASCII = 0
            Dim fso, f, fName, ts
            fName = "Windows Key.txt"
            Set fso = CreateObject("Scripting.FileSystemObject")
            fso.CreateTextFile fName
            Set f = fso.GetFile(fName)
            Set f = f.OpenAsTextStream(ForWRITING, asASCII)
            f.Writeline Data
            f.Close
        End Function

Script posted by NiFu here: How do I find my Product Key?
 
Last edited:

My Computer

System One

  • OS
    Windows 10 Pro X64
    Computer type
    PC/Desktop
    System Manufacturer/Model
    Lenovo IdeaCenter K450
    CPU
    Intel Quad Core i7-4770 @ 3.4Ghz
    Motherboard
    Lenovo
    Memory
    16.0GB PC3-12800 DDR3 SDRAM 1600 MHz
    Graphics Card(s)
    Intel Integrated HD Graphics
    Sound Card
    Realtek HD Audio
    Monitor(s) Displays
    HP h2207
    Screen Resolution
    1680x1050@59Hz
    Hard Drives
    250GB Samsung EVO SATA-3 SSD;
    2TB Seagate ST2000DM001 SATA-2;
    1.5TB Seagate ST3150041AS SATA
    PSU
    500W
    Keyboard
    Wired USB
    Mouse
    Wired USB
    Internet Speed
    3GB Up, 30GB Down
    Browser
    SeaMonkey
    Antivirus
    Windows Defender; MBAM Pro
    Other Info
    UEFI/GPT
    PLDS DVD-RW DH16AERSH
Ok, i found it with ProduKey (the vbs script doesn't works, saying "character not valid". Now I tried with that product key to downloadn an iso (to keep as backup) following this guide(I upgraded believing they would give me an iso file, but this is not the case) http://www.eightforums.com/tutorials/18309-windows-8-upgrade-iso-download-create.html. But it keeps saying that my product code is wrong. What am I doing wrong?
 

My Computer

System One

  • OS
    Windows 8.1
Sorry, fixed the VB script. No idea how I messed it up.
 

My Computer

System One

  • OS
    Windows 10 Pro X64
    Computer type
    PC/Desktop
    System Manufacturer/Model
    Lenovo IdeaCenter K450
    CPU
    Intel Quad Core i7-4770 @ 3.4Ghz
    Motherboard
    Lenovo
    Memory
    16.0GB PC3-12800 DDR3 SDRAM 1600 MHz
    Graphics Card(s)
    Intel Integrated HD Graphics
    Sound Card
    Realtek HD Audio
    Monitor(s) Displays
    HP h2207
    Screen Resolution
    1680x1050@59Hz
    Hard Drives
    250GB Samsung EVO SATA-3 SSD;
    2TB Seagate ST2000DM001 SATA-2;
    1.5TB Seagate ST3150041AS SATA
    PSU
    500W
    Keyboard
    Wired USB
    Mouse
    Wired USB
    Internet Speed
    3GB Up, 30GB Down
    Browser
    SeaMonkey
    Antivirus
    Windows Defender; MBAM Pro
    Other Info
    UEFI/GPT
    PLDS DVD-RW DH16AERSH

My Computer

System One

  • OS
    Windows 8.1
    Computer type
    PC/Desktop
    System Manufacturer/Model
    HP Pavilion 500-056
    CPU
    AMD Elite Quad-Core A8-6500
    Memory
    8 GB
    Graphics Card(s)
    AMD Radeon HD 8570D
    Monitor(s) Displays
    Acer 23"
    Screen Resolution
    1920 X 1080
    Hard Drives
    1 TB
    Keyboard
    Logitech Wave K350
    Mouse
    Logitech M510
    Internet Speed
    Fast
    Browser
    Firefox
    Antivirus
    Windows Defender

My Computer

System One

  • OS
    Windows 8.1.1 Pro with Media Center
    Computer type
    PC/Desktop
    System Manufacturer/Model
    Gateway
    CPU
    AMD K140 Cores 2 Threads 2 Name AMD K140 Package Socket FT1 BGA Technology 40nm
    Motherboard
    Manufacturer Gateway Model SX2110G (P0)
    Memory
    Type DDR3 Size 8192 MBytes DRAM Frequency 532.3 MHz
    Graphics Card(s)
    ATI AMD Radeon HD 7310 Graphics
    Sound Card
    AMD High Definition Audio Device Realtek High Definition Audio USB Audio Device
    Monitor(s) Displays
    Name 1950W on AMD Radeon HD 7310 Graphics Current Resolution 1366x768 pixels Work Resolution 1366x76
    Screen Resolution
    Current Resolution 1366x768 pixels Work Resolution 1366x768 pixels
    Hard Drives
    AMD K140
    Cores 2
    Threads 2
    Name AMD K140
    Package Socket FT1 BGA
    Technology 40nm
    Specification AMD E1-1200 APU with Radeon HD Graphics
    Family F
    Extended Family 14
    Model 2
    Extended Model 2
    Stepping 0
    Revision ON-C0
    Instruction
    Browser
    Opera 24.0
    Antivirus
    Avast Internet Security
Back
Top