Script to search for Antivirus loading locally on a PC..

I'm reachin here, but I thought I would ask anyways. Does anyone know of a
script that can search a PC and report if any Antivirus programs have been
installed? If they need to search for each and every antivirus product that
exists fi soemone can point me in the right direction to searching for one I
can do the rest.. TIA for any help..

Regards,
Karson

Jason
Fri Sep 15 14:43:58 CDT 2006

you would only need to compile a list of ALL major AV products and list
(possibly in a text file) the name of the executable (AV.EXE) for example.

what would be best is if you could compile a list of the complete install
path of the EXE.

then its a simple matter of seeing if the file exists




"karson" <karson@discussions.microsoft.com> wrote in message
news:26AE85B9-EB5E-4676-A004-C5B2EE04E897@microsoft.com...
> I'm reachin here, but I thought I would ask anyways. Does anyone know of
> a
> script that can search a PC and report if any Antivirus programs have been
> installed? If they need to search for each and every antivirus product
> that
> exists fi soemone can point me in the right direction to searching for one
> I
> can do the rest.. TIA for any help..
>
> Regards,
> Karson

noone
Wed Sep 20 15:28:52 CDT 2006

Il giorno Fri, 15 Sep 2006 11:13:02 -0700, =?Utf-8?B?a2Fyc29u?=
<karson@discussions.microsoft.com> ha scritto:
>I'm reachin here, but I thought I would ask anyways. Does anyone know of a
>script that can search a PC and report if any Antivirus programs have been
>installed? If they need to search for each and every antivirus product that
>exists fi soemone can point me in the right direction to searching for one I
>can do the rest.. TIA for any help..

I check if the antivirus is currently running on the pc's of my office searching in the
acrive tasks with the dos NET START command..


SvcName(1)= "McAfee Framework Service"
SvcName(2)= "Network Associates McShield"
SvcName(3)= "Network Associates Task Manager"

' Elenca in un file i windows services attivi
WSHShell.Run "%comspec% /c net start >c:\dati\Services.tmp", 0, True
' E controlla che ci siano i tre servizi di antivirus che cerco
for i=1 to 3 'Scrive se i servizi sono attivi
if len(FindInFileR ( "c:\dati\Services.tmp", SvcName(i) ))>0 then svc(i)=true
next

Function FindInFileR( sFileName, stringa )
const ForReading=1
Dim fso, fp, retstring
Set fso = CreateObject("Scripting.FileSystemObject")
Set fp = fso.OpenTextFile( sFileName, ForReading, False)
FindInFileR = ""
Do While fp.AtEndOfStream <> True
strdata = fp.ReadLine
if instr(strdata, stringa) then
FindInFileR = strdata
'fp.Close
'exit function
End If
Loop
fp.Close
End Function


Then I found it was simpler to check active tasks with WMI.

Giovanni.

--
Giovanni Cenati (Aosta, Italy)
Write to user "Reventlov" and domain at katamail com
http://digilander.libero.it/Cenati (Esempi e programmi in VbScript)
--