<font size=2 face="sans-serif">Hello,</font>
<br>
<br><font size=2 face="sans-serif">You can also use this VBS script with
BBWin:</font>
<br>
<br><font size=2 face="sans-serif">Just modify the array Lst_Srv and put
there the list of the service you want to monitor and value Cluster should
be the name of the cluster you want to monitore.</font>
<br>
<br>
<br><font size=2 face="sans-serif">'''''''''''''''''''''''</font>
<br><font size=2 face="sans-serif">'</font>
<br><font size=2 face="sans-serif">' VBS template for BBWin</font>
<br><font size=2 face="sans-serif">'</font>
<br><font size=2 face="sans-serif">'</font>
<br><font size=2 face="sans-serif">' Gautier BEGIN</font>
<br><font size=2 face="sans-serif">' CSC Luxembourg</font>
<br><font size=2 face="sans-serif">' 11/02/2010</font>
<br><font size=2 face="sans-serif">'</font>
<br><font size=2 face="sans-serif">'</font>
<br><font size=2 face="sans-serif">' The XYMON server name, the debug level,
the test/column name and the LifeTime are read from the BBWin.cfg file</font>
<br><font size=2 face="sans-serif">'</font>
<br><font size=2 face="sans-serif">' An execution log is created in the
BBWin\logs\<Column>.log file. The VBS object associated is ObjectFileLog.</font>
<br><font size=2 face="sans-serif">'</font>
<br><font size=2 face="sans-serif">'</font>
<br><font size=2 face="sans-serif">' You have to fill the value of Msg_KO
and Msg_OK according your own custom test.</font>
<br><font size=2 face="sans-serif">'</font>
<br><font size=2 face="sans-serif">'</font>
<br><font size=2 face="sans-serif">' You can use the ERROR variable to
send your error message (0=> MSG_OK, 1=> MSG_KO)</font>
<br><font size=2 face="sans-serif">'</font>
<br><font size=2 face="sans-serif">'</font>
<br><font size=2 face="sans-serif">'''''''''''''''''''''''</font>
<br>
<br><font size=2 face="sans-serif">'''''''''''''''''''''''</font>
<br><font size=2 face="sans-serif">'</font>
<br><font size=2 face="sans-serif">' VBS std Variables</font>
<br><font size=2 face="sans-serif">'</font>
<br><font size=2 face="sans-serif">'''''''''''''''''''''''</font>
<br><font size=2 face="sans-serif">Const ForReading = 1, ForWriting = 2,
ForAppending = 8</font>
<br><font size=2 face="sans-serif">Dim Obj_FSO, WshShell, WshNetwork, xmlDoc</font>
<br>
<br><font size=2 face="sans-serif">set Obj_FSO = CreateObject("Scripting.FileSystemObject")</font>
<br><font size=2 face="sans-serif">Set WshShell = WScript.CreateObject("WScript.Shell")</font>
<br><font size=2 face="sans-serif">Set WshNetwork = WScript.CreateObject("WScript.Network")</font>
<br><font size=2 face="sans-serif">Set xmlDoc = CreateObject("Microsoft.XMLDOM")</font>
<br><font size=2 face="sans-serif">xmlDoc.async = "false"
'
permit to load the document in memory before computing</font>
<br>
<br>
<br><font size=2 face="sans-serif">'''''''''''''''''''''''</font>
<br><font size=2 face="sans-serif">'</font>
<br><font size=2 face="sans-serif">' BBWin Variables </font>
<br><font size=2 face="sans-serif">'</font>
<br><font size=2 face="sans-serif">'''''''''''''''''''''''</font>
<br><font size=2 face="sans-serif">Dim Cmd, BB, PathBBWin, LOG, LifeTime,
DebugLevel</font>
<br><font size=2 face="sans-serif">Dim Msg_OK, Msg_KO, Msg, Color, Color_KO,
Color_OK, Column, ERROR, Srv, Return, ExecCmd, ObjectFileLog, CFG, CFGVal,
X</font>
<br>
<br>
<br><font size=2 face="sans-serif">' To be Modified</font>
<br><font size=2 face="sans-serif">Msg_OK = ""</font>
<br><font size=2 face="sans-serif">Msg_KO = ""</font>
<br><font size=2 face="sans-serif">Color_OK = "green"</font>
<br><font size=2 face="sans-serif">Color_KO = "red"</font>
<br>
<br><font size=2 face="sans-serif">' Default values</font>
<br><font size=2 face="sans-serif">Column = "cluster"</font>
<br><font size=2 face="sans-serif">DebugLevel = 0</font>
<br><font size=2 face="sans-serif">LifeTime = 10 'minutes</font>
<br>
<br><font size=2 face="sans-serif">PathBBWin = WshShell.RegRead("HKLM\SOFTWARE\BBWin\binpath")</font>
<br><font size=2 face="sans-serif">PathBBWin = Left(PathBBWin,Len(PathBBWin)-3)</font>
<br><font size=2 face="sans-serif">BB = PathBBWin & "bin\BBWinCmd.exe"</font>
<br><font size=2 face="sans-serif">CFG = PathBBWin & "etc\BBWin.cfg"</font>
<br>
<br>
<br>
<br><font size=2 face="sans-serif">Return = 0</font>
<br><font size=2 face="sans-serif">ERROR = 0</font>
<br>
<br><font size=2 face="sans-serif">' Reading the config file</font>
<br>
<br>
<br><font size=2 face="sans-serif">xmlDoc.load(CFG)</font>
<br><font size=2 face="sans-serif">set CFGVal = xmlDoc.documentElement</font>
<br>
<br><font size=2 face="sans-serif"> If Not CFGVal Is Nothing
Then</font>
<br><font size=2 face="sans-serif"> For Each
x In CFGVal.selectNodes("/configuration/bbwin/setting")</font>
<br><font size=2 face="sans-serif">
If X.getAttribute("name") = "bbdisplay"
Then</font>
<br><font size=2 face="sans-serif">
Srv =
X.getAttribute("value")</font>
<br><font size=2 face="sans-serif">
End If</font>
<br>
<br><font size=2 face="sans-serif">
If X.getAttribute("name") = "loglevel"
Then</font>
<br><font size=2 face="sans-serif">
DebugLevel
= X.getAttribute("value")</font>
<br><font size=2 face="sans-serif">
End If</font>
<br>
<br><font size=2 face="sans-serif">
If X.getAttribute("name") = "timer"
Then</font>
<br><font size=2 face="sans-serif">
LifeTime
= X.getAttribute("value")</font>
<br><font size=2 face="sans-serif">
Select
Case Right(LifeTime ,1)</font>
<br><font size=2 face="sans-serif">
Case "m" LifeTime = Left(LifeTime,Len(LifeTime)-1)</font>
<br><font size=2 face="sans-serif">
Case "h" LifeTime = Left(LifeTime,Len(LifeTime)-1)
* 60</font>
<br><font size=2 face="sans-serif">
Case "d" LifeTime = Left(LifeTime,Len(LifeTime)-1)
* 60 * 24</font>
<br><font size=2 face="sans-serif">
Case Else LifeTime = 1</font>
<br><font size=2 face="sans-serif">
End Select</font>
<br>
<br><font size=2 face="sans-serif">
End If</font>
<br><font size=2 face="sans-serif"> Next</font>
<br>
<br><font size=2 face="sans-serif"> For
Each x In CFGVal.selectNodes("/configuration/externals/load")</font>
<br><font size=2 face="sans-serif">
If InStrRev(X.getAttribute("value"),WScript.ScriptName)
> 0 Then</font>
<br><font size=2 face="sans-serif">
Column
= X.getAttribute("name")</font>
<br><font size=2 face="sans-serif">
End If
</font>
<br>
<br><font size=2 face="sans-serif"> Next</font>
<br>
<br>
<br><font size=2 face="sans-serif"> End If</font>
<br>
<br><font size=2 face="sans-serif">LOG = PathBBWin & "logs\"
& Column & ".log"</font>
<br><font size=2 face="sans-serif">if ( DebugLevel > 0 ) Then </font>
<br><font size=2 face="sans-serif"> set
ObjectFileLog = Obj_FSO.OpenTextFile(LOG,ForAppending ,True)</font>
<br><font size=2 face="sans-serif">End if</font>
<br>
<br>
<br><font size=2 face="sans-serif">'''''''''''''''''''''''</font>
<br><font size=2 face="sans-serif">'</font>
<br><font size=2 face="sans-serif">' Custom test</font>
<br><font size=2 face="sans-serif">'</font>
<br><font size=2 face="sans-serif">'''''''''''''''''''''''</font>
<br>
<br><font size=2 face="sans-serif">Dim strComputer, ResGrp, ActiveNode,
IsActiveNode </font>
<br><font size=2 face="sans-serif">Dim objWMIService, colItems, objItem
</font>
<br><font size=2 face="sans-serif">Dim Service, Status, Elt, Cluster, Disp_Name</font>
<br>
<br><font size=2 face="sans-serif">strComputer = "."</font>
<br><font size=2 face="sans-serif">IsActiveNode = 0</font>
<br><font size=2 face="sans-serif">Lst_Srv= Array("MSFtpsvc")
' FTP Service </font>
<br><font size=2 face="sans-serif">Cluster = "Cluster_Name"</font>
<br>
<br><font size=2 face="sans-serif">Set objWMIService = GetObject("winmgmts:"
_</font>
<br><font size=2 face="sans-serif"> & "{impersonationLevel=impersonate}!\\"
& strComputer & "\root\mscluster")</font>
<br>
<br><font size=2 face="sans-serif">Set colItems = objWMIService.ExecQuery("Select
* from mscluster_nodetoactivegroup")</font>
<br><font size=2 face="sans-serif">For Each objItem in colItems </font>
<br><font size=2 face="sans-serif"> ResGrp
= Treatment(objItem.PartComponent)</font>
<br>
<br><font size=2 face="sans-serif"> If
ResGrp = Cluster Then</font>
<br><font size=2 face="sans-serif">
ActiveNode = Treatment(objItem.GroupComponent)</font>
<br><font size=2 face="sans-serif">
If ActiveNode = WshNetwork.ComputerName Then
IsActiveNode = 1</font>
<br><font size=2 face="sans-serif"> End
If</font>
<br><font size=2 face="sans-serif">Next</font>
<br>
<br><font size=2 face="sans-serif">' Test the state of the services</font>
<br><font size=2 face="sans-serif">Set objWMIService = GetObject("winmgmts:{impersonationLevel=impersonate}!\\"
& strComputer & "\root\cimv2")</font>
<br><font size=2 face="sans-serif">Set colItems = objWMIService.ExecQuery("SELECT
* FROM Win32_Service ")</font>
<br>
<br><font size=2 face="sans-serif">For Each objItem in colItems</font>
<br><font size=2 face="sans-serif"> Service
= objItem.Name </font>
<br><font size=2 face="sans-serif"> Status
= objItem.State </font>
<br><font size=2 face="sans-serif"> Disp_Name
= objItem.DisplayName</font>
<br><font size=2 face="sans-serif"> </font>
<br><font size=2 face="sans-serif"> For
Each Elt in Lst_Srv</font>
<br><font size=2 face="sans-serif">
If Elt = Service Then </font>
<br>
<br><font size=2 face="sans-serif">
If ((
IsActiveNode = 1 ) and ( Status = "Running" )) Then
</font>
<br><font size=2 face="sans-serif">
Msg_OK = "&" & Color_OK
& " The service " & Disp_Name & " is running
on the active node of the cluster " & Cluster & vbCRLF &
Msg_OK</font>
<br><font size=2 face="sans-serif">
Elseif
(( IsActiveNode = 0 ) and ( Status = "Stopped" )) Then</font>
<br><font size=2 face="sans-serif">
Msg_OK = "&" & Color_OK
& " The service " & Disp_Name & " is stopped
on the passive node of the cluster " & Cluster & vbCRLF &
Msg_OK</font>
<br><font size=2 face="sans-serif">
Else</font>
<br><font size=2 face="sans-serif">
ERROR = 1</font>
<br><font size=2 face="sans-serif">
If IsActiveNode = 1 Then</font>
<br><font size=2 face="sans-serif">
Msg_KO
= "&" & Color_KO & " The service " &
Disp_Name & " is " & Status & " on the active
node of the cluster " & Cluster & vbCRLF & Msg_KO</font>
<br><font size=2 face="sans-serif">
Else</font>
<br><font size=2 face="sans-serif">
Msg_KO
= "&" & Color_KO & " The service " &
Disp_Name & " is " & Status & " on the passive
node of the cluster " & Cluster & vbCRLF & Msg_KO</font>
<br><font size=2 face="sans-serif">
End If</font>
<br><font size=2 face="sans-serif">
End If</font>
<br><font size=2 face="sans-serif">
End If</font>
<br><font size=2 face="sans-serif"> Next</font>
<br><font size=2 face="sans-serif">Next</font>
<br>
<br>
<br>
<br><font size=2 face="sans-serif">Function Treatment(String)</font>
<br>
<br><font size=2 face="sans-serif"> Treatment
= Replace(Right(String,Len(String) - InStr(String,"=")),"""","")</font>
<br>
<br><font size=2 face="sans-serif">End Function </font>
<br>
<br><font size=2 face="sans-serif">'''''''''''''''''''''''</font>
<br><font size=2 face="sans-serif">'</font>
<br><font size=2 face="sans-serif">' Sending the alarm</font>
<br><font size=2 face="sans-serif">'</font>
<br><font size=2 face="sans-serif">'''''''''''''''''''''''</font>
<br>
<br>
<br><font size=2 face="sans-serif">If ( ERROR = 0 ) Then</font>
<br><font size=2 face="sans-serif"> Color
= Color_OK</font>
<br><font size=2 face="sans-serif"> Msg
= Msg_OK</font>
<br><font size=2 face="sans-serif">Else</font>
<br><font size=2 face="sans-serif"> If
InStr(Msg_KO,"red") > 0 Then</font>
<br><font size=2 face="sans-serif">
Color = "red"</font>
<br><font size=2 face="sans-serif"> Else</font>
<br><font size=2 face="sans-serif">
Color = "yellow"
</font>
<br><font size=2 face="sans-serif"> End
If</font>
<br><font size=2 face="sans-serif"> Msg
= Msg_KO & vbCRLF & Msg_OK</font>
<br><font size=2 face="sans-serif">End if</font>
<br><font size=2 face="sans-serif">Msg = Now() & vbCRLF & Msg</font>
<br>
<br><font size=2 face="sans-serif">'WScript.Echo Msg</font>
<br><font size=2 face="sans-serif">'WScript.Quit</font>
<br>
<br><font size=2 face="sans-serif">LifeTime = LifeTime * 3</font>
<br><font size=2 face="sans-serif">Cmd = Chr(34) & BB & Chr(34)
& " " & Srv & " status " & WshNetwork.ComputerName
& " " & Column & " " & Color &
" " & Chr(34) & MSG & Chr(34) & " "
& LifeTime</font>
<br>
<br><font size=2 face="sans-serif">On Error Resume Next</font>
<br><font size=2 face="sans-serif">Set ExecCmd = WshShell.Exec(Cmd)</font>
<br>
<br><font size=2 face="sans-serif">' Old version of VBS</font>
<br><font size=2 face="sans-serif">If Err.Number <> 0 Then</font>
<br><font size=2 face="sans-serif"> Return
= WshShell.Run("C:\progra~1\BBWin\bin\BBWinCmd.exe " & Srv
& " status " & WshNetwork.ComputerName & " "
& Column & " " & Color & " " &
Chr(34) & MSG & Chr(34) & " " & LifeTime, 0,
True)</font>
<br><font size=2 face="sans-serif">Else</font>
<br><font size=2 face="sans-serif"> Return
= ExecCmd.ExitCode</font>
<br><font size=2 face="sans-serif">End If</font>
<br>
<br><font size=2 face="sans-serif">On Error Goto 0</font>
<br>
<br>
<br><font size=2 face="sans-serif">If ( DebugLevel > 0 ) Then</font>
<br><font size=2 face="sans-serif"> If
( Return <> 0 ) Then</font>
<br><font size=2 face="sans-serif">
ObjectFileLog.WriteLine(Now() & "
" & Cmd & " Output error code: " & Return )</font>
<br><font size=2 face="sans-serif"> Else</font>
<br><font size=2 face="sans-serif">
if ( DebugLevel = 4 ) Then</font>
<br><font size=2 face="sans-serif">
ObjectFileLog.WriteLine(Now()
& " " & Cmd & " Output error code: " &
Return )</font>
<br><font size=2 face="sans-serif">
End if</font>
<br><font size=2 face="sans-serif"> End
if</font>
<br><font size=2 face="sans-serif">End if</font>
<br>
<br><font size=2 face="sans-serif">'''''''''''''''''''''''</font>
<br><font size=2 face="sans-serif">'</font>
<br><font size=2 face="sans-serif">' Destruction of Objects</font>
<br><font size=2 face="sans-serif">'</font>
<br><font size=2 face="sans-serif">'''''''''''''''''''''''</font>
<br><font size=2 face="sans-serif">' Objects of the test</font>
<br>
<br><font size=2 face="sans-serif">set objWMIService = Nothing</font>
<br><font size=2 face="sans-serif">set colItems = Nothing</font>
<br><font size=2 face="sans-serif">set objItem = Nothing</font>
<br>
<br>
<br>
<br><font size=2 face="sans-serif">' Std BBWin Objects</font>
<br>
<br>
<br><font size=2 face="sans-serif">if ( DebugLevel > 0 ) Then </font>
<br><font size=2 face="sans-serif"> ObjectFileLog.Close</font>
<br><font size=2 face="sans-serif"> set
ObjectFileLog = Nothing</font>
<br><font size=2 face="sans-serif">End if</font>
<br><font size=2 face="sans-serif">set ExecCmd = Nothing</font>
<br><font size=2 face="sans-serif">set WshNetwork = Nothing</font>
<br><font size=2 face="sans-serif">set WshShell = Nothing</font>
<br><font size=2 face="sans-serif">set Obj_FSO = Nothing
</font>
<br><font size=2 face="sans-serif">set xmlDoc
= Nothing </font>
<br><font size=2 face="sans-serif">set X
= Nothing </font>
<br>
<br><font size=2 face="sans-serif">Cordialement, Regards,Mit freundlichen
Grüßen,<br>
<br>
Gautier BEGIN<br>
<br>
Admin and Tools Team Lead<br>
CSC Computer Sciences Luxembourg S.A.<br>
12D Impasse Drosbach<br>
L-1882 Luxembourg<br>
<br>
Global Outsourcing Service | p:+352 24 834 276 | m:+352 621 229 172 | gbegin@csc.com
| </font><a href=www.csc.com><font size=2 face="sans-serif">www.csc.com</font></a><font size=2 face="sans-serif"><br>
<br>
<br>
CSC • This is a PRIVATE message. If you are not the intended recipient,
please delete without copying and kindly advise us by e-mail of the mistake
in delivery. NOTE: Regardless of content, this e-mail shall not operate
to bind CSC to any order or other contract unless pursuant to explicit
written agreement or government initiative expressly permitting the use
of e-mail for such purpose<br>
• <br>
CSC Computer Sciences SAS • Registered Office: Immeuble Le Balzac, 10
Place des Vosges, 92072 Paris La Défense Cedex, France • Registered in
France: RCS Nanterre B 315 268 664</font>
<br>
<br>
<br>
<br><font size=1 color=#5f5f5f face="sans-serif">From:
</font><font size=1 face="sans-serif">"Neil Simmonds"
<Neil.Simmonds@express-gifts.co.uk></font>
<br><font size=1 color=#5f5f5f face="sans-serif">To:
</font><font size=1 face="sans-serif">"Xymon mailinglist"
<xymon@xymon.com></font>
<br><font size=1 color=#5f5f5f face="sans-serif">Date:
</font><font size=1 face="sans-serif">09/18/2012 03:35 PM</font>
<br><font size=1 color=#5f5f5f face="sans-serif">Subject:
</font><font size=1 face="sans-serif">Re: [Xymon]
Windows services on a cluster.</font>
<br><font size=1 color=#5f5f5f face="sans-serif">Sent by:
</font><font size=1 face="sans-serif">xymon-bounces@xymon.com</font>
<br>
<hr noshade>
<br>
<br>
<br><font size=3>Hi Thomas,<br>
<br>
I looked at that and it doesn't really do what I want as it only differentiates
between red,blue,purple or green,yellow,clear. <br>
<br>
If it set different values for the different colours then it would be a
lot better. <br>
<br>
I think I might be able to do something with it, but it will mean changes
to some of my scripting. We have a script that alerts to tests that are
active but not in critical,cfg as we mainly use the critical view for our
operators so I just have to work out how to add the exclusions for svcs
column on the 2 servers I want to compare. If I do that I can happily have
them turning red and therefore use combo.cfg<br>
<br>
<br>
Not ideal in this situation but it looks like it's the most workable solution.<br>
<br>
Regards,<br>
Neil.<br>
<br>
> -----Original Message-----<br>
> From: Thomas Kähn [</font><a href=mailto:tkaehn@netcologne.de><font size=3>mailto:tkaehn@netcologne.de</font></a><font size=3>]<br>
> Sent: 18 September 2012 12:22<br>
> To: Neil Simmonds<br>
> Cc: Xymon mailinglist<br>
> Subject: Re: [Xymon] Windows services on a cluster.<br>
> <br>
> Hi Neil,<br>
> <br>
> On Tue, Sep 18, 2012 at 11:51:25AM +0100, Neil Simmonds wrote:<br>
> > Has anyone done anything in Xymon for monitoring windows services
across<br>
> > a cluster.<br>
> ><br>
> > I've got a set of services I need to monitor and as long as they
are<br>
> > running on one of 2 servers then all is OK.<br>
> <br>
> > I can't seem to find a way to do this in Xymon. Has anyone done<br>
> > something like this?<br>
> <br>
> I haven't tried myself. But you could try to use bbwin as client in<br>
> conjunction with the combostatus feature:<br>
> <br>
> </font><a href=http://bbwin.sourceforge.net/ target=_blank><font size=3 color=blue><u>http://bbwin.sourceforge.net/</u></font></a><font size=3>
<br>
> </font><a href=http://xymon.sourceforge.net/xymon/help/manpages/man5/combo.cfg.5.html target=_blank><font size=3 color=blue><u>http://xymon.sourceforge.net/xymon/help/manpages/man5/combo.cfg.5.html</u></font></a><font size=3>
<br>
> <br>
> Best regards<br>
> Thomas Kähn<br>
> --<br>
> Thomas Kähn<br>
> Technik, Network Engineering & Design; Content Delivery Platform
& IP<br>
> ---------------------------------------------------------------------<br>
> NETCOLOGNE Gesellschaft für Telekommunikation mbH<br>
> Am Coloneum 9 | 50829 Köln<br>
> <br>
> </font><a href=http://www.netcologne.de/ target=_blank><font size=3 color=blue><u>www.netcologne.de</u></font></a><font size=3>
<br>
> <br>
> Geschäftsführer:<br>
> Dr. Hans Konle (Sprecher)<br>
> Dipl.-Ing. Karl-Heinz Zankel<br>
> <br>
> Vorsitzender des Aufsichtsrates:<br>
> Dr. Andreas Cerbe<br>
> <br>
> HRB 25580, AG Köln<br>
> <br>
> <br>
> Diese Nachricht (inklusive aller Anhänge) ist vertraulich. Sollten<br>
> Sie diese Nachricht versehentlich erhalten haben, bitten wir, den<br>
> Absender (durch Antwort-E-Mail) hiervon unverzüglich zu informieren<br>
> und die Nachricht zu löschen. Die E-Mail darf in diesem Fall weder<br>
> vervielfältigt noch in anderer Weise verwendet werden.</font>
<p><font size=1>Name & Registered Office: EXPRESS GIFTS LIMITED, 2
GREGORY ST, HYDE, CHESHIRE, ENGLAND, SK14 4TH, Company No. 00718151.</font>
<p><font size=1>Express Gifts Limited is authorised and regulated by the
Financial Services Authority</font>
<p>
<hr>
<p><font size=1>NOTE: This email and any information contained within or
attached in a separate file is confidential and intended solely for the
Individual to whom it is addressed. The information or data included is
solely for the purpose indicated or previously agreed. Any information
or data included with this e-mail remains the property of Findel PLC and
the recipient will refrain from utilising the information for any purpose
other than that indicated and upon request will destroy the information
and remove it from their records. Any views or opinions presented are solely
those of the author and do not necessarily represent those of Findel PLC.
If you are not the intended recipient, be advised that you have received
this email in error and that any use, dissemination, forwarding, printing,
or copying of this email is strictly prohibited. No warranties or assurances
are made in relation to the safety and content of this e-mail and any attachments.
No liability is accepted for any consequences arising from it. Findel Plc
reserves the right to monitor all e-mail communications through its internal
and external networks. If you have received this email in error please
notify our IT helpdesk on +44(0) 1254 303030</font>
<p><font size=1> </font><tt><font size=2>_______________________________________________<br>
Xymon mailing list<br>
Xymon@xymon.com<br>
</font></tt><a href=http://lists.xymon.com/mailman/listinfo/xymon><tt><font size=2>http://lists.xymon.com/mailman/listinfo/xymon</font></tt></a><tt><font size=2><br>
</font></tt>
<p>