Tärkein Skriptejä Ja Muokkauksia Tuoteavaimen tarkasteleminen Windows 10-, Windows 8- ja Windows 7 -käyttöjärjestelmissä

Tuoteavaimen tarkasteleminen Windows 10-, Windows 8- ja Windows 7 -käyttöjärjestelmissä



Jos kadotit tai unohdit Windows-tuoteavaimesi, minulla on ratkaisu sinulle. Tänään näemme, kuinka yksinkertaisella VBS-komentosarjalla voidaan näyttää Windows 10-, Windows 8- tai Windows 7 -asennetun kopion tuoteavain. Se on yksinkertainen ratkaisu purkaa tuoteavain tietokoneellesi asennetusta käyttöjärjestelmästä ilman minkä tahansa kolmannen osapuolen ohjelmiston käyttäminen. Nyt sitä mennään.

Mainonta


Itse asiassa aiemmin lähetin vastaava ratkaisu joka käytti PowerShelliä. mutta monet käyttäjät valittivat, että se epäonnistuu heille. PowerShell saattaa tarvita ylimääräisiä käyttäjätaitoja ja ylimääräisiä säätöjä allekirjoittamattomien cmdlet-komentojen suorittamiseen.

kuinka vaihtaa salasana iPhonessa

PowerShelliin verrattuna tämä VBScript-ratkaisu on melkein täydellinen. Sinun tarvitsee vain napsauttaa tiedostoa. Vastaanottaja tarkastella Windows 10 -tuoteavainta



  1. Avaa Muistio.
  2. Kopioi ja liitä seuraava teksti Muistio-ikkunaan
    Vaihtoehto Explicit Dim -objektiivi, polku, DigitalID, tulosjoukko objshell = CreateObject ('WScript.Shell') 'Aseta rekisteriavaimen polku Polku =' HKLM  SOFTWARE  Microsoft  Windows NT  CurrentVersion  '' Rekisteriavaimen arvo DigitalID = objshell.RegRead (Path & 'DigitalProductId') Himmennä ProductName, ProductID, ProductKey, ProductData 'Get ProductName, ProductID, ProductKey ProductName =' Tuotteen nimi: '& objshell.RegRead (Polku ja' Tuotteen nimi ') ProductID =' Tuotteen tunnus: '& objshell. RegRead (polku & 'ProductID') ProductKey = 'Asennettu avain:' & ConvertToKey (DigitalID) ProductData = ProductName & vbNewLine & ProductID & vbNewLine & ProductKey 'Näytä viestiruutu, jos tiedosto tallennetaan, jos vbYes = MsgBox (ProductData & vblf & vblf & Tallennetaanko tiedostoon?, VbYesNo + vbQuestion, 'BackUp Windows Key Information') ja tallenna sitten ProductData End If 'Muunna binaari merkeiksi Toiminto ConvertToKey (Key) Const KeyOffset = 52 Dim isWin8, Maps, i, j, Current, KeyOutput , Viimeinen, keypart1, lisää 'Tarkista onko käyttöjärjestelmä Windows 8 isWin8 = (Key (66)  6) And 1 Key (66) = (Avain (66) ja & HF7) tai ((isWin8 ja 2) * 4) i = 24 Maps = 'BCDFGHJKMPQRTVWXY2346789' Do Current = 0 j = 14 Do Current = Current * 256 Current = Key (j + KeyOffset) + Current Näppäin (j + KeyOffset) = (Current  24) Current = Nykyinen Mod 24 j = j -1 Silmukka kun j> = 0 i = i -1 KeyOutput = Keski (Kartat, Current + 1, 1) & KeyOutput Last = Nykyinen silmukka Kun i> = 0 Jos (isWin8 = 1) Sitten avainosa1 = Keski (Avainlähtö, 2, Viimeinen) insert = 'N' KeyOutput = Korvaa (KeyOutput, avainosa1, avainosa1 ja lisäys, 2, 1, 0) Jos Viimeinen = 0 Sitten KeyOutput = lisää & KeyOutput End Jos ConvertToKey = Mid (KeyOutput, 1, 5) & '-' & Mid (KeyOutput, 6, 5) & '-' & Mid (KeyOutput, 11, 5) & '-' & Mid ( KeyOutput, 16, 5) & '-' & Mid (KeyOutput, 21, 5) End Function 'Tallenna tiedot tiedostoon Toiminto Tallenna (Data) Dim fso, fName, txt, objshell, UserName Set objshell = CreateObject (' wscript. shell ')' Hae nykyinen käyttäjänimi UserName = objshell.ExpandEnvironmentStrings ('% UserName%') '' Luo tekstitiedosto työpöydälle fName = 'C:  Users ' & UserName & ' Desktop  WindowsKeyI nfo.txt 'Aseta fso = CreateObject (' Scripting.FileSystemObject ') Aseta txt = fso.CreateTextFile (fName) txt.Writeline Data txt.Sulje lopputoiminto
  3. Tallenna yllä oleva teksti tiedostoon, jonka laajennus '.vbs' on työpöydällä.
    Bonusvinkki: Varmista, että tallennat tiedoston oikein .vbs-laajennuksella, kirjoittamalla sen nimen kaksoislainausmerkkeihin, esimerkiksi 'BackupWindowsKey.vbs'.
    varmuuskopiointi Windows-tuoteavain Windows 10
  4. Avaa nyt BackupWindowsKey.vbs-tiedosto
  5. Voila, tuotetunnus näkyy näytöllä!
    Näytä Windows 10 -tuoteavain

Napsauta tätä ladataksesi BackupWindowsKey.vbs-tiedoston

Testasin tämän temppun Windows 7: ssä, Windows 8: ssa ja Windows 10: ssä. Se toimii moitteettomasti kaikissa mainituissa käyttöjärjestelmissä. Laajuus: epäjohdonmukaisuus @ MDL .

Mielenkiintoisia Artikkeleita

Toimituksen Valinta

Yhteystiedon tai henkilön lisääminen ryhmään WhatsAppissa
Yhteystiedon tai henkilön lisääminen ryhmään WhatsAppissa
https://www.youtube.com/watch?v=JAQ18BnKlqM WhatsApp-ryhmät ovat hieno tapa pysyä ajan tasalla uutisista, oppia tulevista tapahtumista ja ne voivat jopa auttaa sinua järjestymään paremmin. Sinulla voi olla työhön liittyvä WhatsApp
Muistio on jälleen menossa Microsoft Storeen
Muistio on jälleen menossa Microsoft Storeen
Jos muistat, Microsoft oli ensin lisännyt Muistion kauppaan ja tehnyt siitä valinnaisen ominaisuuden Windows 10: ssä, mutta myöhemmin ilmoitti, että muutosta ei työnnetä kuluttajille, jolloin Muistio jäi niputettuna normaaliksi Win32-sovellukseksi käyttöjärjestelmässä . Tämä on kuitenkin muuttunut jälleen. Mainos Molempien Paintin lisäksi
Kuinka tarkistaa PayPal-saldosi
Kuinka tarkistaa PayPal-saldosi
PayPal on maksupalvelu, joka on ollut käytössä yli kahden vuosikymmenen ajan. Rahansiirto - maksun suorittaminen tai hyväksyminen, rahan lähettäminen lahjaksi tai lahjoittaminen hyväntekeväisyyteen - ovat PayPalin leipää ja voita, mutta ne myös
Winaero Charms Bar Killer
Winaero Charms Bar Killer
Erityisesti kosketuslevyn käyttäjille: jos sovellus 'ei toimi' sinulle, lue tämä artikkeli: Kuinka poistaa Metro-reuna-pyyhkäisyt ja kosketuspalkin eleet ohjauslevyille (kosketuslevyille) Windows 8.1: ssä ja Windows 8: ssa, vaikka olet äskettäin vaihtanut Windowsiin 8.1, olet todennäköisesti huomannut uusia ominaisuuksia, joiden avulla voit poistaa topin käytöstä
Poista käytöstä tai ota käyttöön Google Chrome -profiilipainike ikkunan otsikossa
Poista käytöstä tai ota käyttöön Google Chrome -profiilipainike ikkunan otsikossa
Katso, miten käyttäjätunnusprofiili poistetaan käytöstä tai otetaan käyttöön Google Chromen ikkunan otsikossa.
7 korjausta, kun Google Drive pakkaa, mutta ei lataa
7 korjausta, kun Google Drive pakkaa, mutta ei lataa
Google Drive on epäilemättä yksi tämän hetken suosituimmista pilvitallennuspalveluista. Vaikuttavan 15 Gt:n ilmaisen tallennustilan ansiosta, jota voidaan lisätä edulliseen hintaan, se on täydellinen esityksiin, laskentataulukoihin, artikkeleihin ja muihin
Kuinka muuttaa WiFi Echo Show -sovelluksessa
Kuinka muuttaa WiFi Echo Show -sovelluksessa
Kun asennat Amazon Echo -laitteen ensimmäisen kerran, sinun on muodostettava yhteys käytettävissä olevaan verkkoon, joka opastaa sinut koko prosessin läpi. Koska useimmilla näistä laitteista ei ole näyttöä, sinä