> Tous les forums > Forum Base de connaissances PC Astuces
 Retrouver sa clé produit de Windows - Windows toutes versions
Ajouter un message à la discussion
Pages : [1] 2 3 ... Fin
Page 1 sur 3 [Fin]
clement
  Posté le 12/01/2015 @ 14:44 
Aller en bas de la page 
Equipe PC Astuces

Retrouver sa clé produit de Windows - Windows toutes versions

Vous n'arrivez pas à mettre la main sur votre clé de Windows ? Pourtant, si vous devez le réinstaller suite à des problèmes, vous en avez absolument besoin. Grâce à un simple script et sans installer de logiciel, voici comment récupérer la clé produit de votre Windows.

Lien vers l'article : http://www.pcastuces.com/pratique/astuces/4279.htm

Publicité
pierolouf
 Posté le 14/01/2015 à 15:34 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

merci

Fifi55
 Posté le 16/01/2015 à 23:55 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

Bonjour,

Ce script vbs et le petit logiciel Windows 8 Product Key Viewer me donnent 2 clés différentes ... Où est l'erreur

yves.vaissiere
 Posté le 17/01/2015 à 17:12 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Grand Maître astucien

Bonjour,

je ne sais pas ; mais pour 8 (bien que le serial soit inutile pour réinstallation sur PC OEM vendu sous 8) on évoque plutôt la commande :

powershell "(Get-WmiObject -query ‘select * from SoftwareLicensingService’).OA3xOriginalProductKey"

(peut-être en tant qu'admin)

Même résultat chez moi que ton soft, le vbs en donne un différent.

Le vbs n'est plus bon sous 8, à mon avis.



Modifié par yves.vaissiere le 17/01/2015 18:03
beorcs
 Posté le 17/01/2015 à 22:55 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Astucien

Super. merci.

archeboc
 Posté le 19/01/2015 à 19:42 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Nouvel astucien

Excellent, merci !

Vérifié avec "Produkey", qui donne bien le même résultat !

Bravo.

arevato
 Posté le 20/01/2015 à 11:14 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

Bonjour!

Windows scipt host me dit:erreur:Instruction attendue

Code:800A0400

Source:Erreur de compilation Microsoft VBSript

Painauchoco
 Posté le 20/01/2015 à 13:42 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

Impec........en cas de besoin.......au cas ou

ffankhaus
 Posté le 20/01/2015 à 16:36 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Nouvel astucien

Bonjour

Moi ça marche pas. Il m'affiche le texte que j'ai copié dans le Bloc-Notes. Je suis sous W7.

Merci si quelqu'un a une idée.

Publicité
yves.vaissiere
 Posté le 20/01/2015 à 17:38 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Grand Maître astucien

Tu n'as pas fait un vbs, faute d'avoir choisi comme indiqué le filtre "Tous les fichiers (*.*)".

Voici l'icône par défaut d'un vbs :

Au besoin , configure W à afficher les extensions de nom.

system32
 Posté le 20/01/2015 à 19:19 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

Sur Windows XP, on ne peut pas directement enregistrer en .VBS. Tu colle donc le script dans un fichier texte, tu l'enregistre (en .TXT ) et tu renommes simplement l'extension en .VBS. (Fonctionne pour Windows toutes versions)

Il existe un autre script qui donne quelques autres infos:

' ##############################################################

' # #

' # VBScript to find the DigitalProductID for your #

' # Microsoft windows Installation and decode it to #

' # retrieve your windows Product Key #

' # #

' # ----------------------------------------------- #

' # #

' # Created by: Parabellum #

' # #

' ##############################################################

'

'

'

const HKEY_LOCAL_MACHINE = &H80000002

strKeyPath = "SOFTWARE\Microsoft\Windows NT\CurrentVersion"

strValueName = "DigitalProductId"

strComputer = "."

dim iValues()

Set oReg=GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & _

strComputer & "\root\default:StdRegProv")

oReg.GetBinaryValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,iValues

Dim arrDPID

arrDPID = Array()

For i = 52 to 66

ReDim Preserve arrDPID( UBound(arrDPID) + 1 )

arrDPID( UBound(arrDPID) ) = iValues(i)

Next

'

Dim arrChars

arrChars = Array("B","C","D","F","G","H","J","K","M","P","Q","R","T","V","W","X","Y","2","3","4","6","7","8","9")

'

For i = 24 To 0 Step -1

k = 0

For j = 14 To 0 Step -1

k = k * 256 Xor arrDPID(j)

arrDPID(j) = Int(k / 24)

k = k Mod 24

Next

strProductKey = arrChars(k) & strProductKey

'

If i Mod 5 = 0 And i <> 0 Then strProductKey = "-" & strProductKey

Next

strFinalKey = strProductKey

'

'

'

strComputer = "."

Set objWMIService = GetObject("winmgmts:" _

& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")

Set colOperatingSystems = objWMIService.ExecQuery _

("Select * from Win32_OperatingSystem")

For Each objOperatingSystem in colOperatingSystems

strOS = objOperatingSystem.Caption

strBuild = objOperatingSystem.BuildNumber

strSerial = objOperatingSystem.SerialNumber

strRegistered = objOperatingSystem.RegisteredUser

Next

Set wshShell=CreateObject("wscript.shell")

strPopupMsg = strOS & vbNewLine & vbNewLine

strPopupMsg = strPopupMsg & "Build Number: " & strBuild & vbNewLine

strPopupMsg = strPopupMsg & "PID: " & strSerial & vbNewLine & vbNewLine

strPopupMsg = strPopupMsg & "Registered to: " & strRegistered & vbNewLine & vbNewLine & vbNewLine

strPopupMsg = strPopupMsg & "Your Windows Product Key is:" & vbNewLine & vbNewLine & strFinalKey

strPopupTitle = "Microsoft Windows License Information"

wshShell.Popup strPopupMsg,,strPopupTitle,vbCancelOnly+vbinformation

WScript.Quit

Voila ce que ça donne:



Modifié par system32 le 20/01/2015 19:26
Zorglub 666
 Posté le 21/01/2015 à 10:56 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Nouvelle astucienne

Fonctionne parfaitement sous Windows 7 64 bits (bien nommer le fichier texte avec l'extension .vbs), je retrouve bien ma clé de licence.

À noter que la fonction ConvertToKey du script appliquée à la valeur HKLM\SOFTWARE\Microsoft\Internet Explorer\Registration\DigitalProductId plutôt qu'à la valeur HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\DigitalProductID donne le même résultat.

Mais Advanced Tokens Manager est beaucoup plus puissant, puisqu'il permet de sauvegarder l'activation et de la restaurer, en cas de reformatage et de réinstallation par exemple.

ELICHA
 Posté le 21/01/2015 à 11:23 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

Bonjour,

Tout cela me parait bien compliqué! Il y a longtemps que je me suis aperçu que la clé trouvée par logiciel ne correspond pas à celle marquées sur l'étiquette. Avec le petit logiciel SIW, outre les clés de Windows, et des autres programmes installés tels Office, on a énormément de renseignements sur l'appareil. Alors autant utiliser celui-là (entre autres)

yves.vaissiere
 Posté le 21/01/2015 à 13:20 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Grand Maître astucien

Quand il y a étiquette, il faut utiliser l'étiquette !


A la limite on pourrait remplacer le serial d'un système préinstallé par celui sur l'étiquette, par pure satisfaction intellectuelle ;
mais à remplacer celui d'un système installé avec celui récupéré par n'importe quel script ou logiciel à partir du préinstallé, eh bien on se fait jeter comme un malpropre !

Donc :

1°) lire l'étiquette et la recopier, tout simplement ;
2°) utiliser un script ou logiciel, si l'étiquette est absente ; entendu que ce qui est récupéré ne permettra pas une réinstall/activation, si c'est depuis un préinstallé.

Bonjour, l'astuce indique un script (jusqu'à 7) ; pas un logiciel. (l'un et autre étant inutile envers un PC vendu sous 8, il n'y a besoin de rien)
On peut préférer ...

La "complication" consiste à choisir ou changer l'extension du nom d'un fichier, par défaut invisible ;
c'est pas toujours évident de connaître ses billes, mais ça peut rendre service tôt ou tard.



Modifié par yves.vaissiere le 21/01/2015 13:27
MARCOPOLO59100
 Posté le 24/01/2015 à 11:48 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Nouvel astucien

Pourquoi ça ne marche pas, je suis sous Windows 8 et voila le rapport d'erreur :

Script: C:\Users\MARC\Desktop\CléWindows/vbs

Ligne: 20

Caract. : 15

Erreur: ')' attendu

Code: 800A03EE

Source: Erreur de compilation Microsoft VBScript

qui pourrait m'aider sachant que je suis aller contrôler qu'il n'y avait pas d'erreur de frappe sur le caractère 15 de la ligne 20.

yves.vaissiere
 Posté le 24/01/2015 à 12:11 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Grand Maître astucien

Procède par copier-coller, et là tu seras sûr qu'il n'y a pas d'erreur de frappe.

(Ressaie si tu veux avec :

WScript.Echo GetKey(CreateObject("WScript.Shell").RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\DigitalProductId"))

Function GetKey(rpk)

i=28

szPossibleChars="BCDFGHJKMPQRTVWXY2346789"

Do

dwAccumulator=0:j=14

Do

dwAccumulator=dwAccumulator*256

dwAccumulator=dwAccumulator+rpk(j+52)

rpk(j+52)=(dwAccumulator\24)and 255

dwAccumulator=dwAccumulator Mod 24

j=j-1

Loop While j>=0

i=i-1:szProductKey=mid(szPossibleChars,dwAccumulator+1,1)&szProductKey

if(((29-i)Mod 6)=0)and(i<>-1)then

i=i-1:szProductKey="-"&szProductKey

End If

Loop While i>=0

GetKey=szProductKey

End Function


Mais ne perds pas de vue que ça ne renvoie pas la bonne clé de produit, dont au reste on n'a pas besoin si la machine est vendue sous 8)

MARCOPOLO59100
 Posté le 24/01/2015 à 12:47 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Nouvel astucien

Merci, je vais essayer ton script, en fait je me rends compte que se n'est pas Windows 8 mais 8.1 (nouvelle machine depuis 3 semaines) et qu'il n'est livré avec aucun CD'S donc pas de clé, il faut créer sur une clé USB, une sorte de sauvegarde a garder précieusement en cas de réinstallation donc cette fameuse clé doit être contenue dans la sauvegarde.

Publicité
MARCOPOLO59100
 Posté le 24/01/2015 à 12:58 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Nouvel astucien

Encore un grand merci, je viens d'essayer ton script par copier-coller et j'ai obtenu une clé, maintenant d'après les commentaires précédents que j'ai pu lire est-ce la bonne, mystère et boule de gomme.

MARCOPOLO59100
 Posté le 24/01/2015 à 13:04 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Nouvel astucien

Pour approfondir la chose et par curiosité, j'ai repris le script de PC Astuces que j'avais essayé en 1er (qui ne marchait pas), cette fois-ci par copier-coller et miracle, j'obtiens la même clé qu'avec le tiens.

system32
 Posté le 13/02/2015 à 19:18 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

Tu avais recopié signe par signe ?!?! Sans faire de copié collé ?!



Modifié par system32 le 13/02/2015 19:19
Loulanne
 Posté le 18/02/2015 à 02:52 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petite astucienne

Bonsoir, pour moi le truc fonctionne mais ça ne me donne pas la même clé que j'ai sur mon cd Windows 8.1.

Où est le problème!!!

yves.vaissiere
 Posté le 18/02/2015 à 08:05 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Grand Maître astucien

Comme dit plus haut, le script ne donne pas un bon numéro sous 8.

Le Guermeur
 Posté le 18/02/2015 à 08:54 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

Le script me donne le même numéro qu'avec Aida Extrême Édition....mais le Diag de ZHP m'indique une clé partielle qui n'a rien avoir avec le script

yves.vaissiere
 Posté le 18/02/2015 à 10:12 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Grand Maître astucien

Ne pas confondre Product Id avec Product Key.

Chaumine
 Posté le 18/02/2015 à 10:37 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

Bonjour,

Le n° de clé Windows fait partie des nombreuses informations données par le petit logiciel Speecy.

Voir http://www.pcastuces.com/logitheque/speccy.htm

Le Guermeur
 Posté le 18/02/2015 à 10:59 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

yves.vaissiere a écrit :

Ne pas confondre Product Id avec Product Key.

bien sûr,pas de confusion....

Ma product key est différente selon les moyens utilisés:

Le Script/ AIDA/Speccy donnent la même clé

SIW donne une clé différente conforme à la clé relevée par ZHP Diag(partial key apparaisant sur les rapports) Je pense que cette dernière est la bonne

Publicité
Pages : [1] 2 3 ... Fin
Page 1 sur 3 [Fin]

Vous devez être connecté pour participer à la discussion.
Cliquez ici pour vous identifier.

Vous n'avez pas de compte ? Créez-en un gratuitement !
Recevoir PC Astuces par e-mail


La Lettre quotidienne +226 000 inscrits
Avec l'actu, des logiciels, des applis, des astuces, des bons plans, ...

Les bonnes affaires
Une fois par semaine, un récap des meilleurs offres.

Les fonds d'écran
De jolies photos pour personnaliser votre bureau. Une fois par semaine.

Les nouveaux Bons Plans
Des notifications pour ne pas rater les bons plans publiés sur le site.

Les bons plans du moment PC Astuces

Tous les Bons Plans
Gratuit3 mois d'abonnement à Amazon Music Unlimited gratuits
Valable jusqu'au 24 Octobre

Amazon vous permet d'essayer son service de streaming musical pendant 3 mois gratuitement. Avec Amazon Music Unlimited, accédez à plus de 50 millions de titres, sans publicité et en illimité sur tous vos appareils : smartphone, tablette, PC/Mac, Fire, Alexa. Vous avez même la possibilité de télécharger vos playlists pour des écoutes hors connexion. A la fin de ces 3 mois, vous pourrez basculer vers l'offre payante à 9,99 € / mois ou bien arrêter sans frais le service. A noter l'existence d'une offre famille à 14,99 € / mois qui permet jusqu'à 6 utilisateurs d'écouter leur musique à tout moment et sur leurs appareils préférés. Vous pouvez annuler l'abonnement à tout moment.


> Voir l'offre
456,95 €Tablette 11 pouces Samsung Galaxy Tab S7 (8 coeurs, 6Go/ 128Go, stylet S Pen) à 456,95 € livrée
Valable jusqu'au 24 Octobre

Amazon Espagne fait une promotion sur l'excellente tablette 11 pouces Samsung Galaxy Tab S7 qui passe à 451,24 € (avec la TVA ajustée). Comptez 5,71 € pour la livraison en France soit un total de 456,95 € livrée. On la trouve ailleurs à plus de 580 €.

La Tablette Samsung Galaxy Tab S7 est un produit d'exception tant par son design que par sa puissance et ses fonctionnalités. Aussi puissante qu'un PC, équipée d'un écran 120 Hz ultra-immersif et d'un stylet S-Pen connecté révolutionnaire, elle vous permettra de tout faire très simplement et de rester créatif en toutes circonstances. Le S-Pen inclus permet la prise de notes intelligente ainsi qu'un gestuelle de commandes intuitive et sans contacts (Air Action). Son processeur Snapdragon 865 Plus 8-Core, ses 6 Go de RAM, sa batterie 8000 mAh et sa connectique Wi-Fi 6 AX sont gages de hautes performances et d'efficacité tout au long de la journée. Que vous souhaitiez travailler ou jouer, créer ou vous divertir, la tablette internet Galaxy Tab S7 est parfaite pour tous les usages.

Le tout tourne sous Android 10 en français dès le premier démarrage et que vous pouvez passer à Android 11.


> Voir l'offre
350,70 €Nettoyeur connecté haute-pression Kärcher K7 Premium Smart Control (180 bars) à 350,70 €
Valable jusqu'au 24 Octobre

Cdiscount fait une promotion sur le nettoyeur connecté haute-pression Kärcher K7 Premium Smart Control (180 bars) qui passe à 350,70 € avec le code promo 40BRICOLAGE. On le trouve habituellement autour de 449 €. Nettoyeur haute pression connecté, technologie Smart Connect. Pour usage intensif. Surface conseillée ≈ 60m²/h, moteur à induction refroidi à l’eau, pompe aluminium Premium. Poignée de transport télescopique, pied de stabilité, grandes roues, enrouleur avec flexible haute pression de 10m, nombreux accessoires et rangements. Fonction "Boost" : 15 bars de puissance supplémentaire pour un nettoyage intensif .Connectivité et applications via Smartphone. 


> Voir l'offre

Sujets relatifs
Retrouver l'affichage horizontal - Windows toutes versions
Retrouver la date d'installation de Windows - Windows toutes versions
Retrouver la gestion des Zip - Windows toutes versions
Retrouver les bibliothèques par défaut - Windows toutes versions
 > Tous les forums > Forum Base de connaissances PC Astuces