您所在的位置: 首页 > 系统教程 > 图文演示xp系统更换序列号的办法

图文演示xp系统更换序列号的办法

更新时间:2020-11-22 10:57:29 阅读: 作者:admin
      有很多网友在使用电脑的过程总难免会遇到xp系统更换序列号的情况。即使解决起来很简单,不过有部分网友还是不懂得xp系统更换序列号终究要如何解决。就算处理步骤并不难,可还是有不少小伙伴不知道xp系统更换序列号的处理步骤。其实步骤很简单,只需要1、在桌面上右键,选择新建一个文本文档;2、将下列代码内容拷入文本文档中;的步骤即可,下面就是小编给大家整理的关于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
 
 
 
3、点击“文件——另存为”,修改文件名“更换XP系统序列号.vbs”,并点击保存键;
5、双击打开已生成的文件,输入序列号,点击确定;
6、当用户输入的序列号有误,系统会出现“替换失败,您输入的序列号有误”的提示。
     以上就是详解怎样更换笔记本XP系统序列号的介绍了,有一部分的xp系统用户想要更换序列号却不懂得如何更换,按照上述的方法进行设置,相信能够帮助到大家!
 
 

以上就是解决xp系统更换序列号的操作方法如果你也有遇到这样的情况,就可以采取上面的方法步骤来进行解决,欢迎给小编留言哦!