Differences

This shows you the differences between two versions of the page.

Link to this comparison view

monitors:forefront [2009/11/23 05:48] (current)
Line 1: Line 1:
 +====== Forefront Security for Exchange 2007 ======
 +
 +^ Author | [[ david@stenhouseconsulting.com | David Gilmore ]] |
 +^ Compatibility | Xymon 4.2 |
 +^ Requirements | Windows Server 2003 x64/​Exchange 2007/​Forefront Security Server for Exchange 2007/BBWin |
 +^ Download | None |
 +^ Last Update | 2007-07-12 |
 +
 +===== Description =====
 +
 +VBS Script that checks the status of multiple AV engines used by Microsoft’s Forefront Security Server for Exchange and reports status under the FSE column.
 +
 +===== Installation =====
 +=== Client side ===
 +  - Add to BBWin.cfg in externals<​code xml>
 +   <​load value="​cscript '​C:​\Program Files\BBWin\ext\forefront.vbs'"​ /></​code>​ This may work as well <code xml>
 +   <​load value="​cscript ..\ext\forefront.vbs /></​code>​
 +
 +=== Server side ===
 +
 +  * None
 +
 +===== Source =====
 +
 +==== forefront.vbs ====
 +<hidden onHidden="​Show Code ⇲" onVisible="​Hide Code ⇱">​
 +<code vb>
 +'​==========================================================================================================
 +'
 +' VBScript Source File 
 +'
 +' NAME: MSForefront.vbs (formerly BBantigen-V8.vbs)
 +' ​      ​Script to be used with BBWin to check ForeFront Server for Exchange 2007 virus definition version
 +'
 +' Version: 1.5
 +'
 +' AUTHOR: David Gilmore; david@stenhouseconsulting.com
 +' DATE  : 07/11/2007
 +'
 +' COMMENT: ​ This script will check a range of engines which are used in ForeFront Server for Exchange 2007
 +' ​          It will Warn or Alarm as configured and report the information back to the 
 +' ​          ​configured Xymon Server. It requires the BBWin client installed.
 +'​  ​   You can put the script in the Externals Scripts or you can schedule it as a scheduled task.
 +' ​          Since it is recommended to use no more than five engines you will need to modify script for engines
 +'​  ​   in use. 
 +'
 +'
 +' LICENSE: ​
 +' Copyright (c) 2005, Roos-IT
 +' All rights reserved.
 +'
 +' Redistribution and use in source and binary forms, with or without ​
 +' modification,​ are permitted provided that the following conditions are met:
 +'
 +' - Redistributions of source code must retain the above copyright notice, ​
 +'​ this list of conditions and the following disclaimer. ​
 +'​ - Redistributions in binary form must reproduce the above copyright notice, ​
 +'​ this list of conditions and the following disclaimer in the documentation ​
 +'​ and/​or other materials provided with the distribution. ​
 +' - Neither the name of Roos-IT nor the names of its contributors ​
 +' may be used to endorse or promote products derived from this software without ​
 +'​ specific prior written permission. ​
 +'
 +' THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND ANY 
 +' EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES ​
 +' OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT 
 +' SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, ​
 +' SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT ​
 +' OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) ​
 +' HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR 
 +' TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, ​
 +' EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 +'
 +' VERSION HISTORY:
 +'​ 0.1 - Initial Release
 +'​ 0.2 - fixe one engine with all status report
 +'​ 0.3 - fixe more engines with all status report
 +'​ 0.4 - fixe one engine with own status report
 +'​ 0.5 - fixe more engines with own status report
 +'​ 0.6 - counters for Admins
 +'​ 0.7 - page status warning by engines
 +'​ 0.8 - HTML layout dressing
 +'​ 0.9 - now change the page name in bb
 +'​ 1.0 - changed external path, read from registry
 +'
 +'​ 1.5 - script modified and updated for use with MS
 +'​ Forefront Server for Exchange 2007 and new
 +'​ engines.
 +'
 +'​==========================================================================================================
 +
 +'​---Dimensionering.
 + Dim zPageName,​zRevChk,​zPageStatus,​zDateDiff,​zOutFile,​zRedChk,​zYellowChk,​zRedChk1,​zYellowChk1,​zShell,​zExtPath,​zFSO
 + Dim aShell,​aDef,​aDate,​aVer,​aRev,​aNDate,​aToday,​aTime,​aEng,​aRevDef
 + Dim bShell,​bDef,​bDate,​bVer,​bRev,​bNDate,​bToday,​bTime,​bEng,​bRevDef
 + Dim cShell,​cDef,​cDate,​cVer,​cRev,​cNDate,​cToday,​cTime,​cEng,​cRevDef
 + Dim dShell,​dDef,​dDate,​dVer,​dRev,​dNDate,​dToday,​dTime,​dEng,​dRevDef
 + Dim eShell,​eDef,​eDate,​eVer,​eRev,​eNDate,​eToday,​eTime,​eEng,​eRevDef
 + Dim fShell,​fDef,​fDate,​fVer,​fRev,​fNDate,​fToday,​fTime,​fEng,​fRevDef
 + Dim gShell,​gDef,​gDate,​gVer,​gRev,​gNDate,​gToday,​gTime,​gEng,​gRevDef
 + Dim hShell,​hDef,​hDate,​hVer,​hRev,​hNDate,​hToday,​hTime,​hEng,​hRevDef
 + Dim iShell,​iDef,​iDate,​iVer,​iRev,​iNDate,​iToday,​iTime,​iEng,​iRevDef
 + Dim jShell,​jDef,​jDate,​jVer,​jRev,​jNDate,​jToday,​jTime,​jEng,​jRevDef
 + Dim oShell,​oDef,​oDate,​oVer,​oRev,​oNDate,​oToday,​oTime,​oEng,​oRevDef
 +
 +'​***********************************Begin configurable counters for Admins***********************************
 +
 +' ​   ---How many days before the engine defintion files expire and the warning status will change.
 + zRevChk = 7
 +
 +'​---Warning levels for expired definition files.
 +' ​  * how many engines are out of date to change the page status to yellow
 + zYellowChk = 2
 +' ​  * how many engines are out of date to change the page status to red
 + zRedChk = 4
 +
 +'​---Change the following path to point to your BBWin EXTERNALPATH location if the registry read does not work.
 +'​---There is a "'"​ in front of the line you don't want tot use.
 + Set zShell = WScript.CreateObject("​Wscript.Shell"​)
 + zExtPath = zShell.RegRead("​HKEY_LOCAL_MACHINE\SOFTWARE\WOW6432Node\BBWin\tmppath"​)
 +'​ Const zExtPath = "​D:​\Program Files (x86)\BBWin\tmp"​
 +
 +'​---Name of the header on page
 + zPageName = "​fse"​
 +
 +'​***********************************End configurable counters for Admins***********************************
 +
 +'​---Create BB object.
 + Set zFSO= CreateObject("​Scripting.FileSystemObject"​)
 +
 +'​---Create Output file.
 + Set zOutFile = zFSO.CreateTextFile (zExtPath &"​\"&​ zPageName)
 +
 +'​---resetting counters
 + zPageStatus = 0
 +
 +'​---Check Virus Def Date by reading value from registry for AhnLab V3 Engine
 + Set oShell = WScript.CreateObject("​Wscript.Shell"​)
 + oRev = oShell.RegRead ("​HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Forefront Server Security\Exchange Server\Scan Engines\AhnLab\Signature Version"​)
 + oEng = oShell.RegRead ("​HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Forefront Server Security\Exchange Server\Scan Engines\AhnLab\Engine Version"​)
 + oDef = oShell.RegRead ("​HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Forefront Server Security\Exchange Server\Scan Engines\AhnLab\Last Updated"​)
 + oVer = Right(oDef,​19)
 + oTime = Right(oVer,​8)
 + oDate = Left(oVer,​8)
 + oYear = Mid(oDate,​6,​2)
 + oMonth = Left(oDate,​2)
 + oDay = Mid(oDate,​3,​2)
 + oNDate = oVer
 + oToday = FormatDateTime(Now,​ vbShortDate)
 +'​---Determine age of virus definitions,​ if more thn 7 days old display yellow on BB
 + oDateDiff = DateDiff("​d",​ oNDate, oToday)
 + If (oDateDiff > zRevChk) then 
 + oRevDef = "<​IMG SRC=/​hobbit/​gifs/​yellow.gif ALT=yellow HEIGHT=16 WIDTH=16 BORDER=0>"​
 + Else oRevDef = "<​IMG SRC=/​hobbit/​gifs/​green.gif ALT=green HEIGHT=16 WIDTH=16 BORDER=0>"​
 + End If
 +
 +'​---Check Virus Def Date by reading value from registry for CA Vet
 + Set bShell = WScript.CreateObject("​Wscript.Shell"​)
 + bRev = bShell.RegRead ("​HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Forefront Server Security\Exchange Server\Scan Engines\CAVet\Signature Version"​)
 + bEng = bShell.RegRead ("​HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Forefront Server Security\Exchange Server\Scan Engines\CAVet\Engine Version"​)
 + bDef = bShell.RegRead ("​HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Forefront Server Security\Exchange Server\Scan Engines\CAVet\Last Updated"​)
 + bVer = Right(bDef,​19)
 + bTime = Right(bVer,​8)
 + bDate = Left(bVer,​8)
 + bYear = Mid(bDate,​6,​2)
 + bMonth = Left(bDate,​2)
 + bDay = Mid(bDate,​3,​2)
 + bNDate = bVer
 + bToday = FormatDateTime(Now,​ vbShortDate)
 +'​---Determine age of virus definitions,​ if more thn 7 days old display yellow on BB
 + bDateDiff = DateDiff("​d",​ bNDate, bToday)
 + If (bDateDiff > zRevChk) then 
 + bRevDef = "<​IMG SRC=/​hobbit/​gifs/​yellow.gif ALT=yellow HEIGHT=16 WIDTH=16 BORDER=0>"​
 + Else bRevDef = "<​IMG SRC=/​hobbit/​gifs/​green.gif ALT=green HEIGHT=16 WIDTH=16 BORDER=0>"​
 + End If
 +
 +'​---Check Virus Def Date by reading value from registry for Command
 + Set cShell = WScript.CreateObject("​Wscript.Shell"​)
 + cRev = cShell.RegRead ("​HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Forefront Server Security\Exchange Server\Scan Engines\Command\Signature Version"​)
 + cEng = cShell.RegRead ("​HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Forefront Server Security\Exchange Server\Scan Engines\Command\Engine Version"​)
 + cDef = cShell.RegRead ("​HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Forefront Server Security\Exchange Server\Scan Engines\Command\Last Updated"​)
 + cVer = Right(cDef,​19)
 + cTime = Right(cVer,​8)
 + cDate = Left(cVer,​8)
 + cYear = Mid(cDate,​6,​2)
 + cMonth = Left(cDate,​2)
 + cDay = Mid(cDate,​3,​2)
 + cNDate = cVer
 + cToday = FormatDateTime(Now,​ vbShortDate)
 +'​---Determine age of virus definitions,​ if more thn 7 days old display yellow on BB
 + cDateDiff = DateDiff("​d",​ cNDate, cToday)
 + If (cDateDiff > zRevChk) then 
 + cRevDef = "<​IMG SRC=/​hobbit/​gifs/​yellow.gif ALT=yellow HEIGHT=16 WIDTH=16 BORDER=0>"​
 + Else cRevDef = "<​IMG SRC=/​hobbit/​gifs/​green.gif ALT=green HEIGHT=16 WIDTH=16 BORDER=0>"​
 + End If
 +
 +'​---Check Virus Def Date by reading value from registry for Kaspersky
 + Set dShell = WScript.CreateObject("​Wscript.Shell"​)
 + dRev = dShell.RegRead ("​HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Forefront Server Security\Exchange Server\Scan Engines\Kaspersky5\Signature Version"​)
 + dEng = dShell.RegRead ("​HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Forefront Server Security\Exchange Server\Scan Engines\Kaspersky5\Engine Version"​)
 + dDef = dShell.RegRead ("​HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Forefront Server Security\Exchange Server\Scan Engines\Kaspersky5\Last Updated"​)
 + dVer = Right(dDef,​19)
 + dTime = Right(dVer,​8)
 + dDate = Left(dVer,​8)
 + dYear = Mid(dDate,​6,​2)
 + dMonth = Left(dDate,​2)
 + dDay = Mid(dDate,​3,​2)
 + dNDate = dVer
 + dToday = FormatDateTime(Now,​ vbShortDate)
 +'​---Determine age of virus definitions,​ if more thn 7 days old display yellow on BB
 + dDateDiff = DateDiff("​d",​ dNDate, dToday)
 + If (dDateDiff > zRevChk) then 
 + dRevDef = "<​IMG SRC=/​hobbit/​gifs/​yellow.gif ALT=yellow HEIGHT=16 WIDTH=16 BORDER=0>"​
 + Else dRevDef = "<​IMG SRC=/​hobbit/​gifs/​green.gif ALT=green HEIGHT=16 WIDTH=16 BORDER=0>"​
 + End If
 +
 +
 +'​---Check Virus Def Date by reading value from registry for Norman Data Defense
 + Set fShell = WScript.CreateObject("​Wscript.Shell"​)
 + fRev = fShell.RegRead ("​HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Forefront Server Security\Exchange Server\Scan Engines\Norman\Signature Version"​)
 + fEng = fShell.RegRead ("​HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Forefront Server Security\Exchange Server\Scan Engines\Norman\Engine Version"​)
 + fDef = fShell.RegRead ("​HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Forefront Server Security\Exchange Server\Scan Engines\Norman\Last Updated"​)
 + fVer = Right(fDef,​19)
 + fTime = Right(fVer,​8)
 + fDate = Left(fVer,​8)
 + fYear = Mid(fDate,​6,​2)
 + fMonth = Left(fDate,​2)
 + fDay = Mid(fDate,​3,​2)
 + fNDate = fVer
 + fToday = FormatDateTime(Now,​ vbShortDate)
 +'​---Determine age of virus definitions,​ if more thn 7 days old display yellow on BB
 + fDateDiff = DateDiff("​d",​ fNDate, fToday)
 + If (fDateDiff > zRevChk) then 
 + fRevDef = "<​IMG SRC=/​hobbit/​gifs/​yellow.gif ALT=yellow HEIGHT=16 WIDTH=16 BORDER=0>"​
 + Else fRevDef = "<​IMG SRC=/​hobbit/​gifs/​green.gif ALT=green HEIGHT=16 WIDTH=16 BORDER=0>"​
 + End If
 +
 +'​---Check Virus Def Date by reading value from registry for Sophos Anti-Virus
 + Set gShell = WScript.CreateObject("​Wscript.Shell"​)
 + gRev = gShell.RegRead ("​HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Forefront Server Security\Exchange Server\Scan Engines\Sophos\Signature Version"​)
 + gEng = gShell.RegRead ("​HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Forefront Server Security\Exchange Server\Scan Engines\Sophos\Engine Version"​)
 + gDef = gShell.RegRead ("​HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Forefront Server Security\Exchange Server\Scan Engines\Sophos\Last Updated"​)
 + gVer = Right(gDef,​19)
 + gTime = Right(gVer,​8)
 + gDate = Left(gVer,​8)
 + gYear = Mid(gDate,​6,​2)
 + gMonth = Left(gDate,​2)
 + gDay = Mid(gDate,​3,​2)
 + gNDate = gVer
 + gToday = FormatDateTime(Now,​ vbShortDate)
 +'​---Determine age of virus definitions,​ if more thn 7 days old display yellow on BB
 + gDateDiff = DateDiff("​d",​ gNDate, gToday)
 + If (gDateDiff > zRevChk) then 
 + gRevDef = "<​IMG SRC=/​hobbit/​gifs/​yellow.gif ALT=yellow HEIGHT=16 WIDTH=16 BORDER=0>"​
 + Else gRevDef = "<​IMG SRC=/​hobbit/​gifs/​green.gif ALT=green HEIGHT=16 WIDTH=16 BORDER=0>"​
 + End If
 +
 +'​---Check Virus Def Date by reading value from registry for Sybari Worm List
 + Set iShell = WScript.CreateObject("​Wscript.Shell"​)
 + iRev = iShell.RegRead ("​HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Forefront Server Security\Exchange Server\Scan Engines\WormList\Signature Version"​)
 + iEng = iShell.RegRead ("​HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Forefront Server Security\Exchange Server\Scan Engines\WormList\Engine Version"​)
 + iDef = iShell.RegRead ("​HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Forefront Server Security\Exchange Server\Scan Engines\WormList\Last Updated"​)
 + iVer = Right(iDef,​19)
 + iTime = Right(iVer,​8)
 + iDate = Left(iVer,​8)
 + iYear = Mid(iDate,​6,​2)
 + iMonth = Left(iDate,​2)
 + iDay = Mid(iDate,​3,​2)
 + iNDate = iVer
 + iToday = FormatDateTime(Now,​ vbShortDate)
 +'​---Determine age of virus definitions,​ if more thn 7 days old display yellow on BB
 + iDateDiff = DateDiff("​d",​ iNDate, iToday)
 + If (iDateDiff > zRevChk) then 
 + iRevDef = "<​IMG SRC=/​hobbit/​gifs/​yellow.gif ALT=yellow HEIGHT=16 WIDTH=16 BORDER=0>"​
 + Else iRevDef = "<​IMG SRC=/​hobbit/​gifs/​green.gif ALT=green HEIGHT=16 WIDTH=16 BORDER=0>"​
 + End If
 +
 +'​---Check Virus Def Date by reading value from registry for Virus Buster
 + Set jShell = WScript.CreateObject("​Wscript.Shell"​)
 + jRev = jShell.RegRead ("​HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Forefront Server Security\Exchange Server\Scan Engines\VBuster\Signature Version"​)
 + jEng = jShell.RegRead ("​HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Forefront Server Security\Exchange Server\Scan Engines\VBuster\Engine Version"​)
 + jDef = jShell.RegRead ("​HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Forefront Server Security\Exchange Server\Scan Engines\VBuster\Last Updated"​)
 + jVer = Right(jDef,​19)
 + jTime = Right(jVer,​8)
 + jDate = Left(jVer,​8)
 + jYear = Mid(jDate,​6,​2)
 + jMonth = Left(jDate,​2)
 + jDay = Mid(jDate,​3,​2)
 + jNDate = jVer
 + jToday = FormatDateTime(Now,​ vbShortDate)
 +'​---Determine age of virus definitions,​ if more thn 7 days old display yellow on BB
 + jDateDiff = DateDiff("​d",​ jNDate, jToday)
 + If (jDateDiff > zRevChk) then 
 + jRevDef = "<​IMG SRC=/​hobbit/​gifs/​yellow.gif ALT=yellow HEIGHT=16 WIDTH=16 BORDER=0>"​
 + Else jRevDef = "<​IMG SRC=/​hobbit/​gifs/​green.gif ALT=green HEIGHT=16 WIDTH=16 BORDER=0>"​
 + End If
 +
 +
 +'​---determine page error status
 + If (oDateDiff > zRevChk) then 
 + zPageStatus = zPageStatus + 1
 + Else zPageStatus = zPageStatus
 + End If
 + If (aDateDiff > zRevChk) then 
 + zPageStatus = zPageStatus + 1
 + Else zPageStatus = zPageStatus
 + End If
 + If (bDateDiff > zRevChk) then 
 + zPageStatus = zPageStatus + 1
 + Else zPageStatus = zPageStatus
 + End If
 + If (cDateDiff > zRevChk) then 
 + zPageStatus = zPageStatus + 1
 + Else zPageStatus = zPageStatus
 + End If
 + If (dDateDiff > zRevChk) then 
 + zPageStatus = zPageStatus + 1
 + Else zPageStatus = zPageStatus
 + End If
 + If (eDateDiff > zRevChk) then 
 + zPageStatus = zPageStatus + 1
 + Else zPageStatus = zPageStatus
 + End If
 + If (fDateDiff > zRevChk) then 
 + zPageStatus = zPageStatus + 1
 + Else zPageStatus = zPageStatus
 + End If
 + If (gDateDiff > zRevChk) then 
 + zPageStatus = zPageStatus + 1
 + Else zPageStatus = zPageStatus
 + End If
 + If (hDateDiff > zRevChk) then 
 + zPageStatus = zPageStatus + 1
 + Else zPageStatus = zPageStatus
 + End If
 + If (iDateDiff > zRevChk) then 
 + zPageStatus = zPageStatus + 1
 + Else zPageStatus = zPageStatus
 + End If
 + If (jDateDiff > zRevChk) then 
 + zPageStatus = zPageStatus + 1
 + Else zPageStatus = zPageStatus
 + End If
 +
 +'​---Page status to green, yellow or red
 + If (zPageStatus > zYellowChk) then 
 + zDateDiff = "​yellow+25h"​
 + If (zPageStatus > zRedChk) then 
 + zDateDiff = "​red+25h"​
 + End If
 +   Else zDateDiff = "​green+25h"​
 + End If
 +
 +
 +'​---write results to file
 +zOutFile.WriteLine zDateDiff & vbCrLf
 +zOutFile.WriteLine vbCrLf &"<​b><​font size=3>​Found Forefront Security v1 for Exchange 2007</​font></​b>"​ & vbCrLf
 +zOutFile.WriteLine zPageStatus & " Virus Scanner definition file(s) is/are out of date" & vbCrLf & vbCrLf
 +
 + zOutFile.WriteLine "<​b><​font size=3 color=#​008CEA>​AhnLab V3 Engine</​font></​b>"​
 + zOutFile.WriteLine oRevDef & " Engine version: " & vbTab & oEng
 + zOutFile.WriteLine oRevDef & " Definition version: " & vbTab & oRev & vbTab &" date: "& oNDate
 + zOutFile.WriteLine " ​  Virus definitions are "& oDateDiff &" day(s) old" & vbCrLf
 +
 + zOutFile.WriteLine "<​b><​font size=3 color=#​008CEA>​CA Vet</​font></​b>"​
 + zOutFile.WriteLine bRevDef & " Engine version: " & vbTab & bEng
 + zOutFile.WriteLine bRevDef & " Definition version: " & vbTab & bRev & vbTab &" date: "& bNDate
 + zOutFile.WriteLine " ​  Virus definitions are "& bDateDiff &" day(s) old" & vbCrLf
 +
 + zOutFile.WriteLine "<​b><​font size=3 color=#​008CEA>​Command</​font></​b>"​
 + zOutFile.WriteLine cRevDef & " Engine version: " & vbTab & cEng
 + zOutFile.WriteLine cRevDef & " Definition version: " & vbTab & cRev & vbTab &" date: "& cNDate
 + zOutFile.WriteLine " ​  Virus definitions are "& cDateDiff &" day(s) old" & vbCrLf
 +
 + zOutFile.WriteLine "<​b><​font size=3 color=#​008CEA>​Kaspersky</​font></​b>"​
 + zOutFile.WriteLine dRevDef & " Engine version: " & vbTab & dEng
 + zOutFile.WriteLine dRevDef & " Definition version: " & vbTab & dRev & vbTab &" date: "& dNDate
 + zOutFile.WriteLine " ​  Virus definitions are "& dDateDiff &" day(s) old" & vbCrLf
 +
 + zOutFile.WriteLine "<​b><​font size=3 color=#​008CEA>​Norman Data Defense</​font></​b>"​
 + zOutFile.WriteLine fRevDef & " Engine version: " & vbTab & fEng
 + zOutFile.WriteLine fRevDef & " Definition version: " & vbTab & fRev & vbTab & vbTab &" date: "& fNDate
 + zOutFile.WriteLine " ​  Virus definitions are "& fDateDiff &" day(s) old" & vbCrLf
 +
 + zOutFile.WriteLine "<​b><​font size=3 color=#​008CEA>​Sophos Anti-Virus</​font></​b>"​
 + zOutFile.WriteLine gRevDef & " Engine version: " & vbTab & gEng
 + zOutFile.WriteLine gRevDef & " Definition version: " & vbTab & gRev & vbTab & vbTab &" date: "& gNDate
 + zOutFile.WriteLine " ​  Virus definitions are "& gDateDiff &" day(s) old" & vbCrLf
 +
 + zOutFile.WriteLine "<​b><​font size=3 color=#​008CEA>​Sybari Worm List</​font></​b>"​
 + zOutFile.WriteLine iRevDef & " Engine version: " & vbTab & iEng
 + zOutFile.WriteLine iRevDef & " Definition version: " & vbTab & iRev & vbTab &" date: "& iNDate
 + zOutFile.WriteLine " ​  Virus definitions are "& iDateDiff &" day(s) old" & vbCrLf
 +
 + zOutFile.WriteLine "<​b><​font size=3 color=#​008CEA>​Virus Buster</​font></​b>"​
 + zOutFile.WriteLine jRevDef & " Engine version: " & vbTab & jEng
 + zOutFile.WriteLine jRevDef & " Definition version: " & vbTab & jRev & vbTab & vbTab &" date: "& jNDate
 + zOutFile.WriteLine " ​  Virus definitions are "& jDateDiff &" day(s) old" & vbCrLf & vbCrLf & vbCrLf
 +
 +
 + zOutFile.WriteLine "<​font size=1 color=#​33CCCC><​p align=right>"​ & ZpageName & " script updated by stenhouseconsulting.com</​p></​font>"​
 +
 +'​---Close log file
 + zOutFile.Close
 +
 +</​code>​
 +</​hidden>​
 +
 +===== Known  Bugs and Issues =====
 +
 +===== To Do =====
 +
 +===== Credits =====
 +
 +[[ http://​www.deadcat.net/​viewfile.php?​fileid=924 | BBantigen-V8.vbs ]]
 +
 +===== Changelog =====
 +
 +  * **2007-07-12**
 +    * Initial release
  
  • monitors/forefront.txt
  • Last modified: 2009/11/23 05:48
  • (external edit)