Jump to content

How to reset your Serial Number in Windows XP


Recommended Posts

Posted

Yea.....I've had those instructions, way before you all!

www.transportol.net/xp.txt

hehe..I have 0wn4G3!

You are genius.

w00t w00t

  • 2 months later...

  • 4 months later...
  • 3 weeks later...
Guest shivamparikh
Posted

is there a similar tweak to make the TRIAL versions of WindowsXP (120/180 day trial) and Windows 2003 Server (180 days trial) make them

full version or non-trial limited?

  • 1 month later...
Posted

This also works for resetting your cd key on a Windows XP w/SP1 computer:

' 
' WMI Script - ChangeVLKey.vbs
'
' This script changes the product key on the computer
'
'***************************************************************************

ON ERROR RESUME NEXT


if Wscript.arguments.count<1 then
  Wscript.echo "Script can't run without VolumeProductKey argument"
  Wscript.echo "Correct usage: Cscript ChangeVLKey.vbs ABCDE-FGHIJ-KLMNO-PRSTU-WYQZX"
  Wscript.quit
end if

Dim VOL_PROD_KEY
VOL_PROD_KEY = Wscript.arguments.Item(0)
VOL_PROD_KEY = Replace(VOL_PROD_KEY,"-","") 'remove hyphens if any

for each Obj in GetObject("winmgmts:{impersonationLevel=impersonate}").InstancesOf ("win32_WindowsProductActivation")

  result = Obj.SetProductKey (VOL_PROD_KEY)

  if err <> 0 then
     WScript.Echo Err.Description, "0x" & Hex(Err.Number)
     Err.Clear
  end if

Next

This will reset your cd key on a Windows XP Computer WITHOUT SP1

' 
' WMI Script - ChangeVLKey.vbs
'
' This script changes the product key on the computer
'
'***************************************************************************

ON ERROR RESUME NEXT

if Wscript.arguments.count<1 then
  Wscript.echo "Script can't run without VolumeProductKey argument"
  Wscript.echo "Correct usage: Cscript ChangeVLKey.vbs ABCDE-FGHIJ-KLMNO-PRSTU-WYQZX"
  Wscript.quit
end if

Dim VOL_PROD_KEY
VOL_PROD_KEY = Wscript.arguments.Item(0)
VOL_PROD_KEY = Replace(VOL_PROD_KEY,"-","") 'remove hyphens if any
Dim WshShell
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.RegDelete "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\WPAEvents\OOBETimer" 'delete OOBETimer registry value
for each Obj in GetObject("winmgmts:{impersonationLevel=impersonate}").InstancesOf ("win32_WindowsProductActivation")

  result = Obj.SetProductKey (VOL_PROD_KEY)

  if err <> 0 then
     WScript.Echo Err.Description, "0x" & Hex(Err.Number)
     Err.Clear
  end if

Next

Original MS Article: http://support.microsoft.com/default.aspx?...;en-us;328874#5

Not sure if this only works on corp versions or not....

  • 1 month later...
  • 3 weeks later...
Posted

for changing Microsoft Windows XP Professional you can use this :

Censored By my self ! this is warza and it seems that it is forbidden to ditribute them in this site !

:):rolleyes:

its quiet cool ! and of cours works on any XP Professional version !

and also it's a solusion for who that have problems with installins SP 1 !

Enjoy it !

:D:D

  • 1 month later...
Posted

don't know about the posted links, but i've got to mention sometimes msoobe.exe /a does not do anything at all.

if this is your case register "licdll.dll" again with the command "regsvr32.exe licdll.dll" then do the steps mentioned above.

after changing the key with success you can unregister the DLL with "regsvr32.exe -u licdll.dll" again.

Greetings! :)

Please sign in to comment

You will be able to leave a comment after signing in



Sign In Now
  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...