明辉站/系统工具/内容

XP系统序列号怎么更改?

系统工具2023-07-12 阅读
[摘要]XP系统电脑的序列号是系统供应商给系统的一个识别码,该序列号可防止用户系统被盗用,但也有一些用户因特殊原因需要更改序列号。那么笔记本XP系统序列号如何更换?感兴趣的用户,请一起来看看下面的详细方法吧,具体如下:1、在桌面上右键,选择新建一个文本文档;2、将下列代码内容拷入文本文档中;ON ERRO...
    XP系统电脑的序列号是系统供应商给系统的一个识别码,该序列号可防止用户系统被盗用,但也有一些用户因特殊原因需要更改序列号。那么笔记本XP系统序列号如何更换?感兴趣的用户,请一起来看看下面的详细方法吧,具体如下:
1、在桌面上右键,选择新建一个文本文档;
2、将下列代码内容拷入文本文档中;
ON ERROR RESUME NEXT 
Dim VOL_PROD_KEY 
if Wscript.arguments.count<1 then 
VOL_PROD_KEY=InputBox("本程序能帮助您更换 WindowsXP 的序列号。"&vbCr&vbCr&"序列号由您自己寻找并输入。下面列出的不一定是您当前用的序列号,仅作格式参考。"&vbCr&vbCr&"请输入新的序列号:","WindowsXP序列号更换器 ","MRX3F-47B9T-2487J-KWKMF-RPWBY") 
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
XP系统序列号如何更换?
3、点击“文件——另存为”,修改文件名“更换XP系统序列号.vbs”,并点击保存键;
4、双击打开已生成的文件,输入序列号,点击确定;
5、当用户输入的序列号有误,系统会出现“替换失败,您输入的序列号有误”的提示。
     以上就是笔记本XP系统序列号如何更换的介绍了,有一部分的xp系统用户想要更换序列号却不懂得如何更换,按照上述的方法进行设置,相信能够帮助到大家!

Windows XP服役时间长达13年,产生的经济价值也较高。2014年4月8日,微软终止对该系统的技术支持,但在此之后仍在一些重大计算机安全事件中对该系统发布了补丁。

……

相关阅读