Tue
28
Jul
Did you thinking of changing your Windows XP / 2003 product key?
Copy below script and paste it on notepad, save it as ChangeVLKey.vbs.
Then go to command prompt, and type “%DIR%\ChangeVLKey.vbs ABCD-EFGH-IJKL-MNOP-QRST” without the quotes where %DIR% is the directory of the vbs file and the ABCD-EFGH-IJKL-MNOP-QRST is your new product key.
'
' 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
Thanks Joe!
RELATED POST/S:
Author:
Time:
Tuesday, July 28th, 2009 at 7:34 pm
Category:
Comments:
You can leave a response, or trackback from your own site.
RSS:
You can follow any responses to this entry through the RSS 2.0 feed.
Bookmark / Share:
Navigation:








