Find any Windows Product Key without using any Software

Ordinarily it happens to every one of us that we need to reinstall Windows on our PC or portable PC yet we overlook Windows Product enter exceptionally on account of OEM forms where you don't have physical duplicate of Windows. Microsoft completely bolster retail duplicate of Windows DVD as contrast with OEM variants which accompanies your portable workstation or marked PCs. After some time the sticker that is glued on the base of your portable PC gets messy or evacuated and you may lose your key. In any case, the good thing is that your item key is still covered up in the registry documents on your framework yet in scrambled structure. So you require some sort of programming or script to decode it.

Use VB Script rather than Software 

You may be thinking why we need to utilize some other script when we can without much of a stretch download programming from web. The issue with windows key discoverer project is that all small programming are free and thus convey some kind of malignant code or malware in it. So it's ideal to discover key with your own particular minimal Visual essential script notice underneath. You should simply to duplicate the script into notebook document and spare it as "productkey.vbs" while selecting the recovery as record sort to All projects.



After you spare the document on Desktop double tap on it to run the record and another popup will open showing your Windows Product key.

Set WshShell = CreateObject(“WScript.Shell”)
MsgBox ConvertToKey(WshShell.RegRead(“HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\DigitalProductId”))

Function ConvertToKey(Key)
Const KeyOffset = 52
i = 28
Chars = “BCDFGHJKMPQRTVWXY2346789″
Do
Cur = 0
x = 14
Do
Cur = Cur * 256
Cur = Key(x + KeyOffset) + Cur
Key(x + KeyOffset) = (Cur \ 24) And 255
Cur = Cur Mod 24
x = x -1
Loop While x >= 0
i = i -1
KeyOutput = Mid(Chars, Cur + 1, 1) & KeyOutput
If (((29 – i) Mod 6) = 0) And (i <> -1) Then
i = i -1
KeyOutput = “-” & KeyOutput
End If
Loop While i >= 0
ConvertToKey = KeyOutput
End Function