Descobrir o serial do seu Windows 10 sem instalar nenhum aplicativo de terceiros

Olá, pessoal! Há cerca de 2 anos, publiquei no meu blog uma maneira de se descobrir o serial do seu Windows 10, para aqueles que gostam de anotar e mantê-lo guardado. Este artigo está neste link.

No artigo anterior, eu mencionava alguns softwares de terceiros que faziam a leitura do registro do Windows para obter isso. Agora, estou colocando aqui uma maneira muito simples e sem a necessidade de instalação de qualquer aplicativo. Para isso, você criará um arquivo VBS (VBScript, ou Visual Basic Script):

1. Abra um Bloco de Notas e cole os seguintes comandos, exatamente da forma como está aqui:

 

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. Feito isto, salve o arquivo com a extensão “.vbs” (exemplo: SerialMeuWindows.vbs)

3. Execute o arquivo. O serial será exibido em uma mensagem na tela:

Um grande abraço a todos!!

Idevar.

  1. Deixe um comentário

Deixe um comentário

Preencha os seus dados abaixo ou clique em um ícone para log in:

Logotipo do WordPress.com

Você está comentando utilizando sua conta WordPress.com. Sair /  Alterar )

Foto do Google

Você está comentando utilizando sua conta Google. Sair /  Alterar )

Imagem do Twitter

Você está comentando utilizando sua conta Twitter. Sair /  Alterar )

Foto do Facebook

Você está comentando utilizando sua conta Facebook. Sair /  Alterar )

Conectando a %s

%d blogueiros gostam disto: