教你更改windows xp操作系统序列号

　　使用脚本

　　以下有2个脚本，一个是用于没有安装SP1的WinXP，一个是用于已经安装了SP1的WinXP。

　　下面是用于已经安装了SP1的WinXP的脚本(ChangeVLKeySp1.vbs)，使用方法同没有安装SP1的WinXP的脚本，一起放在本文的一段里面（例子）。

'
' WMI script - ChangeVLKeySp1.vbs
'
' Windos XP With SP1
'
' This script changes the product key on the puter
'
'

ON ERROR RESUME NEXT

if Wscript.arguments.count<1 then
Wscript.echo "script can't run ithout 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("inmgmts:{impersonationLevel=impersonate}").InstancesOf ("in32_WindosProductActivation")

result = Obj.SetProductKey (VOL_PROD_KEY)

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

Next

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

'
' WMI script - ChangeVLKey2600.vbs
'
' This script changes the product key on the puter
'
'

ON ERROR RESUME NEXT

if Wscript.arguments.count<1 then
Wscript.echo "script can't run ithout 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/Windos NT/CurrentVersion/WPAEvents/OOBETimer" 'delete OOBETimer registry value
for each Obj in GetObject("inmgmts:{impersonationLevel=impersonate}").InstancesOf ("in32_WindosProductActivation")

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.然后点击[确定]即可。