Crea un file di script VBScript con i seguenti codici. Salva il file con estensione .vbs, ad esempio: ProductKey.vbs: fai doppio clic sul file. Se hai una finestra piratata, vedrai vuota! Ma se hai un Windows originale, potrai vedere il productKey
Codice:
Imposta WshShell = CreateObject ("WScript. Guscio")
MsgBox ConvertToKey (WshShell. RegRead("HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\DigitalProductId"))
Funzione ConvertToKey (chiave)
Const KeyOffset = 52
io = 28
Caratteri = “BCDFGHJKMPQRTVWXY2346789”
Fare
Cur = 0
x = 14
Fare
Cur = Cur * 256
Cur = Tasto (x + KeyOffset) + Cur
Tasto (x + KeyOffset) = (Cur \ 24) E 255
Cur = Cur Mod 24
x = x -1
Ciclo Mentre x >= 0
io = io -1
KeyOutput = Mid (Chars, Cur + 1, 1) & KeyOutput
Se (((29 – i) Mod 6) = 0) E (i -1) Allora
io = io -1
KeyOutput = “-” & KeyOutput
Finisci se
Ciclo Mentre i >= 0
ConvertToKey = KeyOutput
Fine funzione