Jump to content

Welcome to MSFN Forum
Register now to gain access to all of our features. Once registered and logged in, you will be able to create topics, post replies to existing threads, give reputation to your fellow members, get your own private messenger, post status updates, manage your profile and so much more. This message will be removed once you have signed in.
Login to Account Create an Account


Photo

Lost CD Key

- - - - -

  • Please log in to reply
9 replies to this topic

#1
teejayh

teejayh
  • Member
  • 2 posts
I have an OEM version of Windows XP Pro here that I lost the CD key. It has never been installed. Is there a way to find out what the key is from the CD or a way of contacting MS to find out or get a new key? Thanks! TJ


How to remove advertisement from MSFN

#2
mr_smartepants

mr_smartepants

    House vice-commander, shed CEO

  • Member
  • Pip
  • 90 posts
If you only have the XP CD (hologramed), you're out of luck since the key is not normally embedded in the CD.
If you have an OEM CD from a company (ie. Dell, HP, Compaq) then you can look in a few places. Search the CD for the following files:
WINNT.SIF
UNATTEND.TXT
OOBEINFO.INI

If you still have XP installed you're in luck, you could find it in a few places.

Create a text file called "getkey.vbs", edit it in notepad and add the following code:
Dim objFS, objShell
Dim strXPKey

Set objShell = CreateObject("WScript.Shell")

strXPKey = objShell.RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\ProductName")
If Len(strXPKey) > 0 Then
  WScript.Echo "[UserData]"
  WScript.Echo "ProductKey=" & chr(34) & GetKey(objShell.RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\DigitalProductId")) & chr(34)
  WScript.Echo "[Data]"
  WScript.Echo "MSDosInitiated=0"
  WScript.Echo "UnattendedInstall=Yes"
End If

Function GetKey(rpk)
  Const rpkOffset=52:i=28
  szPossibleChars="BCDFGHJKMPQRTVWXY2346789"
  Do
	dwAccumulator=0 : j=14
	Do
	  dwAccumulator=dwAccumulator*256
	  dwAccumulator=rpk(j+rpkOffset)+dwAccumulator
	  rpk(j+rpkOffset)=(dwAccumulator\24) and 255
	  dwAccumulator=dwAccumulator Mod 24
	  j=j-1
	Loop While j>=0
	i=i-1 : szProductKey=mid(szPossibleChars,dwAccumulator+1,1)&szProductKey
	if (((29-i) Mod 6)=0) and (i<>-1) then
	  i=i-1 : szProductKey="-"&szProductKey
	End If
  Loop While i>=0
  GetKey=szProductKey
End Function

Then create a text file called "getfiles.bat", open it in notepad and paste the following code:
attrib -s %SystemRoot%\system32\CatRoot\{F750E6C3-38EE-11D1-85E5-00C04FC295EE}\OEMBIOS.CAT
makecab %SystemRoot%\system32\CatRoot\{F750E6C3-38EE-11D1-85E5-00C04FC295EE}\OEMBIOS.CAT
attrib +s %SystemRoot%\system32\CatRoot\{F750E6C3-38EE-11D1-85E5-00C04FC295EE}\OEMBIOS.CAT
makecab %SystemRoot%\system32\OEMBIOS.BIN
makecab %SystemRoot%\system32\OEMBIOS.DAT
makecab %SystemRoot%\system32\OEMBIOS.SIG
cscript //nologo getkey.vbs > winnt.sif

Put both files in an empty folder, then double-click the file "getfiles.bat" and everything you need to activate XP will be dumped into that folder. :)

You're welcome. :thumbup

Edited by mr_smartepants, 15 June 2007 - 06:08 AM.

Posted Image
Some heroes don't wear capes, they wear Kevlar!
"There is no greater impotence in all the world like knowing you are right and that the wave of the world is wrong, yet the wave crashes upon you." -Norman Mailer, Armies Of The Night

#3
Sonic

Sonic

    Sonic

  • Patrons
  • 1,603 posts
The genuine cdrom of Windows XP Pro or Home or any version is nothing !
You must have the key and your sticker.
Media/CD can be recopied from friend without problem, it's tolered ...

#4
Ponch

Ponch

    MSFN Junkie

  • Patrons
  • 3,242 posts
  • OS:none specified
  • Country: Country Flag
...tolerated. ;)

#5
mikesw

mikesw

    Advanced Member

  • Member
  • PipPipPip
  • 365 posts
Will the VBS code above work to get the other Microsoft product License Keys (by changing the registry path) such
as all the Office products: Access, Word, project, visio etc? Are the OS and/or Office product
license keys encoded the same way for Win95,98,Me,2000,XP, and Vista ?

What is the algorithm being used above called? Is it some form of AES encryption etc?

I assume the algorithm can be done in reverse such that starting with the license key one
then uses the algorithm as-is or to rewrite it to do the algorthm in reverse to get the data that
should be written to the registry for the installed MSoft s/w product? This will allow one to
change the key at-will.

Edited by mikesw, 15 June 2007 - 02:15 PM.


#6
Sonic

Sonic

    Sonic

  • Patrons
  • 1,603 posts
@Ponch: Thanks for correction! I do many language errors, thanks for anyone correct me ! :P

@mikesw: Nothing to do with AES algorithm ! It's just a basic conversion. This method is used
for Windows because there are keys preactivated with hardware, but for Office there isn't preactivated license, so if you use license many times you will be in illegal status, but I think you could find a vbs script to get your Office license.
There are many softs like Everest which get all licenses of your system ...

#7
teejayh

teejayh
  • Member
  • 2 posts
Called MS and they gave me a new key.

#8
overclock

overclock
  • Member
  • 7 posts
As for finding the key for XP or Office use Magic Jellybean Keyfinder. google is your friend.

#9
IcemanND

IcemanND

    MSFN Junkie

  • Super Moderator
  • 3,266 posts
  • OS:Windows 7 x64
  • Country: Country Flag
there is a utility right here on MSFN for the retrieval of most Microsoft keys, keydecoder, http://www.msfn.org/...showtopic=55041

the codes are reverse base-64 encrypted, at least that is what most people call it. not really encrypted more like encoded, probably closer to converted.

#10
Jeet Chowdhury

Jeet Chowdhury
  • Member
  • 7 posts

Dim objFS, objShell
Dim strXPKey

Set objShell = CreateObject("WScript.Shell")

WScript.Echo "ProductKey=" & chr(34) & GetKey(objShell.RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\WindowsNT\CurrentVersion\DigitalProductId")) & chr(34)

Function GetKey(rpk)
Const rpkOffset=52:i=28
szPossibleChars="BCDFGHJKMPQRTVWXY2346789"
Do
dwAccumulator=0 : j=14
Do
dwAccumulator=dwAccumulator*256
dwAccumulator=rpk(j+rpkOffset)+dwAccumulator
rpk(j+rpkOffset)=(dwAccumulator\24) and 255
dwAccumulator=dwAccumulator Mod 24
j=j-1
Loop While j>=0
i=i-1 : szProductKey=mid(szPossibleChars,dwAccumulator+1,1)&szProductKey
if (((29-i) Mod 6)=0) and (i<>-1) then
i=i-1 : szProductKey="-"&szProductKey
End If
Loop While i>=0
GetKey=szProductKey
End Function


Its show the key. what is its reverse method?




0 user(s) are reading this topic

0 members, 0 guests, 0 anonymous users



How to remove advertisement from MSFN