Antes de você pensar em redefinir/restaurar a instalação atual do seu Windows, é importante confirmar onde está a chave de ativação de seu sistema operacional.
Mas digamos que você perdeu sua key, seja ela em escrita em papel ou em formato digital (foto, texto e tals).
Numa situação dessas, talvez você pense: "Vou procurar na internet um aplicativo que revele a key do Windows".
Mas por que baixar um software deste tipo se você pode descobrir a chave sem instalar aplicativo algum?
Descobrindo facilmente a chave de ativação
1- Copie (CTRL + C) o script abaixo:
Set WshShell = CreateObject("WScript.Shell")
MsgBox ConvertToKey(WshShell.RegRead("HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\DigitalProductId"))
Function ConvertToKey(Key)
Const KeyOffset = 52
i = 28
Chars = "BCDFGHJKMPQRTVWXY2346789"
Do
Cur = 0
x = 14
Do
Cur = Cur * 256
Cur = Key(x + KeyOffset) + Cur
Key(x + KeyOffset) = (Cur \ 24) And 255
Cur = Cur Mod 24
x = x -1
Loop While x >= 0
i = i -1
KeyOutput = Mid(Chars, Cur + 1, 1) & KeyOutput
If (((29 - i) Mod 6) = 0) And (i <> -1) Then
i = i -1
KeyOutput = "-" & KeyOutput
End If
Loop While i >= 0
ConvertToKey = KeyOutput
End Function
2- Cole (CTRL + V) o código acima no bloco de notas.
Clique na imagem acima para ampliar |
3- Clique no menu "Arquivo" - "Salvar como". Em seguida, defina um nome para o arquivo com o final ".vbs". Logo após escolha "Todos os arquivos" no campo "Tipo", conforme tela abaixo. Salve o arquivo.
![]() |
Clique na imagem acima para ampliar |
4- Agora basta executar o arquivo.
Espero ter contribuído com mais este conhecimento!
Este post lhe foi útil? Então não deixe de postar o seu comentário. Ele é muito importante!
Muito interessante! Obrigado.
ResponderExcluirDisponha!
ExcluirBela dica Gutemberg...
ResponderExcluirEstá sumido da Rede heim!!!
Posta mais assuntos interesantes para nós aí.....
Grande Leandro Rohem!
ExcluirEstava sumido mesmo, confesso. Mas pretendo mudar isso.
Farei o possível em postar mais matérias interessantes.
Grande abraço!