¿Cómo encuentro mi clave de licencia de Windows 11 o 10?

Es una pregunta común entre los usuarios de computadoras; ¿Cómo encuentro mi clave de licencia de Windows?

Siempre es fácil saber su clave de licencia de Windows, clave de producto o clave de licencia. Este código es necesario para activar Windows. Si planea reinstalar Windows, por ejemplo después de una falla del sistema o al actualizar su hardware, necesitará su clave de licencia para reactivar el sistema operativo.

Cuando consigas uno nuevo computadora y desea transferir su licencia de Windows existente, necesita saber el código de licencia. Esto es especialmente importante si tiene una licencia minorista, que es transferible entre dispositivos.

Es posible que desees verificar la autenticidad de tu instalación de Windows, especialmente si compraste una computadora de segunda mano. Conocer la clave de licencia puede ayudarle a confirmar que está utilizando una copia legítima de Windows. A veces también puede ser necesario proporcionar su clave de licencia de Windows cuando busque soporte técnico o servicio al cliente.

En resumen, hay muchas razones por las que querrías saber la clave de licencia o la clave de producto. Ahora hay muchas herramientas disponibles para buscar este código, más sobre esto en este artículo. En esta guía explico cómo puedes mostrar la clave de licencia sin necesidad de herramientas, pero con un script sencillo. Así es como funciona.

¿Cómo encuentro mi clave de licencia de Windows 11 o 10?

Para comenzar, abra el Bloc de notas en su computadora.

Luego copie y pegue los siguientes scripts en un nuevo documento de texto:

Opción explícita

Objshell tenue, ruta, ID digital, resultado
Establecer objshell = CreateObject ("WScript.Shell")
'Establecer ruta de clave de registro
Ruta = “HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\”
'Valor de clave de registro
DigitalID = objshell.RegRead(Ruta y “DigitalProductId”)
Dim Nombre del producto, ID del producto, Clave del producto, Datos del producto
'Obtener nombre de producto, ID de producto, clave de producto
Nombre del producto = “Nombre del producto:” & objshell.RegRead(Ruta y “Nombre del producto”)
ProductID = “ID de producto:” y objshell.RegRead(Ruta y “ID de producto”)
ProductKey = "Clave instalada:" & ConvertToKey (DigitalID)
ProductData = Nombre del producto y vbNewLine y ProductID y vbNewLine y ProductKey
'Mostrar messbox si se guarda en un archivo
Si vbYes = MsgBox(ProductData & vblf & vblf & “¿Guardar en un archivo?”, vbYesNo + vbQuestion, “Copia de seguridad de información clave de Windows”) entonces
Guardar datos del producto
Si terminar

'Convierte binario a caracteres
Función ConvertToKey (Key)
Const = KeyOffset 52
Dim isWin8, Maps, i, j, Actual, KeyOutput, Último, keypart1, insertar
'Compruebe si el sistema operativo es Windows 8
isWin8 = (Clave (66) \ 6) Y 1
Tecla (66) = (Tecla (66) Y & HF7) O ((isWin8 Y 2) * 4)
i = 24
Mapas = “BCDFGHJKMPQRTVWXY2346789”
Do
Actual=0
re = 14
Do
Actual = Actual* 256
Actual = Clave (j + KeyOffset) + Actual
Clave (j + KeyOffset) = (Actual \ 24)
Actual = Mod actual 24
j = j-1
Bucle mientras j >= 0
i = i -1
KeyOutput = Medio (Mapas, Actual+ 1, 1) y KeyOutput
Último = Actual
Bucle mientras i> = 0

Si (isWin8 = 1) A continuación,
keypart1 = Mid (KeyOutput, 2, Apellido)
insertar = "N"
KeyOutput = Reemplazar (KeyOutput, keypart1, keypart1 & insert, 2, 1, 0)
Si Last = 0 entonces KeyOutput = insertar & KeyOutput
Si terminar

ConvertToKey = Medio(KeyOutput, 1, 5) & “-” & Medio(KeyOutput, 6, 5) & “-” & Medio(KeyOutput, 11, 5) & “-” & Medio(KeyOutput, 16, 5) & “-” y medio (Salida clave, 21, 5)

Función finales
'Guardar datos en un archivo
Función de ahorro (Datos)
Dim fso, fName, txt,objshell,Nombre de usuario
Establecer objshell = CreateObject ("wscript.shell")
'Obtener nombre de usuario actual
Nombre de usuario = objshell.ExpandEnvironmentStrings (“%Nombre de usuario%”)
'Crear un archivo de texto en el escritorio
fName = “C:\Users\” & Nombre de usuario & “\Desktop\WindowsKeyInfo.txt”
Establecer fso = CreateObject ("Scripting.FileSystemObject")
Establecer txt = fso.CreateTextFile(fName)
txt.Writeline datos
txt.Cerrar
Función finales

Fuente.

Haga clic en "archivo" y luego en "guardar como".

Cambie "Guardar como" a "Todos los archivos". Guarde el archivo con el nombre de archivo "licensecode.vbs". Haga clic en el botón "Guardar".

Ahora verá un script en la ubicación donde guardó el código de licencia.vbs. Haga doble clic para abrir. Ahora ves:

• Nombre del producto. Este es el versión de Windows que instalaste. Tenga en cuenta que si ha actualizado Windows 10 a Windows 11, Windows 10 a menudo seguirá ahí.
• ID del producto: este es el ID del producto generado automáticamente solo para su computadora durante la instalación. Esta identificación se basa en la clave de licencia.
• Clave instalada: esta es su clave de licencia. Esto le permite reinstalar Windows, activarlo y más.

Opcionalmente, puede guardar esta información en un archivo haciendo clic en "Sí". De esta manera siempre tendrá disponible la información de su clave de licencia.

Esta es una manera fácil y gratuita de buscar la información de su clave de licencia. Nunca comparta su clave de licencia con otras personas, como máximo con Microsoft para verificación o soporte.

¿No se encontró el código de licencia? Entonces puede encontrar la clave de licencia en el BIOS..

Espero haberte informado con esto. ¡Gracias por leer!