How to get Windows 7 key ?

Hi My windows 7 C drive is almost full and running slow. I want to reinstall it. The windows key and installation disk disappear for long time. Any expert can give me suggestion how to get the key and the installation disk ? Thank you
Who is Participating?
I wear a lot of hats...

"The solutions and answers provided on Experts Exchange have been extremely helpful to me over the last few years. I wear a lot of hats - Developer, Database Administrator, Help Desk, etc., so I know a lot of things but not a lot about one thing. Experts Exchange gives me answers from people who do know a lot about one thing, in a easy to use platform." -Todd S.

JohnBusiness Consultant (Owner)Commented:
If you have the receipt for the purchase, you may be able to get recovery DVD's from the vendor. This will be OEM and you need the vendor's installation media.

With a purchase receipt, you might call Microsoft Store and see if they can give you a replacement OEM key. I am not sure if they will, but you can try.

Otherwise you need to purchase a retail Windows 7 package from Software King or like retail vendor.
You should be able to download the ISO for Windows 7 here,

I've used this tool for years to extract keys from Windows systems,
jorge diazSECommented:
i've used nirsoft's product key finder"

it works just fine in Windows.  As stated my tailoreddigital you can create an iso from
Cloud Class® Course: SQL Server Core 2016

This course will introduce you to SQL Server Core 2016, as well as teach you about SSMS, data tools, installation, server configuration, using Management Studio, and writing and executing queries.

You can found your CD Key with this Vbscript , just copy and paste this code on your notepad and save it as WindowsCDKey.vbs and execute by double clic
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)
' <--- Create an array to hold the valid characters for a microsoft Product Key --->
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")

' <--- The clever bit !!! (Decrypt the base24 encoded binary data) --->
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
  strProductKey = arrChars(k) & strProductKey
  ' <--- add the "-" between the groups of 5 Char --->
  If i Mod 5 = 0 And i <> 0 Then strProductKey = "-" & strProductKey
strFinalKey = strProductKey

' <--- This part of the script displays operating system Information and the license Key --->
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

Set wshShell=CreateObject("")
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
LogFile = "c:\WindowsCDkey.txt"
Set fso = CreateObject("Scripting.FileSystemObject")
if fso.FileExists(LogFile) Then 
	fso.DeleteFile LogFile
end If
Call WriteLog(strPopupMsg,LogFile)
WshShell.Run LogFile
Sub WriteLog(strText,LogFile)
	Dim fs,ts 
	Const ForAppending = 8
	Set fs = CreateObject("Scripting.FileSystemObject")
	Set ts = fs.OpenTextFile(LogFile,ForAppending,True)
	ts.WriteLine strText
End Sub

Open in new window

Thomas GrassiSystems AdministratorCommented:
You can use this free download software that will list your computers software hardware and product keys

first - you should tell us if this an OEM version or not
so post the pc model, and windows 7 version that is installed
i suppose that it came with this version (was not upgraded from vista)

as example, i take a Dell or HP PC (= OEM)
these have a restore partition on the disk, so you could :
-image the disk partitions to the new drive
-run the restore from there
-expand the partitions if needed
Most PC's that were bought with Windows 7 installed on them, include a recovery partition from which you can do a factory restore. Just go to the PC manufacturer's internet site under the support section and look for instructions on how the factory restore is done for that particular PC model. You won't require a key for that, as it is already activated.

Besides that, the manufacturer's also include a utility with which you can make factory restore DVD's. That should normally have been done by you when you got the PC. If you didn't make those DVD's I suggest you do that before doing the factory restore. Those DVD's are useful to restore your system should the HD die. Sometimes, after a factory restore, creating those DVD's might not work anymore, that's the reason I suggest you do that first.

Experts Exchange Solution brought to you by

Your issues matter to us.

Facing a tech roadblock? Get the help and guidance you need from experienced professionals who care. Ask your question anytime, anywhere, with no hassle.

Start your 7-day free trial
eemoonAuthor Commented:
It's more than this solution.Get answers and train to solve all your tech problems - anytime, anywhere.Try it for free Edge Out The Competitionfor your dream job with proven skills and certifications.Get started today Stand Outas the employee with proven skills.Start learning today for free Move Your Career Forwardwith certification training in the latest technologies.Start your trial today
Windows 7

From novice to tech pro — start learning today.

Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.