|
Added $mcafee85, TempDate1, TempDate2, TempDate3, and changed the McAfeeArray from 3 to 4.
Set value of $mcafee85 to the full path.
Played around with McAfee's date code so it came out easy to read. Added the code to print out the date code in the table at the end. I added the date code as sometimes seeing just the version number does not help.
Thanks again!
===================================
Function GetMcAfeeVirusInfo()
Dim $mcafee,$tvd,$mcafee85,$datnum,$engine,$product,$TempDate1,$TempDate2,$TempDate3,$McAfeeArray[4]
$mcafee='HKLM\SOFTWARE\McAfee\VirusScan'
$tvd='HKLM\SOFTWARE\Network Associates\TVD'
$mcafee85='HKLM\SOFTWARE\Network Associates\ePolicy Orchestrator\Application Plugins\VIRUSCAN8600'
;VS 8.5 (manually added by Sean Dorsey
KeyExist($mcafee85)
$datnum=ReadValue($mcafee85,'DATVersion')
$engine=ReadValue($mcafee85,'EngineVersion')
$product=ReadValue($mcafee85,'Version')
$DatDate=ReadValue($mcafee85,'DatInstallDate')
$TempDate1=SubStr($DatDate,1,4)
$TempDate2=SubStr($DatDate,5,2)
$TempDate3=SubStr($DatDate,7,2)
$DatDate=$TempDate2 + "-" + $TempDate3 + "-" + $TempDate1
| 
