WinXP Key Changer

[eBait]

This changer works fantastic. I ripped it from a other site (don't remember it somehow), ---Edit: found out it was M$ itself http://support.microsoft.com/default.aspx?...b;en-us;Q328874 --- but I rememer the text: "Legal ways to change your Windows XP serial number".

Put the code in notepad and save it as ChangeKey.vbs . Then do what the instructions say. Good luck!

'-----------------------------Nsane Productions----------------------------- 
'-------Made by eBait  (not the script itself, ripped it from a site)-------
'--------------------------------100% Legit--------------------------------- 
'----------------This script changes the Windows Product key----------------
'---------Usage: [path]\changekey.vbs XXXXX-XXXXX-XXXXX-XXXXX-XXXXX---------
'--------------------------------------------------------------------------- 

ON ERROR RESUME NEXT


if Wscript.arguments.count<1 then
Wscript.echo "Dude.... Read the comment/readme... usage: ChangeKey.vbs XXXXX-XXXXX-XXXXX-XXXXX-XXXXX"
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

And say thanks... :rolleyes:

[Zeus_Hunt]

And say thanks...

Thanks :rolleyes:

[Lite]

Title Edited and Thread Moved

[eBait]

Oh shoot... totally wrong place :rolleyes: . Thanks for moving Lite

[Guest Greg]

'Twasnt made by yourself if it was ripped :rolleyes:

But anyway, it should come in handy when installing XP systems.

[erRor67]

I just use RockXP to read/write my XP key. :rolleyes:

[Chicano666]

Thx

[eBait]

'Twasnt made by yourself if it was ripped :)

But anyway, it should come in handy when installing XP systems.

Read better, you silly!

Made by eBait  (not the script itself, ripped it from a site)

[Guest Greg]

I saw it yeah. Rather good script but I fear it will mess around with your system configuration files.

[Argente]

Thanks

[asimov]

This changer works fantastic. I ripped it from a other site (don't remember it somehow), ---Edit: found out it was M$ itself http://support.microsoft.com/default.aspx?...b;en-us;Q328874 --- but I rememer the text: "Legal ways to change your Windows XP serial number".

Put the code in notepad and save it as ChangeKey.vbs . Then do what the instructions say. Good luck!

'-----------------------------Nsane Productions----------------------------- 
'-------Made by eBait  (not the script itself, ripped it from a site)-------
'--------------------------------100% Legit--------------------------------- 
'----------------This script changes the Windows Product key----------------
'---------Usage: [path]\changekey.vbs XXXXX-XXXXX-XXXXX-XXXXX-XXXXX---------
'--------------------------------------------------------------------------- 

ON ERROR RESUME NEXT


if Wscript.arguments.count<1 then
Wscript.echo "Dude.... Read the comment/readme... usage: ChangeKey.vbs XXXXX-XXXXX-XXXXX-XXXXX-XXXXX"
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

And say thanks... :unsure:

<{POST_SNAPBACK}>

I have a better program to change Win XP CD key.

It even has a module to generate ramdom keys.

[eBait]

This changer works fantastic. I ripped it from a other site (don't remember it somehow), ---Edit: found out it was M$ itself http://support.microsoft.com/default.aspx?...b;en-us;Q328874 --- but I rememer the text: "Legal ways to change your Windows XP serial number".

Put the code in notepad and save it as ChangeKey.vbs . Then do what the instructions say. Good luck!

'-----------------------------Nsane Productions----------------------------- 
'-------Made by eBait  (not the script itself, ripped it from a site)-------
'--------------------------------100% Legit--------------------------------- 
'----------------This script changes the Windows Product key----------------
'---------Usage: [path]\changekey.vbs XXXXX-XXXXX-XXXXX-XXXXX-XXXXX---------
'--------------------------------------------------------------------------- 

ON ERROR RESUME NEXT


if Wscript.arguments.count<1 then
Wscript.echo "Dude.... Read the comment/readme... usage: ChangeKey.vbs XXXXX-XXXXX-XXXXX-XXXXX-XXXXX"
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

And say thanks... :whistle:

I have a better program to change Win XP CD key.

It even has a module to generate ramdom keys.

Nice, but do they pass the WGA?

[zombiegod]

WGA is a joke

Tools>Manage add-ons>Add-ons that have been used by Windows Explorer> 'Highlight' Windows Genuine Advantage> Click Disable.

[asimov]

You also need to copy "LegitCheckControl.dll" in the SYSTEM32 folder and it works seamlessly.

[eBait]

Yes, I know the bypass. but do it "the legal way" is much more fun.... Everytime I see "thank you for buying Windows" I get a laugh attack.

[zombiegod]

Yes, I know the bypass. but do it "the legal way" is much more fun.... Everytime I see "thank you for buying Windows" I get a laugh attack.

<{POST_SNAPBACK}>

Changed the .Dll file yesterday. Windows Update... Thank you for choosing Genuine Windows software. :showoff2:

[Guest Tard]

huh? i dont get it

[zombiegod]

huh? i dont get it

<{POST_SNAPBACK}>

Dont get what?

Windows>System 32>Legitcheckcontrol.dll

Downloaded a different one and... Roberts your fathers brother.

Or maybe your running a genuine version of Windows.

[Guest Tard]

i have XP window

[zombiegod]

i have XP window

<{POST_SNAPBACK}>

:ph34r:

[Guest Tard]

PM what?

[DJD]

does it work with xp pro?

[Lite]

Yes.

[DJD]

Thx, and it's bypasses wga to?

[Lite]

No. You have a legitmate serial number WGA will work fine.

There is no need to bypass WGA with a legit serial number... Your local shop is the place to find one.