Есть, допустим такая программа:
 
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
 
... есть ведь еще куча параметров!
Ответить
        |