1/30/2024 0 Comments My honestech product keyHe also uses Proxmox to self-host a variety of services, including a Jellyfin Media Server, an Airsonic music server, a handful of game servers, NextCloud, and two Windows virtual machines. He has been running video game servers from home for more than 10 years using Windows, Ubuntu, or Raspberry Pi OS. Nick's love of tinkering with computers extends beyond work. In college, Nick made extensive use of Fortran while pursuing a physics degree. Before How-To Geek, he used Python and C++ as a freelance programmer. He has been using computers for 20 years - tinkering with everything from the UI to the Windows registry to device firmware. Nick Lewis is a staff writer for How-To Geek. It also lets you save it as a text file, so you can reference it later. When you double-click the VBS script, you'll get a small popup that displays your Windows product key. Set fso = CreateObject( "Scripting.FileSystemObject") UserName = objshell.ExpandEnvironmentStrings( "%UserName%")įName = "C:\Users\" & UserName & "\Desktop\WindowsKeyInfo.txt " Set objshell = CreateObject( "wscript.shell") If Last = 0 Then KeyOutput = insert & KeyOutputĬonvertToKey = Mid(KeyOutput, 1, 5) & "-" & Mid(KeyOutput, 6, 5) & "-" & Mid(KeyOutput, 11, 5) & "-" & Mid(KeyOutput, 16, 5) & "-" & Mid(KeyOutput, 21, 5) KeyOutput = Replace(KeyOutput, keypart1, keypart1 & insert, 2, 1, 0) KeyOutput = Mid(Maps,Current+ 1, 1) & KeyOutput If vbYes = MsgBox(ProductData & vblf & vblf & "Save to a file?", vbYesNo + vbQuestion, "BackUp Windows Key Information") thenĭim isWin8, Maps, i, j, Current, KeyOutput, Last, keypart1, insert ProductData = ProductName & vbNewLine & ProductID & vbNewLine & ProductKey ProductKey = "Installed Key: " & ConvertToKey(DigitalID) ProductID = "Product ID: " & objshell.RegRead(Path & "ProductID") ProductName = "Product Name: " & objshell.RegRead(Path & "ProductName") Path = "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\"ĭigitalID = objshell.RegRead(Path & "DigitalProductId")ĭim ProductName,ProductID,ProductKey,ProductData Set objshell = CreateObject( "WScript.Shell") You don't even need to know it -assuming you're installing the same edition of Windows the PC came with, it should automatically activate and work without you needing to enter a key. The key for the version of Windows the PC comes with is stored in the computer's UEFI firmware or BIOS.
0 Comments
Leave a Reply. |
AuthorWrite something about yourself. No need to be fancy, just an overview. ArchivesCategories |