Is the code several posts up for the above GUI?
I had my own
Code:
FileDelete, % A_Desktop "\Computer Specs.txt"
RegRead, ServicePack, HKEY_LOCAL_MACHINE, SOFTWARE\Microsoft\Windows NT\CurrentVersion, CSDVersion
spaceCount=
Loop
{
RegRead Speed%A_Index%, HKEY_LOCAL_MACHINE, % "HARDWARE\DESCRIPTION\System\CentralProcessor\" . (A_Index-1), ProcessorNameString
if Speed%A_Index% <>
Loop, Parse, Speed%A_Index%,
{
cpuName := A_LoopField
if cpuName is space
spaceCount++
Else
Break
}
StringTrimLeft, Speed%A_Index%, Speed%A_Index%, % spaceCount
speed .= "CPU " A_Index " " Speed%A_Index% . "`n"
Break
}
DriveGet, sysDrive, List, FIXED
Loop, Parse, sysDrive,,
Drives .= "Hard Drive " A_Index " is: " A_LoopField "`n"
ThisProcess := DllCall("GetCurrentProcess")
if !DllCall("IsWow64Process", "uint", ThisProcess, "int*", IsWow64Process)
IsWow64Process := false
osBit := IsWow64Process ? "win64" : "win32"
FileAppend, % "Operating System:`n" A_OSVersion " (" osBit ")`n`nCPU(s):`n" speed "`nHardDrive(s):`n" Drives "`n" ServicePack, % A_Desktop "\Computer Specs.txt"
Msgbox, % "Operating System:`n" A_OSVersion " (" osBit ")`n`nCPU(s):`n" speed "`nHardDrive(s):`n" Drives "`n" ServicePack
If not can you post the code? I just want to make sure 100% its the same reg keys for W7...