Использование объекта System.Management - PullRequest
Новая
       27

Использование объекта System.Management

0 голосов
/ 13 февраля 2020

Я пишу эту подпрограмму: 

Public Function LipPCIsOn() As String
  '  Return TimeSpan.FromMilliseconds(System.Environment.TickCount).ToString()
  Dim query As New SelectQuery("SELECT LastBootUpTime FROM Win32_OperatingSystem WHERE Primary='true'")
  Dim searcher = New ManagementObjectSearcher(query)

  Dim ret As String = ""
  Dim mo As ManagementObject
  For Each mo In searcher.Get()
     Dim dtBootTime As DateTime = ManagementDateTimeConverter.ToDateTime(mo.Properties("LastBootUpTime").Value.ToString())
     ret = (Now - dtBootTime).ToString()
  Next

  Return ret
End Function

Но у меня есть эта ошибка: 

SelectQuery is not defined
ManagementObjectSearcher is not defined
ManagementObject is not defined

У меня установлены следующие импорты: 

Imports System
Imports System.Management
Imports System.Security
Imports System.IO
Imports System.IO.File
Imports System.IO.FileStream
Imports System.Windows.Forms

Есть что-нибудь еще нужно? Спасибо

...