Hallo!
Eventluell kann mir jemand helfen...
Ich will in meinem VB Programm (Dienst als \LocalSystem)
eine WMI Abfrage realisieren welche mir das installierte Antivirus-Produkt liefert.
Die WMI Partie ist soweit kein Problem, selbiges hab ich in VB6 schon einmals realisiert ich setzte auf den Namespace "root\SecurityCenter" diesen select ab:
"select * from AntiVirusProduct".
Die eigenheit die ich mir nicht erklären kann ist, dass ich hierbei über .net(2.0) kein ergebnis bekomme, jedoch über das vbs script schon.... Auch die ehemalige VB6 Anwendung läuft einwandfrei...
Das VBS Script:
Mein System: W7 mit aktiver UAC (jedoch läuft die App. als LocalLSystem und das studio als Admin)
PS: Select ergiebt auch kein ergebnis bei ..\SecurityCenter2 welches ab Vista eingeführt wurde...
Eventluell kann mir jemand helfen...
Ich will in meinem VB Programm (Dienst als \LocalSystem)
eine WMI Abfrage realisieren welche mir das installierte Antivirus-Produkt liefert.
Die WMI Partie ist soweit kein Problem, selbiges hab ich in VB6 schon einmals realisiert ich setzte auf den Namespace "root\SecurityCenter" diesen select ab:
"select * from AntiVirusProduct".
Die eigenheit die ich mir nicht erklären kann ist, dass ich hierbei über .net(2.0) kein ergebnis bekomme, jedoch über das vbs script schon.... Auch die ehemalige VB6 Anwendung läuft einwandfrei...
Das VBS Script:
Code:
strComputer = "." Set oWMI = GetObject( _ "winmgmts:{impersonationLevel=impersonate}!\\" & strComputer & "\root\SecurityCenter") Set colItems = oWMI.ExecQuery("Select * from AntiVirusProduct") For Each objItem in colItems With objItem WScript.Echo .companyName WScript.Echo .displayName WScript.Echo .instanceGuid WScript.Echo .onAccessScanningEnabled WScript.Echo .pathToSignedProductExe WScript.Echo .productHasNotifiedUser WScript.Echo .productState WScript.Echo .productUptoDate WScript.Echo .productWantsWscNotifications WScript.Echo .versionNumber End With Next
PS: Select ergiebt auch kein ergebnis bei ..\SecurityCenter2 welches ab Vista eingeführt wurde...