Hallo
wie es oben steht , nur leider geht es nicht mit
bekomme immer wieder "Nicht unterstüzt " als Fehler
MfG
Haufe
wie es oben steht , nur leider geht es nicht mit
VB.NET-Quellcode
- Try
- Dim searcher As New ManagementObjectSearcher("root\WMI", "SELECT * FROM MSAcpi_ThermalZoneTemperature")
- For Each queryObj As ManagementObject In searcher.Get()
- Dim temp As Double = CDbl(queryObj("CurrentTemperature"))
- temp = (temp - 2732) / 10.0
- MessageBox.Show(temp.ToString)
- Next
- Catch err As ManagementException
- MessageBox.Show(err.Message)
- End Try
bekomme immer wieder "Nicht unterstüzt " als Fehler
MfG
Haufe
ähh? wasn das