product key win xp waar te vinden

Status
Niet open voor verdere reacties.

goom

Gebruiker
Lid geworden
27 jul 2002
Berichten
302
ik weet dat er een bestand is waar de product key van windows xp staat
kan iemand mij aangeven waar ik dit bestand op de pc kan vinden?
 
het probleem zit toch ff anders
op de pc heb ik win xp gezet met een product code van iemand anders
deze code is al reeds geactiveerd
maar zie dat er al eerder windos xp op gezet is
en zou daar die code willen gebruiken
 
o ja de pc is gratis gekregen en ik wist dat er ooit win xp op gedraaid is
alleen de code wist men niet meer
 
Als je die geactiveerde key al hebt gebruikt voor een herstel/herinstallatie, is die oude eraf, hoor.
 
de nu ingegeven productkeys zijn niet goed deze zijn van andere pc maar er staat ergens een map windows die ooit hier gedraaid heeft en ik vroeg mij af of daar ergens product keys van te vinden zijn
 
Als de Windows map van de vorige installatie nog intact aanwezig is kan je de Key code er wel uit krijgen :)
Dan moet je in deze map van die windows zijn

C:\andereWINDOWS\system32\config

Daar vind je een bestand die heet software (Niet de software.sav)
open regedit en klik de HKEY_LOCAL_MACHINE aan en klik links boven bestand en kies voor " Bestand invoeren (" Load Hive " - ik heb engels) surf naar die Config map en kies de software hive en geef die na invoeren een willekeurige naam " Whatever" ..

Plak onderstaand script in kladblok en sla op als FindKeyCode.vbs

Pas in het script de volgende regel aan achter HexBuf=WshShell.RegRead
("HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\DigitalProductId")

naar

HKLM\Whatever\Microsoft\Windows NT\CurrentVersion\DigitalProductId

en run het script

Code:
Rem lookup digital product id from registry
Set WshShell = WScript.CreateObject("WScript.Shell")
HexBuf = WshShell.RegRead("HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\DigitalProductId")
For l = lBound(HexBuf) to uBound(HexBuf)
tmp=tmp & " "& Hex (HexBuf(l))
next

WshShell.Popup  "Found Digital Product Id in registry:-" &  _
"                                                                                                                    " &  _
"                                                                                                                    " &  _
"                                                                                                                    " & tmp
StartOffset = 52
EndOffset =67
Dim Digits (24)

Digits (0) = "B" : Digits (1) = "C": Digits (2) = "D": Digits (3) = "F":
Digits (4) = "G": Digits (5) = "H": Digits (6) = "J": Digits (7) = "K":
Digits (8) = "M": Digits (9) = "P": Digits (10) = "Q": Digits (11) = "R":
Digits (12) = "T": Digits (13) = "V": Digits (14) = "W": Digits (15) = "X":
Digits (16) = "Y": Digits (17) = "2": Digits (18) = "3": Digits (19) = "4":
Digits (20) = "6" : Digits (21) = "7" : Digits (22) = "8": Digits (23) = "9"

dLen = 29
sLen = 15
Dim HexDigitalPID (15)
Dim Des (30)
For i = StartOffset to EndOffset
HexDigitalPID (i-StartOffset) = HexBuf(i)
tmp2=tmp2 & " "& Hex (HexDigitalPID(i-StartOffset))
next
WshShell.Popup  "Found Digital Product Id in registry:-" &  _
"                                                                                                                    " &  _
"                                                                                                                    " &  _
"                                                                                                                    " & tmp & _
"                                                                                                                  " & _
"                                                                                                                  " & _
"                                                                                                                  " & _
"                                        " & _
"Located the sequence in the digital product ID. Can you see it in the one above (Tip:- 2nd line, 8 in from the left) :- " & _
"                                                                                                                  " &  _
"                                                                                                                  " & tmp2
KEYSTRING =""
for i=dLen-1 to 0 step -1
if ((i + 1) mod 6) = 0 then
Des (i) = "-"
KEYSTRING =KEYSTRING & "-"
else
HN = 0
    For N = (sLen -1) to 0 step -1
      Value = ( (HN *2^8 ) Or HexDigitalPID (N))
       HexDigitalPID (N) = Value \ 24
       HN    = (Value mod 24)

    next

Des(i) = Digits(HN)
KEYSTRING =KEYSTRING & Digits(HN)
end if
next
KEYSTRING2 = StrReverse (KEYSTRING)
WScript.Echo "Having finished messing about performing mathmatical stuff" & _
" on your Product ID i have come to the conclusion your XP Key is:- " & _
"                                         " & KEYSTRING2


:thumb:
 
product key

hoi

ik heb een computer gekregen van mijn oma een heeele oude maar wel met windows xp.
hij is al een paar keer uitgevallen omdat ik windows niet heb geactiveerd ik kan ook helemaal nergens een product key vinden of het certificaat van echtheid ik heb al een paar keer geprobeerd met die links die op deze site staan maar het lukt me niet. kunt u mij helpen?

jelmar
 
Laatst bewerkt:
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan