Имя пользователя:
Пароль:
 

Показать сообщение отдельно

Аватара для madmasles

Ветеран


Сообщения: 812
Благодарности: 353

Профиль | Отправить PM | Цитировать


saavaage,
Так у меня на Windows XP SP3 определяет антивирус:
Код: Выделить весь код
$Output = ""

$objWMIService = ObjGet("winmgmts:\\localhost\root\SecurityCenter")
$colItems = $objWMIService.ExecQuery("SELECT * FROM AntiVirusProduct", "WQL", 48)

If IsObj($colItems) Then
    For $objItem In $colItems
        $Output &= "CompanyName: " & $objItem.CompanyName & @CRLF
        $Output &= "DisplayName: " & $objItem.DisplayName & @CRLF
        $Output &= "VersionNumber: " & $objItem.VersionNumber & @CRLF
        $Output &= "productUpToDate: " & $objItem.productUpToDate & @CRLF
        MsgBox(0, "WMI Output", $Output)
        $Output = ""
    Next
Else
    MsgBox(0, "WMI Output", "No WMI Objects Found for class: AntiVirusProduct")
EndIf
А так - файервол:
Код: Выделить весь код
$Output = ""

$objWMIService = ObjGet("winmgmts:\\localhost\root\SecurityCenter")
$colItems = $objWMIService.ExecQuery("SELECT * FROM FireWallProduct", "WQL", 48)

If IsObj($colItems) Then
    For $objItem In $colItems
        $Output &= "CompanyName: " & $objItem.CompanyName & @CRLF
        $Output &= "DisplayName: " & $objItem.DisplayName & @CRLF
        $Output &= "VersionNumber: " & $objItem.VersionNumber & @CRLF
        MsgBox(0, "WMI Output", $Output)
        $Output = ""
    Next
Else
    MsgBox(0, "WMI Output", "No WMI Objects Found for class: FireWallProduct")
EndIf
Источник: WMI - как узнать какой антивирус на компе/
У меня ESET Smart Security 3.0, с другими не пробовал.
Это сообщение посчитали полезным следующие участники:

Отправлено: 18:07, 05-10-2010 | #11