Saber que antivirus esta instalado?

[demoniox12]

Hola! me preguntaba si alguno sabe de que manera se puede saber que antivirus esta instalado.. esta en alguna ruta del registro?? cual es?? o en donde??

salu2!
desde ya muchas gracias!

[seba123neo]

Hola, con WMI algo asi...

Código (vb) [Seleccionar] Expandir

Private Sub Form_Load()
Set oWMI = GetObject("winmgmts:{impersonationLevel=impersonate}!\\.\root\SecurityCenter")
Set colItems = oWMI.ExecQuery("Select * from AntiVirusProduct")
For Each objAntiVirusProduct In colItems
msg = msg & "companyName: " & objAntiVirusProduct.CompanyName & vbCrLf
msg = msg & "displayName: " & objAntiVirusProduct.DisplayName & vbCrLf
msg = msg & "instanceGuid: " & objAntiVirusProduct.instanceGuid & vbCrLf
msg = msg & "onAccessScanningEnabled: " & objAntiVirusProduct.onAccessScanningEnabled & vbCrLf
msg = msg & "productUptoDate: " & objAntiVirusProduct.productUptoDate & vbCrLf
msg = msg & "versionNumber: " & objAntiVirusProduct.versionNumber & vbCrLf
msg = msg & vbCrLf
Next
MsgBox msg
End Sub

saludos.

[cobein]

Alguien sabe como hacer esto sin WMI?

[ssccaann43 ©]

Mira que no sabia como se hacia. Gracias seba. Saludos

[demoniox12]

muchisimas gracias seba123neo!

[el_mago999]

Creo que no funciona con ese codigo, me sale    error de automatizacion y al depurar me lleva a la siguiente linea: 
Set oWMI = GetObject("winmgmts:{impersonationLevel=impersonate}!\\.\root\SecurityCenter")
y cuando  uso el wmi con otros codigos como para probar uso de la cpu y  si fuciona el wmi

[Novlucker]

A mi si me funciona correctamente  .. que SO tienes?

Saludos

[Hans el Topo]

no se si entendí pero no se podría hacer:
[manera chapucera] mirando los procesos buscando antivirus concretos?[/manera chapucera]

[Karcrack]

Creo que no funciona con ese codigo, me sale    error de automatizacion y al depurar me lleva a la siguiente linea: 
Set oWMI = GetObject("winmgmts:{impersonationLevel=impersonate}!\\.\root\SecurityCenter")
y cuando  uso el wmi con otros codigos como para probar uso de la cpu y  si fuciona el wmi

A mi no me funciona tampoco, tengo un Windows XP SP3... Y mi antivirus es el NOD32 v3

[skapunky]

Porque no buscan directamente el ejecutable de cada antivirus con fileexists?

Por ejemplo en pseudocodigo:

Si existe(c:\archivosdeprograma\nod32.exe) hacer

:::: Aquí lo que se tenga de hacer ::::::

Fin_si

La ruta me la he inventao a modo de ejmplo.