内容概述
怎么让win10永久激活码(怎么让win10永久激活码不过期)Windows产品密钥是很重要的一个密码,它是我们重新安装激活操作系统时必须要使用的,如果丢失或忘记了Windows产品密钥,将给我们带来很大的麻烦。下面我将提供一个解决方案,你将看到如何使用简单的VBS脚本来显示已安装的Windows10、Windows8或Windows7系统的产品密钥。这是从电脑上
怎么让win10永久激活码
(怎么让win10永久激活码不过期)
Windows产品密钥是很重要的 一个 密码,它是我们重新安装激活操作系统时必须要使用的,如果丢失或忘记了Windows产品密钥,将给我们带来很大的麻烦。
下面我将提供 一个 解决方 案,你将看到如何使用简单的VBS脚本来 显示 已安装的Windows 10、Windows 8或Windows 7系统的产品密钥。这是从电脑上安装的操作系统中 提取 产品密钥的 一个 非常简单的 解决方 案,无需使用任何第三方软件。
与其它 方法 相比,这个VBScript 解决方 案几乎是完美的, 用户 只需要单击 文件 即可。
一、创建脚本 文件 要查看电脑上安装的Windows 10产品密钥,请执行以下操作:
1.打开记事本。
2.将以下文本复制并粘贴到“记事本”窗口中:
Option Explicit Dim objshell,path,DigitalID,Result Set objshell = CreateObject("WScript.Shell") 'Set registry key path Path = "HKLMSOFTWAREMicrosof twind ows NTCurrentVersion" 'Registry key value DigitalID = objshell.RegRead(Path & "DigitalProductId") Dim ProductName,ProductID,ProductKey,ProductData 'Get ProductName,ProductKey ProductName = "Product Name: " & objshell.RegRead(Path & "ProductName") ProductID = "Product ID: " & objshell.RegRead(Path & "ProductID") ProductKey = "Installed Key: " & ConvertToKey(DigitalID) ProductData = ProductName & vbNewLine & ProductID & vbNewLine & ProductKey 'Show mess Box if save to a file If vbYes = Msg Box (ProductData & vblf & vblf & "Save to a file?",vbYesNo + vbQuestion,"BackUp Windows Key informat ion") then Save ProductData End If 'Convert binary to chars Function ConvertToKey(Key) Const KeyOffset = 52 Dim isWin8,Maps,i,j,Current,KeyOutput,Last,keypart1,insert 'Check if OS is Windows 8 isWin8 = (Key(66) 6) And 1 Key(66) = (Key(66) And &HF7) Or ((isWin8 And 2) * 4) i = 24 Maps = "BCDFGHJKMPQRTVWXY2346789" Do Current= 0 j = 14 Do Current = Current* 256 Current = Key(j + KeyOffset) + Current Key(j + KeyOffset) = (Current 24) Current=Current Mod 24 j = j -1 Loop While j >= 0 i = i -1 KeyOutput = Mid(Maps,Current+ 1,1) & KeyOutput Last = Current Loop While i >= 0 If (isWin8 = 1) Then keypart1 = Mid(KeyOutput,2,Last) insert = "N" KeyOutput = Replace(KeyOutput,keypart1 & insert,1,0) If Last = 0 Then KeyOutput = insert & KeyOutput End If ConvertToKey = Mid(KeyOutput,5) & "-" & Mid(KeyOutput,6,11,16,21,5) End Function 'Save data to a file Function Save(Data) Dim fso,fName,txt,objshell,UserName Set objshell = CreateObject("wscript.shell") 'Get current user name UserName = objshell.ExpandEnvironmentStrings("%UserName%") 'Create a text file on desktop fName = "C:Users" & UserName & "DesktopWindowsKeyInfo.txt" Set fso = CreateObject("Scripting.FileSy stem Object") Set txt = fso.CreateTextFile(fName) txt.Writeline Data txt.Close End Function
3.单击“ 文件 -另存为”命令,在“保存类型”中选择“所有 文件 ”,在“ 文件 名”中将上面的文本保存到桌面上带有“ .vbs”扩展名的 文件 中, 文件 名可以自己随意命名。
提示 : 为确保正确保存扩展名为“ .vbs”的 文件 ,可以键入 文件 名并用双引号引起来,例如“BackupWindowsKey.vbs”。
二、查看/备份Windows10产品密钥 现在打开BackupWindowsKey.vbs 文件 ,瞧,Windows10产品密钥会 显示 在屏幕上!把它记录下来,保存到 一个 安全的地方。
如果你想直接下载得到BackupWindowsKey.vbs 文件 ,请关注我,然后私信“密钥脚本”。
我在Windows 7、Windows 8和Windows 10上测试了该技巧,它在所有提到的操作系统中均能完美运行。
扩展阅读: ■>>恢复win10 登录 密码的9大工具, 一个 比 一个 强大,维修电脑必备
■>>在Windows 10中管理 用户 帐户和密码
■>>如何重置忘记的Windows10密码,掌握这3个技巧就行了
■>>永久 删除 桌面上激活Windows10水印,电脑高手都在用的技巧
更多windows 10操作系统使用技巧,请关注→→#win10玩机技巧#
想了解更多精彩 内容 ,快来关注@微课传媒
1.头条号【微课传媒】专注软件 分享 ,如果你喜欢玩软件,欢迎关注、 评论 、收藏、转发。
2.在学习中有什么问题,欢迎与我沟通交流,今日头条号 搜索 【微课传媒】,我 在这里 等你哟!
总结
以上是 为你收集整理的 怎么让win10永久激活码-(怎么让win10永久激活码不过期) 全部内容。
如果觉得 网站内容还不错,欢迎将 网站 推荐给好友。
Win10系统搜不到airpods怎么办?Win10配对不了airpods的解决方法
Airpods是苹果品牌的蓝牙无线耳机,有些用户想将airpods连接电脑,但是遇到Win10系统搜不到airpods的情况,导致没办法配对,这是怎么回事呢?可能是电脑蓝牙没有打开被可发现的设置,本篇整理了详细的解决方法,接下来和小编一起看下去吧。
win10提示任务管理器被管理员停用怎么解决?
任务管理器能够实时的反馈软件的状态已经CPU的使用情况,最近有部分使用win10系统的小伙伴反映说打开被提示任务管理器被管理员停用,面对这个情况不知道要如何解决,那么本期的win10教程就来为大伙进行解答,有需要的用户欢迎来下载使用。
win10系统wifi不能输入怎么办?win10无法输入wifi密码解决方法
现在很多台式和笔记本电脑都是使用了win10系统,也安装了无线网卡,可以通过wifi连接进行使用,但是有些小伙伴发现无法输入密码,导致连接失败,面对这个问题,大伙都不知道怎么解决,那么本期就为大伙带来三种解决方法,一起来了解看看吧。
Win10电脑任务栏图标重叠怎么分开?Win10任务栏图标重叠的解决方法
有些用户在使用电脑的时候,会一次性打开多个窗口进行操作,发现此时的任务栏图标会重叠,导致看不清楚,很影响操作,那么应该怎么设置不重叠呢?其实将窗口设置为平铺显示即可,就此,本篇整理了详细的教程,分享给大家,一起看看吧。
Win10应用商店打不开提示无法加载页面请重试怎么办?
电脑中的应用商店可以帮助用户下载应用程序,非常的方便实用,遇到应用商店打不开的情况是怎么回事呢?最近就有Win10系统的用户反映这个问题,其实造成这个问题的原因有多种,本篇带来了三种不同的解决方法,分享给大家,感兴趣的一起看下去吧。
Win10不能连续输入字符怎么办?Win10不能连续输入字符的解决方法
Win10系统是现在的主流系统,在使用的过程中难免会遇到各种故障问题,最近就有一些用户向小编询问,使用电脑打字的时候发现没办法按同一个键进行连续输入,遇到这种情况怎么处理呢?就此,本篇带来了详细的教程,分享给大家,一起看看吧。
Win10怎么退出已有的管理员账号?Win10退出本地管理员账户方法
最近有用户向小编询问关于如何退出账户的问题,在使用Win10系统的时候,想要登陆一个新的账号,就想把之前的管理员账号退出,会不会很麻烦呢?其实不会,操作简单易上手,就此,本篇整理了详细的教程,分享给大家,感兴趣的一起看看吧。
Win10系统如何禁用Chrome清理功能?
现在大部分用户的电脑都在使用Win10系统,在使用谷歌浏览器浏览的时候,想要禁止使用谷歌浏览器的清理功能,但是不知道具体怎么设置操作,其实方法很简单,针对这一问题,本篇整理了详细的教程,操作简单易上手,分享给大家,一起来看看吧。
查看更多关于怎么让win10永久激活码-(怎么让win10永久激活码不过期)的详细内容...