Есть, допустим такая программа:
function Avaible (name) 'пингом проверяет доступность компьютера name в сети
on error resume next
Set objPing = GetObject("winmgmts:{impersonationLevel=impersonate}")._
ExecQuery("select * from Win32_PingStatus where address = '"_
& name & "'")
For Each objStatus in objPing
If IsNull(objStatus.StatusCode) or objStatus.StatusCode<>0 Then
Avaible=false
else
Avaible=true
End If
Next
End Function
Подскажите, для чего служат и как работают команды:
1) GetObject
2) winmgmts:{impersonationLevel=impersonate}
3) ExecQuery
4) select * from Win32_
И, где мне прочитать (желательно на русском языке), какие бывают параметры и для чего у этих команд???
Например:
select * from Win32_PingStatus
select * from Win32_OperatingSystem
select * from Win32_ComputerSystem
... есть ведь еще куча параметров!
Ответить
|