How to Find Product Key Using Notepad in Windows
To see the Windows Product Key, you can utilize a Visual Basic content (VB) to recover the key from the registry. The accompanying advances will demonstrate to you proper methodologies to make such a content.
Stage 1: Create another content record in your PC.
Right-click a vacant region in the Desktop or File Explorer, and select New> Text Document.
Stage 2: Then reorder the accompanying code into Notepad.
Set WshShell = CreateObject ("WScript.Shell")
MsgBox ConvertToKey (WshShell.RegRead ("HKLM \ SOFTWARE \ Microsoft \ Windows NT \ CurrentVersion \ DigitalProductId"))
Capacity ConvertToKey (Lock)
Const KeyOffset = 52
I = 28
Singes = "BCDFGHJKMPQRTVWXY2346789"
To
Mongrel = 0
x = 14
To
Mongrel = Cur * 256
Mongrel = Lock (x + KeyOffset) +
Mongrel Cur (x + KeyOffset) = (Cur \ 24) And 255
Mongrel = Cur Mod 24
x = x - 1
Circle While x> = 0
I = I - 1
KeyOutput = Medium (Chars, Cur + 1, 1) and KeyOutput
In the event that ((29 - I) Mod 6) = 0) And (I <> - 1) Then
I = I - 1
KeyOutput = "- " and KeyOutput
End If
Circle While i> = 0
ConvertToKey = KeyOutput
End Function
Stage 3: Now spare the record utilizing the .vbs expansion (rather than .txt).
Stage 4: To run the content, double tap the .vbs document. You will see a popup with your item code. Press CTRL + C on the off chance that you need to duplicate the key.
read more here:Windows 10 Product key
Stage 1: Create another content record in your PC.
Right-click a vacant region in the Desktop or File Explorer, and select New> Text Document.
Stage 2: Then reorder the accompanying code into Notepad.
Set WshShell = CreateObject ("WScript.Shell")
MsgBox ConvertToKey (WshShell.RegRead ("HKLM \ SOFTWARE \ Microsoft \ Windows NT \ CurrentVersion \ DigitalProductId"))
Capacity ConvertToKey (Lock)
Const KeyOffset = 52
I = 28
Singes = "BCDFGHJKMPQRTVWXY2346789"
To
Mongrel = 0
x = 14
To
Mongrel = Cur * 256
Mongrel = Lock (x + KeyOffset) +
Mongrel Cur (x + KeyOffset) = (Cur \ 24) And 255
Mongrel = Cur Mod 24
x = x - 1
Circle While x> = 0
I = I - 1
KeyOutput = Medium (Chars, Cur + 1, 1) and KeyOutput
In the event that ((29 - I) Mod 6) = 0) And (I <> - 1) Then
I = I - 1
KeyOutput = "- " and KeyOutput
End If
Circle While i> = 0
ConvertToKey = KeyOutput
End Function
Stage 3: Now spare the record utilizing the .vbs expansion (rather than .txt).
Stage 4: To run the content, double tap the .vbs document. You will see a popup with your item code. Press CTRL + C on the off chance that you need to duplicate the key.
read more here:Windows 10 Product key
Nhận xét
Đăng nhận xét