#50086 - 2002-10-14 10:45 AM
Re: Complete inventory of McAfee virusscan software which is always up-to-date.
|
BrianK
Getting the hang of it
Registered: 2002-10-02
Posts: 90
Loc: Amsterdam, The Netherlands
|
Dear Radimus.
I've taken your script and modified the paths to make it work in my environment. Also i've added some lines to accomodate the Win9x clients.
code:
; ******************************* McAfee VirusShield Section ********************************* ; ****** V:drive is actually the Q: drive in real script ************************************* $NAITVD ="$HKLMS\Network Associates\TVD" $vsengine ="$NAITVD\Shared Components\VirusScan Engine\4.0.xx" $mcupdate ="$NAITVD\Shared Components\McUpdate\CurrentVersion" $vscandir =readvalue("$NAITVD\VirusScan","szInstallDir") $vscanver =readvalue("$NAITVD\VirusScan","szCurrentVersionNumber") $vscaneng =readvalue("$vsengine","szEngineVer") $vscandat =readvalue("$vsengine","szDatVersion") $vsdatdir =readvalue("$vsengine","szInstallDir") $vsdatdate =readvalue("$vsengine","szDatDate") $mcupdexe =readvalue("$mcupdate","szInstallDir")
; ******* Install it Select CASE @INWIN = ("1") ;Windows NT $availver=readprofilestring("V:\vscan\vscan_NT\PkgDesc.ini","VSNT","Version") if "$availver">"$vscanver" if updateapp("VirusScan4.5.1",0,1)="yes" shell ('V:\vscan\vscan_NT\setup.exe reboot=r scanatstartup=false forceinstall=true /qb /i') $vscanver =readvalue("$NAITVD\VirusScan","szCurrentVersionNumber") endif endif CASE @INWIN = ("2") ;Windows 9x $availver=readprofilestring("V:\vscan\vscan_9x\PkgDesc.ini","VSNT","Version") if "$availver">"$vscanver" if updateapp("VirusScan4.5.1",0,1)="yes" shell ('V:\vscan\vscan_9x\setup.exe reboot=r scanatstartup=false forceinstall=true /qb /i') $vscanver =readvalue("$NAITVD\VirusScan","szCurrentVersionNumber") endif endif EndSelect ; ******* Service pack it if "4.5.1.1306">"$vscanver" if updateapp("VirusScan4.5.1-SP1",0,1)="yes" shell ('V:\vscan\upgrade\VSC451S1.EXE /silent') $vscanver =readvalue("$NAITVD\VirusScan","szCurrentVersionNumber") endif endif ; ******* Superdat it $availeng =readprofilestring("V:\vscan\mirror.ftp\superdat.ini","superdat","Version") if $availeng > $vscaneng $=writevalue("$McUpdate\Upgrade\Upgrade Site1","szUNCLocation","V:\vscan\mirror.ftp",REG_SZ) shell ('"$mcupdexe/MCUPDATE" /TASK UPGRADE /BATCH /norestart') $vscaneng =readvalue("$vsengine","szEngineVer") endif ; ******* dat it $availdat=dir("V:\vscan\mirror.ftp\*.zip") $availdat=substr("$availdat",5,4) if instr("$vscandat","$availdat")=0 $=writevalue("$McUpdate\Update\Update Site1","szUNCLocation","V:\vscan\mirror.ftp",REG_SZ) shell ('"$mcupdexe/MCUPDATE" /TASK UPDATE /BATCH') $vsdatdate =readvalue("$vsengine","szDatDate") $vscandat =readvalue("$vsengine","szDatVersion") endif ; ******* extra.dat it FreshFile("V:\vscan\mirror.ftp","$vsdatdir","extra.dat") ? " Installed "color c+/n"VirusShield $vscanver "color w/n"is version " color w+/n $vscandat color w/n " dated " color w+/n $vsdatdate color w/n
However, when I start it, the following line appears: Script error: Expected expression!
_________________________
Rodney Dangerfield:
“My mother didn't breast-feed me. She said she liked me as a friend.”
|
|
Top
|
|
|
|
Moderator: Glenn Barnas, NTDOC, Arend_, Jochen, Radimus, Allen, ShaneEP, Ruud van Velsen, Mart
|
0 registered
and 871 anonymous users online.
|
|
|