ReconX Posted April 28, 2014 Posted April 28, 2014 I am trying to detect which edition is on the computer and display it in a label. I have the Windows Version and Architecture already. $hOsVersion = GUICtrlCreateLabel("Version: " & $OSVersion & " - " & $OSArch, 5, 5, 300, 20, $SS_CENTER) What I would like to display is..... $hOsVersion = GUICtrlCreateLabel("Version: " & $OSVersion & " " & $OSEdition & " - " & $OSArch, 5, 5, 300, 20, $SS_CENTER) Thanks for any help.
Unc3nZureD Posted April 28, 2014 Posted April 28, 2014 Credits: Xenobiologist ( a little modified ) MsgBox(0,0, _getOSVersion()) Func _getOSVersion() Local $objWMIService = ObjGet("winmgmts:{impersonationLevel=impersonate}!\\.\root\cimv2") Local $colSettings = $objWMIService.ExecQuery("Select * from Win32_OperatingSystem") For $objOperatingSystem In $colSettings Return $objOperatingSystem.Caption Next EndFunc Leendert-Jan 1
jguinch Posted April 28, 2014 Posted April 28, 2014 Maybe in the registry in HKLMSOFTWAREMicrosoftWindows NTCurrentVersion ? ReconX 1 Spoiler Network configuration UDF, _DirGetSizeByExtension, _UninstallList Firefox ConfigurationArray multi-dimensions, Printer Management UDF
Solution ReconX Posted April 29, 2014 Author Solution Posted April 29, 2014 Thanks for the help guys. I was able to display it using this code: Local $OSEdition = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion", "EditionID") It was easier than I was making it. LOL. xD
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now