最近我的电脑老是出现WindowsXP副本非正版,让我升级,我再也不想让它出现,该怎么办?

来源:百度知道 编辑:UC知道 时间:2024/05/22 00:22:17
开机的时候老是出现,要跳过还得等5秒钟,真烦人.

ON ERROR RESUME NEXT

Dim VOL_PROD_KEY
if Wscript.arguments.count<1 then

VOL_PROD_KEY=InputBox("使用说明:"&vbCr&vbCr&"本脚本程序将修改当前Windows的序列号."&vbCr&vbCr&"正版CD-KEY:"&vbCr&vbCr&"CM3HY-26VYW-6JRYC-X66GX-JVY2D"&vbCr&vbCr&"请将正版序列号替换到下面空白处:","brvoy专用xp/2003序列号替换工具","")
if VOL_PROD_KEY="" then
Wscript.quit
end if
else
VOL_PROD_KEY = Wscript.arguments.Item(0)
end if

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 "修改成功."
end if
if err <> 0 then
Wscript.echo "修改失败."
Err.Clear
end if
Next

打开记事本,把上面的代码复制进去,并且保存成 XPzhe