WMI - Temperatury, Napięcie, Wiatraki

[janek2012]

Witam, skorzystałem z porady WMI na Cyfrowy Baron (ta ostatnia), dot. zczytywania informacji z WMI. Wszystko działa pieknie, oprócz kilku rzeczy - najgorsze jest to, że właśnie tych potrzebuję, mianowicie: Win32_VoltageProbe, Win32_Fan, Win32_TemperatureProbe nie zwracają dosłownie niczego. Chciałbym wykorzystać aktualne informacjie o napięciach CPU i GPU oraz temperaturach CPU, poszczególnych rdzeni oraz płyty głównej. Wiem, że jest od tego multum programów, ale chcę mieć taki własny, prywatny, który rysowałby wykres temperatur z timeline'm, żeby móc sprawdzić jak kształtowały się temperatury/napiecia/obciązenie.

Dodam jeszcze, że program: http://www.magsys.co.uk/download/software/magwmi52.zip, który rzekomo też powinien zwracać temperatury, nie robi nic...
Używam Windows 7 x64 Ultimate.
Mozliwe, że to własnie przez to, że system jest 64-bitowy są takie jaja, pewnie trzeba dodać jakaś linijkę na początku kodu, tylko jaką?

Swojego kodu nie podaję, bo jest to praktycznie to samo co w poradzie (patrz początek posta) - ale zamiast zczytywania Win32_BIOS próbuję czytać np. Win32_TemperatureProbe

EDIT: Sprawdziłem na drugim komputerze z Windows 7 x86 na pokładzie i również nie działa.

[polymorphism]

Mozliwe, że to własnie przez to, że system jest 64-bitowy są takie jaja

Raczej nie. U mnie, na WinXP x32, według tego programu, który podałeś, wszystkie trzy parametry nie działają, pomimo że sensory istnieją.

[Cyfrowy Baron]

Tutaj coś na ten temat: http://msdn.microsoft.com/en-us/library/aa394493%28VS.85%29.aspx

[janek2012]

Tutaj coś na ten temat: http://msdn.microsoft.com/en-us/library/aa394493%28VS.85%29.aspx

Czytałem już ten artykuł wczesniej. Nadmienię, że kopiując kod z przykładu na dole strony do pliku vbs, otrzymuję komunikat No temperature probe data, czyli coś chyba jest nie tak

[Cyfrowy Baron]

Z informacji jakie znalazłem w sieci, wyłania się nieciekawy obraz, jeżeli chodzi o WMI gdyż problem poległa głównie na tym, że producent sprzętu musi stworzyć do niego klasę WMI i dołączyć ją w postaci sterownika, jeżeli tego nie zrobi, to WMI nie będzie tego sprzętu rozpoznawać.

Przykładowy skrypt VBS podający informacje o procesorze:

► 

---

On Error Resume Next strComputer = "." Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2") Set colItems = objWMIService.ExecQuery("Select * from Win32_Processor",,48) For Each objItem in colItems Wscript.Echo "AddressWidth: " & objItem.AddressWidth Wscript.Echo "Architecture: " & objItem.Architecture Wscript.Echo "Availability: " & objItem.Availability Wscript.Echo "Caption: " & objItem.Caption Wscript.Echo "ConfigManagerErrorCode: " & objItem.ConfigManagerErrorCode Wscript.Echo "ConfigManagerUserConfig: " & objItem.ConfigManagerUserConfig Wscript.Echo "CpuStatus: " & objItem.CpuStatus Wscript.Echo "CreationClassName: " & objItem.CreationClassName Wscript.Echo "CurrentClockSpeed: " & objItem.CurrentClockSpeed Wscript.Echo "CurrentVoltage: " & objItem.CurrentVoltage Wscript.Echo "DataWidth: " & objItem.DataWidth Wscript.Echo "Description: " & objItem.Description Wscript.Echo "DeviceID: " & objItem.DeviceID Wscript.Echo "ErrorCleared: " & objItem.ErrorCleared Wscript.Echo "ErrorDescription: " & objItem.ErrorDescription Wscript.Echo "ExtClock: " & objItem.ExtClock Wscript.Echo "Family: " & objItem.Family Wscript.Echo "InstallDate: " & objItem.InstallDate Wscript.Echo "L2CacheSize: " & objItem.L2CacheSize Wscript.Echo "L2CacheSpeed: " & objItem.L2CacheSpeed Wscript.Echo "LastErrorCode: " & objItem.LastErrorCode Wscript.Echo "Level: " & objItem.Level Wscript.Echo "LoadPercentage: " & objItem.LoadPercentage Wscript.Echo "Manufacturer: " & objItem.Manufacturer Wscript.Echo "MaxClockSpeed: " & objItem.MaxClockSpeed Wscript.Echo "Name: " & objItem.Name Wscript.Echo "OtherFamilyDescription: " & objItem.OtherFamilyDescription Wscript.Echo "PNPDeviceID: " & objItem.PNPDeviceID Wscript.Echo "PowerManagementCapabilities: " & objItem.PowerManagementCapabilities Wscript.Echo "PowerManagementSupported: " & objItem.PowerManagementSupported Wscript.Echo "ProcessorId: " & objItem.ProcessorId Wscript.Echo "ProcessorType: " & objItem.ProcessorType Wscript.Echo "Revision: " & objItem.Revision Wscript.Echo "Role: " & objItem.Role Wscript.Echo "SocketDesignation: " & objItem.SocketDesignation Wscript.Echo "Status: " & objItem.Status Wscript.Echo "StatusInfo: " & objItem.StatusInfo Wscript.Echo "Stepping: " & objItem.Stepping Wscript.Echo "SystemCreationClassName: " & objItem.SystemCreationClassName Wscript.Echo "SystemName: " & objItem.SystemName Wscript.Echo "UniqueId: " & objItem.UniqueId Wscript.Echo "UpgradeMethod: " & objItem.UpgradeMethod Wscript.Echo "Version: " & objItem.Version Wscript.Echo "VoltageCaps: " & objItem.VoltageCaps Next

---

Działa poprawnie, podając większość informacji o procesorze.

Skrypt skonstruowany identycznie, lecz mający podawać informacje o temperaturze:

► 

---

On Error Resume Next strComputer = "." Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2") Set colItems = objWMIService.ExecQuery("Select * from Win32_TemperatureProbe",,48) For Each objItem in colItems Wscript.Echo "Accuracy: " & objItem.Accuracy Wscript.Echo "Availability: " & objItem.Availability Wscript.Echo "Caption: " & objItem.Caption Wscript.Echo "ConfigManagerErrorCode: " & objItem.ConfigManagerErrorCode Wscript.Echo "ConfigManagerUserConfig: " & objItem.ConfigManagerUserConfig Wscript.Echo "CreationClassName: " & objItem.CreationClassName Wscript.Echo "CurrentReading: " & objItem.CurrentReading Wscript.Echo "Description: " & objItem.Description Wscript.Echo "DeviceID: " & objItem.DeviceID Wscript.Echo "ErrorCleared: " & objItem.ErrorCleared Wscript.Echo "ErrorDescription: " & objItem.ErrorDescription Wscript.Echo "InstallDate: " & objItem.InstallDate Wscript.Echo "IsLinear: " & objItem.IsLinear Wscript.Echo "LastErrorCode: " & objItem.LastErrorCode Wscript.Echo "LowerThresholdCritical: " & objItem.LowerThresholdCritical Wscript.Echo "LowerThresholdFatal: " & objItem.LowerThresholdFatal Wscript.Echo "LowerThresholdNonCritical: " & objItem.LowerThresholdNonCritical Wscript.Echo "MaxReadable: " & objItem.MaxReadable Wscript.Echo "MinReadable: " & objItem.MinReadable Wscript.Echo "Name: " & objItem.Name Wscript.Echo "NominalReading: " & objItem.NominalReading Wscript.Echo "NormalMax: " & objItem.NormalMax Wscript.Echo "NormalMin: " & objItem.NormalMin Wscript.Echo "PNPDeviceID: " & objItem.PNPDeviceID Wscript.Echo "PowerManagementCapabilities: " & objItem.PowerManagementCapabilities Wscript.Echo "PowerManagementSupported: " & objItem.PowerManagementSupported Wscript.Echo "Resolution: " & objItem.Resolution Wscript.Echo "Status: " & objItem.Status Wscript.Echo "StatusInfo: " & objItem.StatusInfo Wscript.Echo "SystemCreationClassName: " & objItem.SystemCreationClassName Wscript.Echo "SystemName: " & objItem.SystemName Wscript.Echo "Tolerance: " & objItem.Tolerance Wscript.Echo "UpperThresholdCritical: " & objItem.UpperThresholdCritical Wscript.Echo "UpperThresholdFatal: " & objItem.UpperThresholdFatal Wscript.Echo "UpperThresholdNonCritical: " & objItem.UpperThresholdNonCritical Next

---

U mnie nie podaje żadnych informacji.

[janek2012]

A może użyć SMBus'a? Tylko nie wiem w jaki sposób

A może istnieją jakieś darmowe biblioteki lub SDK?
Wiem, że CPUID ma swoje SDK, ale kosztuje ono nieco ponad 1000 Euro...

[Cyfrowy Baron]

To nie może być aż takie trudne, przypuszczam, że można to zadanie zrealizować, przy pomocy standardowych bibliotek środowiska c++builder. Ten temat jest mi jednak zupełnie obcy.

[janek2012]

Znalazłem fajne biblioteki: http://www.alcpu.com/CoreTemp/developers.html, jednak nie czytają one temperatury CPU (tylko rdzenia, a różnica jest) - szkoda, bo chciałem sprawdzić zależność temp. CPU od Core na wykresie

Edit: Autor aplikacji powiedział, że czyta temperatury poprzez DTS procesora (cokolwiek to znaczy)