List Server Load and Send Alert by Email
This VBScript is to query ServerLoad of all servers and send alert by email to administrator if serverload is higher than 9000. In a farm of multiple zones, you need to have "Share zone load information" ticked for the script to get ServerLoad across zones.
Description
Citrix administrators may be entangled in multiple Load Evaluators created by different administrators. When Server Load reaches 10000, user will get "resource not available" warning, but not explicitly mention Server Load. This script is to help Citrix admins to locate the issue quickly.
Apr 03, 2008: Borrowed a piece of code to ping the server before retrieving the Server Load. This prevents the Data Store to give wrong server load when the server is not responsive. Also added a brief readme.txt within the zip package.
Download
Code Snippet
Please any code snippet which might be useful for the user to better understand the script.
Disclaimer
These software applications are provided to you as is with no representations, warranties or conditions of any kind. You may use and distribute it at your own risk. CITRIX DISCLAIMS ALL WARRANTIES WHATSOEVER, EXPRESS, IMPLIED, WRITTEN, ORAL OR STATUTORY, INCLUDING WITHOUT LIMITATION WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE, TITLE AND NONINFRINGEMENT. Without limiting the generality of the foregoing, you acknowledge and agree that (a) the software application may exhibit errors, design flaws or other problems, possibly resulting in loss of data or damage to property; (b) it may not be possible to make the software application fully functional; and (c) Citrix may, without notice or liability to you, cease to make available the current version and/or any future versions of the software application. In no event should the code be used to support of ultra-hazardous activities, including but not limited to life support or blasting activities. NEITHER CITRIX NOR ITS AFFILIATES OR AGENTS WILL BE LIABLE, UNDER BREACH OF CONTRACT OR ANY OTHER THEORY OF LIABILITY, FOR ANY DAMAGES WHATSOEVER ARISING FROM USE OF THE SOFTWARE APPLICATION, INCLUDING WITHOUT LIMITATION DIRECT, SPECIAL, INCIDENTAL, PUNITIVE, CONSEQUENTIAL OR OTHER DAMAGES, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGES. You agree to indemnify and defend Citrix against any and all claims arising from your use, modification or distribution of the code.
Comments (9)
Apr 02, 2008
Vishal Ganeriwala says:
great script. I will test it out today. Thanks for your contribution Ping Zhang ...great script. I will test it out today. Thanks for your contribution Ping Zhang
Vishal
Apr 02, 2008
Vishal Ganeriwala says:
just tried the script. It works like a charm. Thanksjust tried the script. It works like a charm.
Thanks
Apr 03, 2008
Ping Zhang says:
Thanks. Just added "ping" function to preventing retrieving Server Load from unr...Thanks. Just added "ping" function to preventing retrieving Server Load from unresponsive servers. Each "ping" will try twice. This will make the script run longer, but more accurate.
Apr 03, 2008
Anonymous says:
thanks ping..Good workthanks ping..Good work
May 07, 2008
Anonymous says:
Hi! Nice script, why not use the onlineservers attribute instead of ping? ...Hi!
Nice script, why not use the onlineservers attribute instead of ping?
Example...
set objZone = CreateObject("MetaFrameCOM.MetaFrameZone")
objZone.Initialize strZone
for each aserver in objZone.OnlineServers
May 08, 2008
Ping Zhang says:
Thanks for update, I have adopted this, much better coding. Set theFarm = Crea...Thanks for update, I have adopted this, much better coding.
Jun 13, 2008
Anonymous says:
Thanks for the work. I was trying to adapt this to use in a VB program in Excel ...Thanks for the work. I was trying to adapt this to use in a VB program in Excel but my program was failing when it tried to capture the serverload. After reviewing your code I discovered your On Error Resume. When the load value is null the script generates an error but your On Error line bypasses it.
Sometimes the simple things take the longest time to figure out. Thx. Brian
Jul 18, 2008
Calvin Nghe says:
The link does not work anymore...does anyone have a copy of it?The link does not work anymore...does anyone have a copy of it?
Jul 21, 2008
Joachim Piel says:
Hi Calvin, why do you get it then not from this site here?? Right above you have...Hi Calvin, why do you get it then not from this site here?? Right above you have "Page Tools", dropdown and take "Attachement" . There it is...