нужна инфа по информерам (температура проца)

Язык Visual Basic на платформе .NET.

Модераторы: Ramzes, Sebas

Invader
Бывалый
Бывалый
Аватара пользователя
 
Сообщения: 285
Зарегистрирован: 18.01.2005 (Вт) 4:22
Откуда: Молдавия, Виноград

нужна инфа по информерам (температура проца)

Сообщение Invader » 16.02.2012 (Чт) 20:32

код выдран из просторов интернета, я его воткнул в цикл
Код: Выделить всё
  Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        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 / 10) - 272.15)
                Label1.Text = temp.ToString 'тут вроде как то подозрительно - 70 градуссов
            Next
        Catch ex As ManagementException
            MessageBox.Show(ex.Message)
        End Try

    End Sub


вот в чем вопрос, я думал что всунув в таймер, я буду получать изменения показаний температуры, но как то долго висит статическое значение.

также использовал ещё один код
Код: Выделить всё
  Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim freespase, freegb As Decimal
Dim myMOC As ManagementObjectCollection = (New ManagementObjectSearcher(New SelectQuery("SELECT FreeSpace FROM Win32_LogicalDisk WHERE deviceID = 'C:'"))).Get()
        Dim myMO As ManagementObject
        For Each myMO In myMOC
            freespase = myMO.Properties("FreeSpace").Value
            freegb = Decimal.Round((freespase / 1073741824), 1)
            Label2.Text = "Диск C: " & freegb.ToString() & " ГБайт свободно."
        Next

    End Sub

Хотелось бы побольше узнать о форме записи путей в ManagementObjectSearcher, что ещё можно узнать о компьютере: загрузка процессора, памяти, сети; температура HDD...?
из-за плохого понимания формы записи,
"SELECT FreeSpace FROM Win32_LogicalDisk WHERE deviceID = 'C:'" и
"root\WMI", "SELECT * FROM MSAcpi_ThermalZoneTemperature"
не могу правильно сформировать вопрос для поиска в интернете, просветите!!!
умён и жаден,
характер отсуствует

Invader
Бывалый
Бывалый
Аватара пользователя
 
Сообщения: 285
Зарегистрирован: 18.01.2005 (Вт) 4:22
Откуда: Молдавия, Виноград

Re: нужна инфа по информерам (температура проца)

Сообщение Invader » 16.02.2012 (Чт) 21:06

умён и жаден,
характер отсуствует

Invader
Бывалый
Бывалый
Аватара пользователя
 
Сообщения: 285
Зарегистрирован: 18.01.2005 (Вт) 4:22
Откуда: Молдавия, Виноград

Re: нужна инфа по информерам (температура проца)

Сообщение Invader » 17.02.2012 (Пт) 0:42

Invader писал(а):вот в чем вопрос, я думал что всунув в таймер, я буду получать изменения показаний температуры, но как то долго висит статическое значение.


а вот этот вопрос не решил :oops:
какая то сплошная статика, температура процессора стабильна в течение часа.
умён и жаден,
характер отсуствует

FireFenix
Продвинутый гуру
Продвинутый гуру
Аватара пользователя
 
Сообщения: 1640
Зарегистрирован: 25.05.2007 (Пт) 10:24
Откуда: Mugen no Sora

Re: нужна инфа по информерам (температура проца)

Сообщение FireFenix » 17.02.2012 (Пт) 5:46

Invader писал(а): какая то сплошная статика, температура процессора стабильна в течение часа.

Наверное потому что вручную её нужно обновлять?
Птицей Гермеса меня называют, свои крылья пожирая... сам себя я укрощаю
私はヘルメスの鳥 私は自らの羽根を喰らい 飼い慣らされる

Invader
Бывалый
Бывалый
Аватара пользователя
 
Сообщения: 285
Зарегистрирован: 18.01.2005 (Вт) 4:22
Откуда: Молдавия, Виноград

Re: нужна инфа по информерам (температура проца)

Сообщение Invader » 17.02.2012 (Пт) 15:35

FireFenix писал(а):
Invader писал(а): какая то сплошная статика, температура процессора стабильна в течение часа.

Наверное потому что вручную её нужно обновлять?

в смысле в ручную, я код располагал и в нажатии кнопки - тот же эффект,
а еверест показывает постоянно динамику + - 1 градус.
умён и жаден,
характер отсуствует

Invader
Бывалый
Бывалый
Аватара пользователя
 
Сообщения: 285
Зарегистрирован: 18.01.2005 (Вт) 4:22
Откуда: Молдавия, Виноград

Re: нужна инфа по информерам (температура проца)

Сообщение Invader » 17.02.2012 (Пт) 16:23

и вот с мониторингом сети не разобрался, есть ли возможность средствами WMI проследить скажем скорость upload, download, ip...?
умён и жаден,
характер отсуствует


Вернуться в Visual Basic .NET

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 9

    TopList