Páginas

PESQUISAR

30 de maio de 2017

Como descobrir a chave de ativação do Windows 10, 8, Server e versões anteriores



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!



4 comentários :

  1. Bela dica Gutemberg...
    Está sumido da Rede heim!!!
    Posta mais assuntos interesantes para nós aí.....

    ResponderExcluir
    Respostas
    1. Grande Leandro Rohem!
      Estava sumido mesmo, confesso. Mas pretendo mudar isso.
      Farei o possível em postar mais matérias interessantes.
      Grande abraço!

      Excluir

Nos comentários poderão existir informações que poderão lhe ajudar a resolver seu problema.