教你win XP系统序列号更改的方法(2)

　　下面的脚本是用于没有安装SP1的WinXP(ChangeVLKey2600.vbs)。

　　'

　　' WMI Script - ChangeVLKey2600.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

　　例子：脚本使用方法

　　以下的例子描述了在命令行里面如何使用VBS脚本程序。

　　1.点击[开始]，然后点击[运行];

　　2.输入C:/ChangeVLKeySp1.vbs ABCDE-ABCDE-ABCDE-ABCDE-ABCDE-ABCDE

　　假设 ChangeVLKeySp1.vbs 放在C:根目录下

　　ABCDE-ABCDE-ABCDE-ABCDE-ABCDE-ABCDE 是新的序列号

　　以上 ChangeVLKeySp1.vbs 适用于已经安装了SP1的WinXP，没有安装SP1的 ChangeVLKey2600.vbs 的使用方法同样是这样的。

　　3.然后点击[确定]即可。
这两种方法都可以达到目的，不过大家根据自己对电脑的认识来确定方法，如果是菜鸟用户实在不行的话最好还是请其他人代劳吧。