XP系统序列号如何更换?
时间:2022-06-09 22:59:36
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
3、点击“文件——另存为”,修改文件名“更换XP系统序列号.vbs”,并点击保存键;
4、双击打开已生成的文件,输入序列号,点击确定;
5、当用户输入的序列号有误,系统会出现“替换失败,您输入的序列号有误”的提示。
![](/images/zang.png)
![](/images/jiucuo.png)
猜你喜欢
m1芯片有多强!MacBook Pro M1芯片评测
![](https://img.aspxhome.com/file/2023/9/a209299_0s.png)
Win10专业版是如何关闭显卡硬件加速的
![](https://img.aspxhome.com/file/2023/26/a223255_0s.jpg)
Wps表格线不要打印操作方法
打印机脱机了怎么办?四种方法教你快速恢复打印!
![](https://img.aspxhome.com/file/2023/30/a270210_0s.jpg)
Win7系统IE浏览器中毒该如何解决?
![](https://img.aspxhome.com/file/2023/28/a243131_0s.jpg)
苹果设备越狱后添加软件源教程
iPhone手机文件怎么传送到win10电脑上?iPhone与Win10电脑共享互转文件方法
![](https://img.aspxhome.com/file/2023/28/a246137_0s.jpg)
MacOS如何在Keynote添加连接?Keynote添加连接
![](https://img.aspxhome.com/file/2023/9/a215889_0s.jpg)
怎么把excel转换成pdf
![](https://img.aspxhome.com/file/2023/3/37303_0s.jpg)
Win11用户权限怎么设置?
![](https://img.aspxhome.com/file/2023/30/a268747_0s.jpg)
excel筛选之(二)——自定义数值筛选
![](https://img.aspxhome.com/file/2023/6/a142096_0s.jpg)
Win10打印机共享不显示怎么办?win10打印机共享不显示解决方法
![](https://img.aspxhome.com/file/2023/26/a221021_0s.jpg)
Win10创造者更新如何调整显示器?win10创造者更新显示器调整方法
![](https://img.aspxhome.com/file/2023/29/a260432_0s.jpg)
WPS2019怎么做职员试用通知单? wps通知单模板的做法
![](https://img.aspxhome.com/file/2023/8/a165718_0s.jpg)
Win10怎么加快开机速度?Win10加快开机速度操作方法
![](https://img.aspxhome.com/file/2023/5/52885_0s.png)
Excel用拖动的方法复制单元格或区域
极速pdf编辑器怎么用?极速pdf编辑器怎么删除页面?
![](https://img.aspxhome.com/file/2023/30/a269410_0s.png)
Win10一周年更新正式版14393.82累积更新KB3176932今日推送
![](https://img.aspxhome.com/file/2023/28/a243772_0s.jpg)
Excel2010工作界面图文使用说明
![](https://img.aspxhome.com/file/2023/7/37427_0s.jpg)
Win10专业版怎么给硬盘加密?硬盘加密要如何解除?
![](https://img.aspxhome.com/file/2023/26/a222996_0s.jpg)