× Aidez la recherche contre le COVID-19 avec votre ordi ! Rejoignez l'équipe PC Astuces Folding@home
 > Tous les forums > Forum Windows 7
 Aide pour lire clé produit Windows 7Sujet résolu
Ajouter un message à la discussion
Page : [1] 
Page 1 sur 1
groot921
  Posté le 27/03/2020 @ 02:16 
Aller en bas de la page 
Petit astucien

Bonjour,

Un proche a réinstallé Windows 7 sur son PC sauf que l'étiquette où il y a la clé produit est détériorée. Je l'ai scannée et essayé diverses combinaisons mais rien ne passe. Si quelqu'un veut bien essayer, je lui envoie l'image en message privé. Merci.

Publicité
amoretti
 Posté le 27/03/2020 à 05:58 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

a tout hasard ;réinstallé sur le même ou un autre disque?

si disque remplacé est en état ,remets le en place,et exécute ce logiciel parmi d'autres

https://lecrabeinfo.net/retrouver-sa-cle-de-produit-windows.html



Modifié par amoretti le 27/03/2020 06:04
groot921
 Posté le 27/03/2020 à 06:32 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

Il s'agit du même disque dur. Dans les détails, j'avais retrouvé la clé produit dans Windows sauf que celle-ci diffère largement de celle affichée derrière le PC. J'ai tenté d'activer mais rien à faire pour celle qui était dans Windows elle est invalide. J'espère juste que quelqu'un arrivera à décrypter la clé, car j'ai beau essayer rien ne passe, ou alors les deux sont invalides.



Modifié par groot921 le 27/03/2020 06:33
amoretti
 Posté le 27/03/2020 à 06:49 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

re ; essaie d'activer la clé retrouvée dans Windows par téléphone.il est vrai,"il faut être attentif" https://forums.cnetfrance.fr/topic/165928-comment-activer-windows-internet-modem-ou-telephone/

poussebois
 Posté le 27/03/2020 à 08:09 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Maître astucien

Bonjour ,

Ce n'est pas la réponse à la question mais une solution de contournement serait d'installer un Windows 10 : on trouve des clés de licence sur le net pour quelques euros, d'autant plus que Windows 7 n'est plus maintenu...

@ +

amoretti
 Posté le 27/03/2020 à 08:37 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

poussebois.

j'ai voulu suivre l’idée de départ(peut être veux-t-il conserver seven?)

w36xb2w
 Posté le 27/03/2020 à 09:14 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Astucien

Bonjour

Si tu as accès au pc avec un cd hirens cd

tu ouvres le bloc note

tu fais copier/coller ceci dedans et l'enregistres en supprimant txt et renomme clé.vbs tu le lances et tu auras ne N°

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

poussebois
 Posté le 27/03/2020 à 09:43 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Maître astucien

@ w36xb2w ,

Ceci est valable sur une machine déjà équipée d'un Windows 7 activé. Pas sur une réinstallation.

@ amoretti et groot921 ,

Si vraiment il faut garder Windows 7, on trouve des clés de licence pour 3 € .



Modifié par poussebois le 27/03/2020 09:45
yves.vaissiere
 Posté le 27/03/2020 à 11:24 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Grand Maître astucien

Bonjour,

Un proche a réinstallé Windows 7 sur son PC sauf que l'étiquette où il y a la clé produit est détériorée.

il aurait dû faire une sauvegarde de son Système avant de réinstaller.

(il faut en faire sans attendre de telles circonstances, d'ailleurs)

Il n'aurait pas dû réinstaller avec une étiquette détériorée.

(bon, j'arrête )

Malgré la réinstallation, subsiste-t-il la possibilité de faire une restauration-"usine" ? La réinstall par un novice peut avoir épargné la partition en question ...

Parallèlement, vois l'étiquette. Il n'y a donc que :

BCDFGHJKMPQRTVWXY2346789

(pas de A, pas de E etc. à cause des confusions possibles, bien qu'ils aient laissé B et 8)

Peut-être par élimination tu retrouveras la clé ...



Modifié par yves.vaissiere le 27/03/2020 13:58
Publicité
Anonyme
 Posté le 27/03/2020 à 16:57 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

redit: je suis pas sûre que ça marche si il a pas rentré le n° de licence sur étiquette !

il peut l'activer avec Advanced Tokens Manager v3.5 RC 5 ici

puis après trouver un script vbs comme celui ci-dessous:

copier dans le bloc note puis l'enregistrer clé.vbs

Option Explicit

Dim objshell,path,DigitalID, Result
Set objshell = CreateObject("WScript.Shell")
'Set registry key path
Path = "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\"
'Registry key value
DigitalID = objshell.RegRead(Path & "DigitalProductId")
Dim ProductName,ProductID,ProductKey,ProductData
'Get ProductName, ProductID, ProductKey
ProductName = "Product Name: " & objshell.RegRead(Path & "ProductName")
ProductID = "Product ID: " & objshell.RegRead(Path & "ProductID")
ProductKey = "Installed Key: " & ConvertToKey(DigitalID)
ProductData = ProductName & vbNewLine & ProductID & vbNewLine & ProductKey
'Show messbox if save to a file
If vbYes = MsgBox(ProductData & vblf & vblf & "Save to a file?", vbYesNo + vbQuestion, "BackUp Windows Key Information") then
Save ProductData
End If



'Convert binary to chars
Function ConvertToKey(Key)
Const KeyOffset = 52
Dim isWin8, Maps, i, j, Current, KeyOutput, Last, keypart1, insert
'Check if OS is Windows 8
isWin8 = (Key(66) \ 6) And 1
Key(66) = (Key(66) And &HF7) Or ((isWin8 And 2) * 4)
i = 24
Maps = "BCDFGHJKMPQRTVWXY2346789"
Do
Current= 0
j = 14
Do
Current = Current* 256
Current = Key(j + KeyOffset) + Current
Key(j + KeyOffset) = (Current \ 24)
Current=Current Mod 24
j = j -1
Loop While j >= 0
i = i -1
KeyOutput = Mid(Maps,Current+ 1, 1) & KeyOutput
Last = Current
Loop While i >= 0

If (isWin8 = 1) Then
keypart1 = Mid(KeyOutput, 2, Last)
insert = "N"
KeyOutput = Replace(KeyOutput, keypart1, keypart1 & insert, 2, 1, 0)
If Last = 0 Then KeyOutput = insert & KeyOutput
End If


ConvertToKey = Mid(KeyOutput, 1, 5) & "-" & Mid(KeyOutput, 6, 5) & "-" & Mid(KeyOutput, 11, 5) & "-" & Mid(KeyOutput, 16, 5) & "-" & Mid(KeyOutput, 21, 5)


End Function
'Save data to a file
Function Save(Data)
Dim fso, fName, txt,objshell,UserName
Set objshell = CreateObject("wscript.shell")
'Get current user name
UserName = objshell.ExpandEnvironmentStrings("%UserName%")
'Create a text file on desktop
fName = "C:\Users\" & UserName & "\Desktop\WindowsKeyInfo.txt"
Set fso = CreateObject("Scripting.FileSystemObject")
Set txt = fso.CreateTextFile(fName)
txt.Writeline Data
txt.Close
End Function



Modifié par Anonyme le 27/03/2020 17:08
monm49
 Posté le 28/03/2020 à 01:12 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Nouvel astucien

Essayer avec winfokey( tapez dans Google).

shamal02
 Posté le 28/03/2020 à 08:30 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

Bonjour,

Oui, essayez avec : Windows Key Viewer

Bonne journée

groot921
 Posté le 29/03/2020 à 01:16 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

Bonjour à tous,

Pour résumer, j'ai deux clés : une derrière le PC (partiellement illisible) et celle qui était avec Windows 7. Celle de Windows 7 a été récupérée mais est refusée lors de l'activation. J'ai essayé x logiciels pour voir les clés et tous me donne celle qui ne s'active pas. Le proche voulait justement réinstaller Windows 7 pour faire une mise à niveau vers 10.

Edit : il ne veut pas acheter une nouvelle clé, même à pas cher, de Windows 7 ou 10. Tant pis, merci à tous.



Modifié par groot921 le 29/03/2020 03:14
yves.vaissiere
 Posté le 29/03/2020 à 04:19 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Grand Maître astucien

Donc, j'insiste : aucun script ni logiciel de récupération de clé ne sert à quoi que ce soit sur préinstallé.

( ni, de fait, réinstallé. Sauf pour les étourdis ayant déjà renseigné une clé, par la suite effacée/oubliée/perdue)

Il fallait migrer d'abord : aucune clé n'aurait été demandée. D'une façon générale, se renseigner avant de faire une connerie plutôt qu'après.

(j'arrête. Vois quand même si la restau-usine est possible ; c'est une touche à l'allumage, dépendant du constructeur)

poussebois
 Posté le 29/03/2020 à 08:44 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Maître astucien

Bonjour ,

Alors, s'il ne veut pas acheter une clé de licence ni pour W7, ni pour W10, même pour quelques euros, il n'y a plus que 2 solutions:

-- Donner le PC à une association assez riche pour payer quelques euros !

-- Installer une distribution Linux !!

@ +



Modifié par poussebois le 29/03/2020 08:45
yves.vaissiere
 Posté le 29/03/2020 à 10:58 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Grand Maître astucien

7 est utilisable 30 jours sans licence ("Grace Period" ; on peut choisir sa version Home/Pro/Intégrale donc autant prendre "l'Ultimate").

Reconductible trois fois avec la commande (en tant qu'admin) slmgr /rearm ; et au bout des quatre mois, rien n'interdit de formater et recommencer !

J'en profite pour rappeler que TOUS les logiciels sont en essai gratuit, pas seulement les OSes.

C'est donc l'occasion d'essayer 10, dans à-peu-près les mêmes conditions que 7.

Page : [1] 
Page 1 sur 1

Vous devez être connecté pour poster des messages. Cliquez ici pour vous identifier.

Vous n'avez pas de compte ? Créez-en un gratuitement !


Les bons plans du moment PC Astuces

Tous les Bons Plans
159,99 €Tablette Lenovo TAB M10 Plus X606 (FullHD, 8 coeurs, 4 Go RAM, 64 Go stockage, Android 9) à 159,99 €
Valable jusqu'au 30 Novembre

Amazon fait une promotion sur la tablette Lenovo M10 Plus qui passe à 159,99 € alors qu'on la trouve ailleurs autour de 199 €. Cette tablette possède un écran FullHD de 10,3 pouces IPS (1920x1200), un processeur octo-core MediaTek Helio P22T, 4 Go de mémoire vive, ainsi que 64 Go de stockage interne extensible par MicroSD. La tablette dispose d'une grande batterie de 7 000 mAh et d'un port USB-C, du Bluetooth 5.0 et du WiFi AC. Le tout tourne sous Android 9.0. La livraison est gratuite.


> Voir l'offre
74,58 €Ecouteurs intra-auriculaires sans fil Bluetooth Jabra Elite 65t à 74,58 € livrés
Valable jusqu'au 27 Novembre

Amazon Allemagne fait une promotion sur les écouteurs intra-auriculaires sans fil Bluetooth Jabra Elite 65t qui passent à 69,58 € (avec la TVA ajustée). Comptez 5 € pour la livraison en France soit un total de 74,58 € livrés. On les trouve ailleurs à partir de 100 €. Pensés pour vous permettre de vivre votre musique comme vous l'entendez et pour assurer des conversations d'une grande clarté, les écouteurs Jabra Elite 65t ont tout pour vous séduire ! Côté son, l'égaliseur personnalisable vous permet d'ajuster le rendu sonore tandis que la technologie avancée à quatre microphones supprime les bruits de fond lors des appels pour des conversations limpides. Au quotidien, ces écouteurs Jabra restent parfaitement en place et proposent même une fonction de commande vocale simplifiée. Enfin, vous apprécierez les 5 heures d'autonomie avec une seule charge, qui se transforment en 15 heures avec l'étui de recharge compact.  Le Jabra Elite 65t est certifié IP55 et offre une garantie de 2 ans contre l’humidité et la poussière. Où que vous soyez et quelle que soit votre activité, vous profitez d’une liberté absolue pour les appels et la musique. 


> Voir l'offre
325,29 €SSD Western Digital Blue 4 To à 325,29 € livré
Valable jusqu'au 27 Novembre

Amazon Allemagne fait une promotion sur le SSD Western Digital Blue 4 To qui passe à 320,68 € (avec la TVA ajustée). Comptez 4,61 € pour la livraison en France soit un total de 325,29 € livré. On le trouve ailleurs à partir de 400 €. Ce SSD à mémoire TLC offre des vitesses de 545 Mo/s en lecture et 525 Mo/s en écriture. 

Utilisez votre compte Amazon FR sur Amazon DE. Pas de douane.


> Voir l'offre

Sujets relatifs
Clé Produit Windows 7
Demande d'Aide pour installer Windows 7 sans CD d'intallation.
Product Key - Clé produit - Clé Windows
Réintallation Windows 7 - Aide pour résoudre un problème
clé d'activation pour Windows 7 Home Basic
clé usb bluetooth pour windows 7 ?
Recherche pilote clé USB WIFI pour windows 7
Config Windows 7 pour Windows 10 est-ce suffisant ?
ATTENTION - Il n'y a rien à acheter ou à payer pour passer à Windows 10 !!!
Windows 7 : les mises à jour étendues pour tous ?
Plus de sujets relatifs à Aide pour lire clé produit Windows 7
 > Tous les forums > Forum Windows 7