windows10激活工具是專為激活win10係統而製作的,不僅支持一鍵激活win10專業版係統,還支持激活其他版本的windows和office辦公軟件。Windows10激活工具操作簡單,隻需一鍵操作,永久免費使用。暴風win10激活工具支持激活所有32位 64位的Windows10係統。
安裝的Windows10係統已激活,但有的是不知道激活密鑰,有的是忘記激活密鑰,在這種情況下,如何查詢和備份Windows10係統的激活密鑰呢?
查詢和備份Windows10係統激活密鑰的方法有兩種,一是在注冊表編輯器中查詢已激活係統的密鑰及備份密鑰;二是製作一個【密鑰查詢.vbs】文件查詢已激活係統的密鑰及備份密鑰。
下麵分別講述這兩種查詢已激活係統的密鑰及備份密鑰的方法。
查詢、備份Windows10係統已激活密鑰的方法
方法一:在注冊表編輯器中查詢已激活係統的密鑰及備份密鑰的方法
在運行中輸入regedit命令,打開注冊表編輯器,複製\HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform\注冊表路徑,粘貼到注冊表的地址欄中;
當注冊表路徑粘貼好以後,按下桌麵上的回車鍵,定位到SoftwareProtectionPlatform,在其對應的右側窗口中找到:BackupProductKeyDefault,左鍵雙擊BackupProductKeyDefault;
在彈出的編輯字符值對話框中可以看到BackupProductKeyDefault的數值數據為:VK7JG-......-3V66T,該數值數據即Windows10係統的激活密鑰。
可以將激活密鑰複製到記事本中並保存。
方法二:製作一個【密鑰查詢.vbs】文件查詢已激活係統的密鑰及備份密鑰。
將下麵內容複製到記事本中:
————————————————————————————————
Option Explicit
Dim objshell,path,DigitalID, Result
Set objshell = CreateObject("WScript.Shell")
'Set registry key path
Path = "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\"
'Registry key value
DigitalID = objshell.RegRead(Path & "DigitalProductId")
Dim ProductName,ProductID,ProductKey,ProductData
'Get ProductName, ProductID, ProductKey
ProductName = "係統名稱:" & objshell.RegRead(Path & "ProductName")
ProductID = "產品ID:" & objshell.RegRead(Path & "ProductID")
ProductKey = "已安裝密鑰:" & ConvertToKey(DigitalID)
ProductData = ProductName & vbNewLine & ProductID & vbNewLine & ProductKey
'Show messbox if save to a file
If vbYes = MsgBox(ProductData & vblf & vblf & "要將密鑰保存到文件嗎?", vbYesNo + vbQuestion, "備份Windows密鑰信息") then
Save ProductData
End If
'Convert binary to chars
Function ConvertToKey(Key)
Const KeyOffset = 52
Dim isWin10, Maps, i, j, Current, KeyOutput, Last, keypart1, insert
'Check if OS is Windows 10
isWin10 = (Key(66) \ 6) And 1
Key(66) = (Key(66) And &HF7) Or ((isWin10 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 (isWin10 = 1) Then
keypart1 = Mid(KeyOutput, 2, Last)
insert = "N"
KeyOutput = Replace(KeyOutput, keypart1, keypart1 & insert, 2, 1, 0)
If Last = 0 Then KeyOutput = insert & KeyOutput
End If
ConvertToKey = Mid(KeyOutput, 1, 5) & "-" & Mid(KeyOutput, 6, 5) & "-" & Mid(KeyOutput, 11, 5) & "-" & Mid(KeyOutput, 16, 5) & "-" & Mid(KeyOutput, 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 & "\Desktop\Windows密鑰備份.txt"
Set fso = CreateObject("Scripting.FileSystemObject")
Set txt = fso.CreateTextFile(fName)
txt.Writeline Data
txt.Close
End Function
————————————————————————————————
點擊記事本左上角的【文件】,在下拉菜單中點擊【另存為】;
在打開的另存為窗口中,點擊窗口左側的【桌麵】,在文件名(N)欄中輸入:密鑰查詢和備份.vbs,再點擊:保存;
回到係統桌麵,我們左鍵雙擊:【密鑰查詢和備份.vbs】文件圖標,即可以打開:軟媒魔方備份 Windows 密鑰信息,可以看到已安裝密鑰:VK7JG-......-3V66T;如需要保存,則點擊:是(Y);
我們點擊是以後,桌麵上便出現一個【Windows密鑰備份.bxt】圖標,左鍵雙擊這個圖標;
點擊【Windows密鑰備份.bxt】圖標後,可以打開一個記事本,記事本中保存的便是Windows10係統已安裝的密鑰:VK7JG-......-3V66T。
以上就是係統粉小編為您帶來的win10激活信息怎麼備份,win10激活碼查看備份的方法,備份win10激活信息,希望大家能夠永久激活成功!
相關資訊
最新熱門應用
芝麻app交易所
其它軟件223.89MB
下載
dash交易所手機版
其它軟件27.87M
下載
v8國際交易平台
其它軟件223.89MB
下載
比特網交易平台
其它軟件292.97MB
下載
zt交易所ios
其它軟件219.97MB
下載
虎符交易所app最新地址
其它軟件276 MB
下載
bybit交易所中文版
其它軟件287.27 MB
下載
中幣交易官網手機版安卓
其它軟件288.1 MB
下載
幣團交易所app
其它軟件43MB
下載
歐幣網交易所官網安卓
其它軟件397.1MB
下載