Salve membros do EletônicaBR.
Dia desses a procura de uma maneira de saber o serial do Windows 10 para, caso necessário, poder reinstalar e acabei encontrando um tutorial que trazia o seguinte código:
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
Com esse código colado no editor de textos de sua preferência, é só salvar com a extensão .vbs, pronto! Execute o script e voilá, o número de serie aparece na sua tela.
Existe também uma opção oficial, baixando um arquivo do site da Microsoft (https://www.microsoft.com/pt-br/software-download/windows10). Ele irá te auxiliar a gerar um DVD ou pendrive com os dados do seu PC para posterior instalação do seu Windows em caso de algum "mandruvá".
- Na página da Microsoft, em "Você está pensando em instalar o Windows 10 em seu computador?", selecione "Baixar ferramenta agora".
- Execute o MediaCreationTool (Necessário estar logado em uma conta com privilégios de ADMIN).
- Aceite os termos de uso
- Selecione a opção "Criar mídia de instalação para outro computador" e clique em avançar
- Na tela seguinte, serão apresentadas as configurações do seu PC (Edição, Arquitetura e Idioma). Não precisa alterar nada aqui, mas caso deseje, é só retirar a seleção da caixa "Use as opções recomendadas para este produto"
- Na última tela selecione a mídia que deseja fazer a gravação e seja feliz.
Espero ter ajudado alguns e não ter sido redundante com a informação.