Monat: Oktober 2017

Mit folgendem VBA-Skript kann der Produkt-Key für Windows 7 ausgelesen werden: 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″…

Allgemein