[..] Firewall & antivirus

[mikell]

On en revient donc à : http://www.autoitscript.fr/forum/viewto ... 035#p51035

Oui et non...
Si l'antivirus est reconnu et affiché dans le Security Center de windows, ça veut dire qu'il est référencé quelque part dans windows en tant qu'antivirus
Mon script vérifie un des modes d'enregistrement, la classe WMI AntivirusProduct
Si ça ne marche pas, ça veut simplement dire qu'il faut chercher ailleurs, pas que c'est impossible
Peut-être la classe Win32_Product ? faut voir...
Maintenant, tournant moi-même sous XP 32bits je vais avoir du mal à conseiller un utilisateur de w7 x64, mais je ne peux que l'encourager à chercher parce que je suis persuadé que le moyen existe (par WMI ou autre)

[TT22]

En touts cas (je sais, je suis curieux ) ça ne nous dit toujours pas pourquoi Ghost911 veut savoir quel est l'antivirus installé

Même qustion

[Tlem]

@mikell
Heu ! certes, mais pour l'instant il n'y à pas de réponse 100% utile et donc satisfaisante.

Je n'ai jamais dit que c'était impossible, mais que chaque situation devrait être prise en compte de manière séparée puis intégrée cas par cas.

Même si le centre de sécurité vous donne dans tel cas l'antivirus X et le part feu Y, vous avez eu par l'exemple de Alex74 que même quelque chose de désinstallé depuis longtemps peut mettre le bazar ...
Vous savez que chaque éditeur fait sa propre sauce, donc n'imaginez pas avoir quelque chose d'identique à chaque fois. hihihi

[TT22]

donc n'imaginez pas avoir quelque chose d'identique à chaque fois.

Donc on fait comment ?

[Tlem]

Grrrrr, il y en a qui ne savent vraiment pas lire !!!

chaque situation devrait être prise en compte de manière séparée puis intégrée cas par cas.

[mikell]

Bon ben essayons autchose....

► Afficher le texte

Code : Tout sélectionner

Dim $Obj_WMIService = ObjGet('winmgmts:\\' & "localhost" & '\root\cimv2')
If (IsObj($Obj_WMIService)) And (Not @error) Then
    Dim $Col_Items = $Obj_WMIService.ExecQuery('Select * from Win32_Service')
    Local $Obj_Item
    For $Obj_Item In $Col_Items
        $AVdesc = $Obj_Item.Description
        If StringInStr($AVdesc, "antivirus") Then
            $AVname = "Service : " & $Obj_Item.Caption
            Exitloop
        EndIf
    Next
EndIf

$text = "Antivirus" & @CRLF
$text &= "-------------------------------------------" & @CRLF
$text &= $AVname & @CRLF

MsgBox(0,"", $text)
 

[TT22]

Sur Windows 7 64bits, ta dernière solution proposée ...

► Afficher le textesavoir si ça marche

[blink]FONCTIONNE[/blink]

[mikell]

Alors voilà...
un antivirus désinstallé peut laisser des crasses, mais seul l'antivirus actif tourne comme un service
Donc on liste dans les services démarrés celui qui a le mot "antivirus" dans la description et on récupère son nom, c'est ce qu'on appelle une situation intégrée cas par cas
Le script version compacte :

► Afficher le texte

Code : Tout sélectionner

Dim $Obj_WMIService = ObjGet('winmgmts:\\' & "localhost" & '\root\cimv2')
If (IsObj($Obj_WMIService)) And (Not @error) Then
    Dim $Col_Items = $Obj_WMIService.ExecQuery("Select * from Win32_Service where started='true' and Description like '%antivirus%'")
    Local $Obj_Item
    For $Obj_Item In $Col_Items
        MsgBox(0,"Antivirus", "Service : " & $Obj_Item.Caption)
    Next
EndIf
 

il serait intéressant de remplacer dans le script "antivirus" par "firewall" et de voir si ça marche aussi

[TT22]

Bon, c'est bien que ça marche mais je repose ma question à Ghost911 : POURQUOI veut-tu connaitre l'anti-virus qui est installé ?

[Tlem]

seul l'antivirus actif tourne comme un service
Donc on liste dans les services démarrés celui qui a le mot "antivirus" dans la description et on récupère son nom, c'est ce qu'on appelle une situation intégrée cas par cas

Je ne suis pas d'accord.
Essayez d'installer la solution de Microsoft et Antivir ...
Vous aurez 2 antivirus actifs (même si ce n'est pas recommandé). ^^

[mikell]

Exact mais on doit avoir des prémisces saines et savoir se résoudre à la pénible conclusion qu'un user qui fait tourner 2 antivirus ensemble est un user irrécupérable

D'ailleurs mon script saurait détecter les 2 antivirus puisqu'ils tourneraient comme 2 services... essayez, vous verrez !

[Tlem]

hoo, mais j'en suis parfaitement convaincu, mais chaque service aura un nom plus ou moins évocateur, et honnêtement je n'ai pas regardé le nom du service de chaque antivirus, mais je ne suis pas sur qu'il soit tout le temps évocateur. ^^
Si c'est le cas, alors c'est bon, mais pour en être sûr, vous allez devoir installer chaque antivirus et vérifier si tout roule ...
Bon courage (quoi que je suis presque sûr que dans les 20 premiers, il y en aura bien un qui aura un nom de service ALC).

[mikell]

je n'ai pas regardé le nom du service de chaque antivirus, mais je ne suis pas sur qu'il soit tout le temps évocateur.

C'est pour ça qu'on check la description à la recherche du mot "antivirus", et le titre (caption) du service renvoyé est tout à fait clair (alors que le nom de l'exe correspondant ne l'est pas)

[zeshrek]

N'oublie pas de chercher aussi anti-virus et anti virus en plus de antivirus, car tous ne l'écrivent pas forcément de la même façon...

[mikell]

Je n'ai pas fouillé mais je pense qu'avec les opérateurs acceptés par ExecQuery on peut le faire sans alourdir le script
Google => "ExecQuery like operator"
Si on veut pinailler on peut toujours dire que mon script donne le nom du service, pas le nom exact du logiciel... après, ça va dépendre de l'usage qu'on veut en faire et du besoin ou pas d'obtenir une string précise

[TT22]

ça va dépendre de l'usage qu'on veut en faire

Ce qui nous ramène à la première question posée :

Pourrait-on connaître le but de cette demande ?

[Ghost911]

Rien d’illégale si tu veux le savoir je veux faire un logiciel de sécurité mais pour sa faut que je puisse obtenir les antivirus installer sur l'ordinateur ....

[TT22]

Ok, donc je crois que le script de Mikell est bien.