Newsgroup: it.comp.os.win.windows10
Titolo: Product Key

 
Niente di che, ma nel caso servisse, il VBscript di cui sotto legge e
decodifica la product key memorizzata nel registry, basta salvare lo
script come (es.) prodkey.vbs e poi avviarlo
 
' inizio script
Set WshShell = WScript.CreateObject("WScript.Shell")
 
KeyPath = "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\" & _
          "DigitalProductId"
 
WScript.Echo ExtractKey(WshShell.RegRead(KeyPath))
 
Function ExtractKey(KeyInput)
    Const KeyOffset = 52
    i = 28
    CharWhitelist = "BCDFGHJKMPQRTVWXY2346789"
    Do
      Cur = 0
      x = 14
      Do
        Cur = Cur * 256
        Cur = KeyInput(x + KeyOffset) + Cur
        KeyInput(x + KeyOffset) = (Cur \ 24) And 255
        Cur = Cur Mod 24
        x = x -1
      Loop While x >= 0
      i = i -1
      KeyOutput = Mid(CharWhitelist, 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
    ExtractKey = KeyOutput
End Function
' fine script
 

 script come (es.) prodkey.vbs e poi avviarlo
 
dimenticavo, funziona anche con Vista, 7 ed 8
 


Ho Windows 10 pro proveniente da aggiornamento gratuito ex Seven: ho 
sempre saputo che il ProductKey è quello che finisce con 
....-9MPGT-3V66T, comune a tutti i Sistemi provenienti da aggiornamenti 
e con licenza digitale. Rilevato con Produkey, Aida, ecc...
Curiosamente con il tuo ottimo script viene fuori un altro productkey!
Spegazione? Grazie.
sAndrO
 


Funziona : ) provato però sul mio Win7 sp1 a 64 bit , 
ciao : )


grazie. Ho voluto provarlo, ma con Win 10 LTSC non funge...
la licenza l'ho acquistata 1 anno fa su Amazon. È regolarmente attivata 
ed aggiornata automaticamente da windows update (attualmente ancora in 
versione "noproblems" 1809).
https://i.imgur.com/fC3LKqi.png
 
 
-- 
<=)O - ByE bYe By TaF® - O(=>  *DFDT/M*
"Il mondo è un posto pericoloso. Non a causa di quelli che compiono
azioni malvagie, ma per quelli che osservano senza fare nulla."
/Albert Einstein/

 script come (es.) prodkey.vbs e poi avviarlo
 
Ehm...
 
powershell "(Get-WmiObject -query ‘select * from SoftwareLicensingService’).OA3xOriginalProductKey"
 
Enrico ;)



Lo so, lo so; è che mi diverte buttar giù due righe di codice in
qualsivoglia linguaggio :D
 
 
 

 ....-9MPGT-3V66T,
 
dieci cifre uguali per tutti? mi pare impossibile.
 
 
 

 ha scritto:

Ho letto da qualche parte che le attivazioni digitali della licenza sono 
caratterizzate da questo product key; potrei ricordare male, ma resta il 
fatto che ho due pc con attivazione digitale, collegata all'account MS, 
e, per entrambi, i vari individuatori di product key mi danno la stessa 
chiave: wk7jg-nphtm-c97jm-9mpgt-3v66t. Forse perché l'account MS è lo 
stesso per i due PC?
Ma allora perché con l'ottimo script di ObiWan viene fuori un product 
key diverso...Boh!
sAndrO

 grazie. Ho voluto provarlo, ma con Win 10 LTSC non funge...
 
Prova a lanciare regedit ed aprire il seguente "path"
 
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion
 
ci riesci ? In caso positivo, devi eseguire lo script con diritti di
amministratore in modo da permettere l'accesso alla chiave
 
Considera che lo script gestisce solo una minima parte delle info, se
sei curioso prova a fare doppio click su "DigitalProductId" oppure su
"DigitalProductId4" e dai un'occhiata ai dati ;-)
 

 "DigitalProductId4" e dai un'occhiata ai dati ;-)
 
-- 
<=)O - ByE bYe By TaF® - O(=>  *DFDT/M*
"Gioca la carta dell’indifferenza. È la più scaltra delle vendette.
molti sarebbero sconosciuti se qualche loro nemico non ne
avesse parlato." /Baltasar Graciàn/

 
https://i.imgur.com/bIDv7U1.png
 
 
Di "DefaultProduct..." non mi interessa nulla, è il contenuto della
chiave di cui sopra che devi controllare, non quello delle sottochiavi
 


Si ok... mi ero sbagliato... comunque a me esce questo risultato, 
eseguendo il VBS dal prompt con diritti di amministratore.. 8-(
https://i.imgur.com/TwyWQXG.png
 
 
-- 
<=)O - ByE bYe By TaF® - O(=>  *DFDT/M*
"L’uomo superiore comprende ciò che è giusto.
L’uomo inferiore comprende soltanto ciò che gli sarà utile."
/Anonimo/

 
https://i.imgur.com/TwyWQXG.png
 
 
LOL, la sQuola è iniziata da poco, poi tra scioperi, vacanze, maltempo con
ordinanze del sindaco di tenere chiuse le sQuole ecc. il tuo è ancora fermo
alla lettera B.
 
Dagli tempo di imparare le altre ecchacacchio, tutta sta fretta?
 
:-D
 
 
 
-- 
Ciao, Guglielmo.


 
non ottengo risultati, come si usa ? 
 

  :-D
 
eh, ma neanche è capace di iniziare dalla "A" :D LOL
 
-- 
<=)O - ByE bYe By TaF® - O(=>  *DFDT/M*
"Non voglio sentirmi intelligente guardando dei cretini,
voglio sentirmi cretino guardando persone intelligenti."
/Franco Battiato/


Click destro su start, Windows prower shell, oppure apri il prompt dei
comandi.
 
Copiaci dentro la riga di sopra senza eventuale segno di quoting (es >) e
tutta in unica riga, attenzione a questo. Premi invio.
 
 
 
-- 
Ciao, Guglielmo.


 
ottengo questo:
https://i.postimg.cc/B68T36nF/Cattura.png
 
 
 


C'è un errore, il punto interrogativo prima di select. Deve essere '
 
 
 
-- 
Ciao, Guglielmo.

C'è un errore, il punto interrogativo prima di select. Deve essere '
 
fatto, ma sempre senza risultato:
https://i.postimg.cc/KjKzHkQK/Cattura.png
 
 
 


Stavolta non se ne esce con un errore per cui per qualche motivo non riesce
a reperire il product key.
 
Gisto per curiosità, Windows 10 che versione e da dove proviene?
Installazione da zero, aggiornamento da 7 o 8 o cosa?
 
Nel sistema è stato effettivamente inserito un product key e risulta
regolarmente attivato?
 
-- 
Ciao, Guglielmo.


 
la versione e' Windows 10 pro 1903 build 18362.476
 
il classico programma ProductKey della NirSoft restituisce il key generico:
VK7JG-NPHTM-C97JM-9MPGT-3V66T
 
la licenza digitale proviene da un aggiornamento di Windows 8.0, ma 
l'installazione attuale e' stata fatta da zero inserendo il PK di Win 8, per 
cui credo che sia la stessa cosa di quando fu fatto l'aggiornamento 
automatico. 
 

 la licenza digitale proviene da un aggiornamento di Windows 8.0
 
 
 
È lo stesso p.key che risulta anche a me, con nirsoft e aida64, come ho 
già postato. Poi con lo script mi viene fuori un altro p.key...
sAndrO

 
https://i.imgur.com/TwyWQXG.png
 
 
 
 
Io ho una licenza ESD di win10Pro, venuta come passaggio da win10 home 
(da iso microsoft che avevo installato da zero giorni prima), che 
funziona molto bene
 
Produkey di Nirsoft mi dà 2 valori
-la licenza di win10 home che viene dal bios
-una licenza vuota di win10pro (cioè non mostra nessun carattere)
 
Se faccio girare lo script di Guglielmo mi vengono tutti "B"
 
Se dò il comando di Enrico da powershell mi viene ancora la licenza 
Home proveniente dal bios
 
Insomma il codice della licenza ESD per win10 Pro (attivata) non viene 
visto da nessuno dei 3 metodi...

 powershell "(Get-WmiObject -query ‘select * from SoftwareLicensingService’).OA3xOriginalProductKey"
io ci ho provato e non da alcun risultato


 
si, ti ho letto, e anche io come te, sapevo che tutti i PC aggiornati da W7 
e W8 mostrano quel PK.
 
dallo script di ObiWan mi esce un PK che termina con HCFC6, anche a te ?
 
ora provo a mettere quel PK in una VM, tanto per capire se e' valido. 
 

ora provo a mettere quel PK in una VM, tanto per capire se e' valido.
 
prova fatta installando in VirtualBox la 1909 scaricata al momento con 
MediaCreationTool, mi dice che il PK non e' valido.
 
il PK di W8 viene ancora regolarmente accettato, e nella VM ho gli stessi 
risultati del PC reale:
- NirSoft restituisce ...-3V66T
- lo script di ObiWan ...-HCFC6
- il comando di Enrico : nulla
 


Curiosità: io ottengo gli stessi risultati!
Inoltre, provando ad immettere il PK ottenuto dallo script, ottengo un 
rifiuto! Il PK non funziona!
sAndrO

 script come (es.) prodkey.vbs e poi avviarlo
 
codice riveduto & corretto, ora dovrebbe funzionare su tutte le
versioni (o almeno spero :D); qui di seguito il codice
 
 
 
  Option Explicit
 
  Dim oSH, path, DigitalID, Result
  Dim ProductName, ProductID, ProductKey, ProductData
 
  Set oSH = CreateObject("WScript.Shell")
  Path = "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\"
  DigitalID = oSH.RegRead(Path & "DigitalProductId")
 
  ProductName = "Product Name: " & oSH.RegRead(Path & "ProductName")
  ProductID = "Product ID  : " & oSH.RegRead(Path & "ProductID")
  ProductKey = "Installed Key: " & ConvertToKey(DigitalID)
  ProductData = ProductName & vbNewLine & _
                ProductID & vbNewLine & _ 
                ProductKey
 
  Wscript.Echo ProductData
 
Function ConvertToKey(Key)
  Const KeyOffset = 52
  Dim isWin8, Maps, i, j, Current, sKey, Last, keypart1, insert
 
  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
    sKey = Mid(Maps,Current+ 1, 1) & sKey
    Last = Current
  Loop While i >= 0
 
  If (isWin8 = 1) Then
    keypart1 = Mid(sKey, 2, Last)
    insert = "N"
    sKey = Replace(sKey, keypart1, keypart1 & insert, 2, 1, 0)
    If Last = 0 Then sKey = insert & sKey
  End If
  ConvertToKey = Mid(sKey, 1, 5) & _
                 "-" & Mid(sKey, 6, 5) & _
                 "-" & Mid(sKey, 11, 5) & _
                 "-" & Mid(sKey, 16, 5) & _
                 "-" & Mid(sKey, 21, 5)
End Function
 
 

 versioni (o almeno spero :D); qui di seguito il codice
SNIP
 
quasi ci siamo... ;)
https://i.imgur.com/h5KtvF4.png
 
 
-- 
Ha'u,
/Joe Medicine Crow/

 versioni (o almeno spero :D); qui di seguito il codice
 
mmmhhh... stesso SO e stesso risultato di JM Crow anche per me
https://ogy.de/2pot
 
 
-- 
<=)O - ByE bYe By TaF® - O(=>  *DFDT/M*
"L'indifferenza è la vendetta che il mondo si prende sui mediocri."
/Oscar Wilde/

 
https://ogy.de/2pot
 
 
Azz, avevo dimenticato le attivazioni "MAK" (volume license) :P
 
Ok, qui di seguito lo script aggiornato; da notare che si può anche
eseguire da linea comando, in quel caso il comando da utilizzare è
 
cscript //nologo pkey.vbs
 
e, volendo copiare direttamente le info nella clipboard basta usare il
comando
 
cscript //nologo pkey.vbs|clip
 
ad ogni modo, ecco lo script, notare che nel caso di MAK, la key viene
letta da "DigitalProductId4" invece che da "DigitalProductId"
 
  Option Explicit
 
  Dim oSH, path, Result
  Dim DigitalID, sKey, sTemp
  Dim ProductName, ProductID, ProductKey, ProductData
 
  Set oSH = CreateObject("WScript.Shell")
  Path = "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\"
  DigitalID = oSH.RegRead(Path & "DigitalProductId")
  sKey = ConvertToKey(DigitalID)
  If sKey = "BBBBB-BBBBB-BBBBB-BBBBB-BBBBB" Then
    DigitalID = oSH.RegRead(Path & "DigitalProductId4")
    sKey = ConvertToKey(DigitalID)
  End If
 
  ProductName = "Product Name : " & oSH.RegRead(Path & "ProductName")
  ProductID = "Product ID   : " & oSH.RegRead(Path & "ProductID")
  ProductKey = "Installed Key: " & sKey


 Azz, avevo dimenticato le attivazioni "MAK" (volume license) :P
SNIP
 
ora funge alla grande! :D ;)
 
-- 
<=)O - ByE bYe By TaF® - O(=>  *DFDT/M*
"Ci sono tre verità: la mia verità. la tua verità, e la verità."
/Anonimo/

 ora funge alla grande! :D ;)
 
Grazie per la conferma; se sei curioso, lancia regedit ed apri la
chiave del registry
 
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion
 
poi fai doppio click sul valore "DigitalProductId" e dai un'occhiata ai
dati contenuti nella stessa considerando che i valori "leggibili" sono
memorizzati come stringhe unicode (2 bytes per carattere), dopodichè
dai anche un'occhiata a "DigitalProductId4"; considera che i dati in
formato "leggibile" sono pochi, ma anche quelli sono interessanti ;-D
 
 
 

 formato "leggibile" sono pochi, ma anche quelli sono interessanti ;-D
 
Eh, lo avevo già fatto l'altra volta. Me lo avevi già suggerito :D
Ed effettivamente... ;)


 Ed effettivamente... ;)
 
Ok, avevo due minuti, prova lo script qui sotto :D
 
Option Explicit
 
Dim oSH, sData
 
Set oSH = CreateObject("WScript.Shell")
sData = LoadData()
Wscript.Echo sData
WScript.Quit 0
 
 
Function LoadData()
  Dim sPath, sResult
  Dim cbDigitalID, sID
  Dim sKey1, sKey2, sType
  Dim saData(9)
 
  On Error Resume Next
 
  sPath = "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\"
 
  cbDigitalID = oSH.RegRead(sPath & "DigitalProductId")
  sKey1 = DecodeKey(cbDigitalID)
 
  cbDigitalID = oSH.RegRead(sPath & "DigitalProductId4")
  sKey2 = DecodeKey(cbDigitalID)
 
  If sKey1 = "BBBBB-BBBBB-BBBBB-BBBBB-BBBBB" Then
    sType = "Volume license"
  Else
    sType = "Standard"
  End If
 
  sID = oSH.RegRead(sPath & "ProductId")
  If Right(sID,5) = "AAOEM" Then
    sType = "OEM"
  End If
 
  saData(0) = "Product Name : " & oSH.RegRead(sPath & "ProductName")
  saData(1) = "Edition      : " & oSH.RegRead(sPath & "EditionID")
  saData(2) = "OS Version   : " & oSH.RegRead(sPath & "CurrentVersion")
  saData(3) = "Release ID   : " & oSH.RegRead(sPath & "ReleaseId")
  saData(4) = "Build ID     : " & oSH.RegRead(sPath & "CurrentBuild")
  saData(5) = "Build data   : " & oSH.RegRead(sPath & "BuildLabEx")
  saData(6) = "License type : " & sType
  saData(7) = "Product ID   : " & sID
  saData(8) = "Installed Key: " & sKey1
  saData(9) = "Original Key : " & sKey2
 
  sResult = Join(saData, vbNewLine)
  LoadData = sResult
End Function
 
Function DecodeKey(Key)
  Const KeyOffset = 52
  Const Maps = "BCDFGHJKMPQRTVWXY2346789"
 
  Dim isWin8
  Dim i, j, Current, sKey, Last
  Dim keypart1, insert
 
  isWin8 = (Key(66) \ 6) And 1
  Key(66) = (Key(66) And &HF7) Or ((isWin8 And 2) * 4)
 
  i = 24
  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
    sKey = Mid(Maps, Current+1, 1) & sKey
    Last = Current
  Loop While i >= 0
 
  If (isWin8 = 1) Then
    keypart1 = Mid(sKey, 2, Last)
    insert = "N"
    sKey = Replace(sKey, keypart1, keypart1 & insert, 2, 1, 0)
    If Last = 0 Then 
      sKey = insert & sKey
    End If
  End If
 
  DecodeKey = Mid(sKey, 1, 5) & _


 Ok, avevo due minuti, prova lo script qui sotto :D
 
Dimenticavo, avrei anche un exe scritto in C che va a decodificare un
tot di altre info dai campi "binari", ma non mi sembra il caso per ora
di pubblicarlo :D
 

 Ok, avevo due minuti, prova lo script qui sotto :D
SNIP
 
ora saltano gli ultimi 3 dati!
https://i.imgur.com/FEJL5W9.png
 
 
-- 
<=)O - ByE bYe By TaF® - O(=>  *DFDT/M*
"L’uomo superiore comprende ciò che è giusto.
L’uomo inferiore comprende soltanto ciò che gli sarà utile."
/Anonimo/

 Ok, avevo due minuti, prova lo script qui sotto :D
SNIP
 
Rettifico!
se lo lancio con il doppio click "as admin" non mi fa vedere le ultime 
3 righe
se invece lo lancio da CMD "as admin" funziona tutto!
 
-- 
<=)O - ByE bYe By TaF® - O(=>  *DFDT/M*
"Fidati, se un uomo si comporta come se non gliene fregasse nulla di te
non gliene frega proprio nulla di te, davvero!"
/Anonimo/

 se invece lo lancio da CMD "as admin" funziona tutto!
 
Provato or ora con un banale doppio click e funziona, per sicurezza il
codice lo trovi anche qui
 
https://pastebin.com/dEKFqxfH
 
 
 



dimenticavo, le uniche info da "mascherare" sono "Product ID",
"Installed Key" ed "Original key", le altre non contengono informazioni
riservate ma solo le info sulla versione dell'OS
 


Il codice è OK! Già testato prima. Ma ora ho capito l'arcano... se 
faccio doppio click da windows tutto funziona correttamente. Se invece 
lo faccio all'interno di Total Commander le ultime tre righe rimangono 
vuote.
Ora indago sul perché... ;)
 
-- 
<=)O - ByE bYe By TaF® - O(=>  *DFDT/M*


:: On Tue, 10 Dec 2019 16:08:35 +0100

Già che ci sono, se qualcuno volesse esaminare più comodamente i dati
binari contenuti nei due "digitalproductid", questo script li legge dal
registry e li scrive in due files (windata1.bin e windata2.bin), in tal
modo è possibile utilizzare tools come ad esempio "frhed" (lo trovate
qui 
http://frhed.sourceforge.net/en/
) per esaminare i dati; quello che
posso dire è che i primi quattro bytes rappresentano la dimensione
totale del blocco, il resto... lo lascio alla curiosità di chiunque
abbia voglia di divertirsi :D
 
Option Explicit
 
Const ForAppending = 8
Const ForReading = 1
Const ForWriting = 2
 
Const REG_PATH = "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\"
 
Dim oSH, oFS
Dim cbData
Dim fp
 
Set oFS = CreateObject("Scripting.FileSystemObject")
Set oSH = CreateObject("WScript.Shell")
 
cbData = oSH.RegRead(REG_PATH & "DigitalProductId")
SaveBin "windata1.bin", cbData
 
cbData = oSH.RegRead(REG_PATH & "DigitalProductId4")
SaveBin "windata2.bin", cbData
 
Sub SaveBin(sName, cbData)
  Dim fp, i
 
  Set fp = oFS.OpenTextFile(sName, ForWriting, True)
  For i=LBound(cbData) to UBound(cbData)
    fp.Write Chr(cbData(i))
  Next
  fp.Close
End Sub
 

Il 10/12/2019 16:07:17, ObiWan ha scritto:
 

Scoperto il "busillis"
Per una mia disattenzione avevo linkato l'avvio di TC nella sua 
versione a 32 bit.
Ora, con la versione a 64bit il problema non si manifesta! ;)
pollo io!
Mi ha fregato il fatto che uso molto spesso TC da chiavetta USB su più 
macchine (anche vecchie) ed in quel caso il link alla 32 it è una 
condizione di funzionamento assicurato.
Ma sul PC dell'ufficio forse è più logico usare la 64bit :P ;) :D
 
-- 
<=)O - ByE bYe By TaF® - O(=>  *DFDT/M*


 versione a 32 bit.
 
Ah ecco :) eseguendo il vbs da 32 bit (ossia con cscript/wscript nella
versione 32 bits - da SysWow64, per capirci) il mapping del registry è
diverso, è per quello che non leggeva una fava :D ovviamente se fosse
stato un OS a 32 bits il problema non si sarebbe posto e lo script
avrebbe funzionato senza intoppi
 
 
 


 
una domanda:
- "Original Key" che cosa dovrebbe indicare ?
 
ci trovo in PK che non ho mai visto. 
 

Per caso è la stessache si legge nell'adesivo windows con la
 finestra illuminandolo con raggi ultravioletti a 365nm?...
 :)
 
 
-- 
Vieni a trovarci su Youtube: 
goo.gl/522kv4
 

  :)
 
E' l'incipit del messaggio satanico che si sente se fai girare
al contrario un CD di Windows 8.0.
 
Un Paperino che ricicla vecchie battute.

 
https://pastebin.com/dEKFqxfH
 
 
Funziona benissimo, grazie!

:: On Wed, 11 Dec 2019 07:15:39 +0100
:: (it.comp.os.win.windows10)
:: <mn.59b37e3ca3...@LeTreDiNotteVirgilio.it>

Ottimo, come per la versione precedente, volendo piazzare le info nella
clipboard, basta lanciare lo script da linea comando, per semplificare
la cosa basta creare un batch che si potrà anche lanciare con un doppio
click, ad esempio
 
@echo off
pushd %~dp0
cscript //nologo pkey.vbs|clip
popd
exit
 
lo script di cui sopra (pkey.cmd) andrà salvato nella stessa cartella
che contiene "pkey.vbs" e, lanciato con un doppio click, piazzerà le
informazioni nella clipboard invece di mostrarle a video
 

 chiunque abbia voglia di divertirsi :D
 
Ok, sono buono, qui di seguito le strutture dati (in formato "C")
corrispondenti ai due blocchi "digitalid" del registry, evito di
documentare le componenti delle strutture dato che già dai nomi
dovrebbe essere abbastanza chiaro cosa contengano :D
 
 
// DigitalProductId
typedef struct t_DigitalProductId {
  unsigned int    uiSize;
  unsigned short  MajorVersion;
  unsigned short  MinorVersion;
  char            szProductId[24];
  unsigned int    uiKeyIdx;
  char            szEditionId[16];
  BYTE            bCdKey[16];
  unsigned int    uiCloneStatus;
  unsigned int    uiTime;
  unsigned int    uiRandom;
  unsigned int    uiLt;
  unsigned int    uiLicenseData[2];
  char            sOemId[8];
  unsigned int    uiBundleId;
  char            sHardwareIdStatic[8];
  unsigned int    uiHardwareIdTypeStatic;
  unsigned int    uiBiosChecksumStatic;
  unsigned int    uiVolSerStatic;
  unsigned int    uiTotalRamStatic;
  unsigned int    uiVideoBiosChecksumStatic;
  char            sHardwareIdDynamic[8];
  unsigned int    uiHardwareIdTypeDynamic;
  unsigned int    uiBiosChecksumDynamic;
  unsigned int    uiVolSerDynamic;
  unsigned int    uiTotalRamDynamic;
  unsigned int    uiVideoBiosChecksumDynamic;
  unsigned int    uiCRC32;
} DigitalProductId;
 
// DigitalProductId4
typedef struct t_DigitalProductId4 {
  unsigned int    uiSize;
  unsigned short  MajorVersion;
  unsigned short  MinorVersion;
  WCHAR           szAdvancedPid[64];
  WCHAR           szActivationId[64];
  WCHAR           szOemID[8];
  WCHAR           szEditionType[260];
  BYTE            bIsUpgrade;
  BYTE            bReserved[7];
  BYTE            bCDKey[16];
  BYTE            bCDKey256Hash[32];
  BYTE            b256Hash[32];
  WCHAR           szEditionId[64];
  WCHAR           szKeyType[64];
  WCHAR           szEULA[64];
} DigitalProductId4;
 
 
 

 al contrario un CD di Windows 8.0.
 
pensavo più a Windows ME

 pensavo più a Windows ME
 
In effetti la prima versione (la prima che ho letto io,
almeno) della battuta si riferiva - credo - a NT 3.51, con
Leo Serni che commentò "Questo è niente... se lo fai girare
normalmente ti installa NT =:-("
 
Bye, G.

 normalmente ti installa NT =:-("
 
Ed aveva perfettamente ragione :D
 

???...


 >> Per caso è la stessa che si legge nell'adesivo windows con la 
finestra illuminandolo con raggi ultravioletti a 365nm?...
 
E' una domanda seria!
 

>> 
Per caso è la stessa che si legge nell'adesivo windows con la finestra illuminandolo con raggi ultravioletti a 365nm?...
 
Parlavo seriamente!


 script come (es.) prodkey.vbs e poi avviarlo
 
Già che c'ero, e nel caso possa essere utile a qualcuno, ho rivisto un
pezzo di codice "C" che avevo in giro, l'ho modificato ed ho creato un
programmino che permette di effettuare il "dump" in formato leggibile
dei vari valori presenti nel registry; il programma lo trovate qui
 
http://www.mvps.org/bitbucket/winid.zip
 
 
lo zip contiene sia l'eseguibile a 32 bits (così funziona sia su
versioni 32 che su 64) ed il sorgente "C"; niente di che, anzi il
codice è abbastanza "sporco", ma alla fine della fiera non è che mi
interessi granchè, non deve essere un esempio di programmazione ma
soltanto un tool per tirare fuori rapidamente dei dati; da notare che
il tool marca con un "*" le voci da "non diffondere" ossia quelle che
sono relative alla licenza dell'OS
 



pensaci, e casomai rileggi la discussione :D
 

In  59 messaggi non ne ho visto uno che potessi considerare una
 risposta


"alfio"  ha scritto nel messaggio news:qsopkn$tej$1...@gioia.aioe.org...

rinnovo la domanda:


 "Original Key" che cosa dovrebbe indicare ?
 
Mi associo alla richiesta... ;)


 Mi associo alla richiesta... ;)
 
In alcuni casi, la chiave originale viene copiata prima di sostituire
quella installata; per cui ho pensato che fosse utile mostrarle
entrambe anche se non sempre la "original" ha senso
 


nel mio caso forse ah senso visto che l'altra è: 
BBBBB-BBBBB-BBBBB-BBBBB
:P


 BBBBB-BBBBB-BBBBB-BBBBB
 
Nel caso di "BBB..." si tratta di una "volume license" ed il programma
dovrebbe (spero :D) riconoscerla come tale e mostrare il tipo di licenza
 
 

 dovrebbe (spero :D) riconoscerla come tale e mostrare il tipo di licenza
 
Yessa! ;)
 
-- 
<=)O - ByE bYe By TaF® - O(=>  *DFDT/M*
"Il prezzo pagato dalla brava gente che non si interessa di politica
è di essere governata da persone peggiori di loro."
/Platone/