The following script uses two other applications:

BMail - A command line SMTP mailing tool
Uptime - Allows you to estimate Server availability

Full credit to Craig Peacock for BMail.

Here is the script:

;===============================================
;===============================================
;
; Clear Existing Uptime Report
;
;===============================================
;===============================================

IF EXIST ("Report")
DEL "Report\*.txt"
ENDIF

;===============================================
;===============================================
;
; Produce Uptime Report
;
;===============================================
;===============================================

;Convert YYYY/MM/DD to DD-MM-YYYY
$temp = @DATE
$todaysdate = SUBSTR($temp, 9, 2)
$todaysdate = $todaysdate + "-" + SUBSTR($temp, 6, 2)
$todaysdate = $todaysdate + "-" + SUBSTR($temp, 1, 4)

;Array containing server names
Dim $ComputerNames[5]
$ComputerNames[0] = "Server01"
$ComputerNames[1] = "Server02"
$ComputerNames[2] = "Server03"
$ComputerNames[3] = "Server04"
$ComputerNames[4] = "Server05"

;If Report directory doesn't exist then create it
IF NOT EXIST ("Report")
MD "Report"
ENDIF

;Output uptime report for all computers in the array
For Each $Element In $ComputerNames

IF $Element = ""
GoTo "Email"
ENDIF

shell "%comspec% /c " + chr(34) + "Uptime.exe" + " " + $Element + " " + chr(34) + " /s /p:31 >> Report\$todaysdate-UptimeReport.txt"
shell "%comspec% /c echo. >> Report\$todaysdate-UptimeReport.txt"
shell "%comspec% /c echo. >> Report\$todaysdate-UptimeReport.txt"
shell "%comspec% /c echo ******************************************************************************** >> Report\$todaysdate-UptimeReport.txt"
shell "%comspec% /c echo ******************************************************************************** >> Report\$todaysdate-UptimeReport.txt"
shell "%comspec% /c echo ******************************************************************************** >> Report\$todaysdate-UptimeReport.txt"
shell "%comspec% /c echo. >> Report\$todaysdate-UptimeReport.txt"
shell "%comspec% /c echo. >> Report\$todaysdate-UptimeReport.txt"

Next

:Email
;===============================================
;===============================================
;
; Email Uptime Report
;
;===============================================
;===============================================

$emailserver = "someemailserver"
$toaddress = "james" + chr(64) + "somedomain.com"
$fromaddress = "uptime" + chr(64) + "somedomain.com"
$subject = "Uptime Report For all London Servers"

;Form email command
$emailcommand = "bmail -s " + $emailserver + " -t " + $toaddress + " -f " + $fromaddress + " -h -a " + chr(34) + $subject + chr(34) + " -m " + "Report\" + $todaysdate + "-UptimeReport.txt" + " -c"

RUN ($emailcommand)

;===============================================

The script works by generating a file that contains the results of uptime.exe for each server specified. The contents of the file are then emailed using bmail.

This script obviously requires a few variables to be modified to get it to work in another environment. The following will need to be altered:

Dim $ComputerNames[5] - you will need to change the numeric value to the number of servers you want to generate a report for

NOTE: the example above is for 5 servers. If you wanted to monitor 4 servers then you will need to modify the array to change the number of elements to 4. So your array would look like (the last line has been removed):

$ComputerNames[0] = "Server01"
$ComputerNames[1] = "Server02"
$ComputerNames[2] = "Server03"
$ComputerNames[3] = "Server04"

$ComputerNames[0] = "Server01" - you need to change Server01 to the server you want to generate a report for
$emailserver - the name of your email server (the server running this script must be allowed to relay through it)
$toaddress - the address you want the email alert to go to
$fromaddress - the (spoof) address you want the email to appear to come from
$subject - the subject line of the email

I use a scheduled task on a Windows Server 2003 to run this script once a month. It generates a report for the last 31 days of uptime for each server in the array and then emails me the report.

NOTE: you can change 31 day period that the script gathers uptime information for by modifying /p:31 on the following line:

(31 represents the number of days in the past to gather uptime statistics for)

shell "%comspec% /c " + chr(34) + "Uptime.exe" + " " + $Element + " " + chr(34) + " /s /p:31 >> Report\$todaysdate-UptimeReport.txt"

To use this:

1) Save the above script as kixtart.kix in a directory containing the kixtart application
2) Save bmail.exe and uptime.exe (available from the links above) in the same directory
3) Modify variables as appropriate
4) Make sure that the server running the script can relay email through your email server
5) Test by running the script manually and/or create the scheduled task

Alternatively, download the above script and necessary files - HERE

The end result is an email with a breakdown of uptime availability for each server including any dates and times where necessary.

Rather than spending money on the software and licensing required to upgrade both Oracle and the Operating System (as it's being replaced anyway) the company made a decision to live with the issue for the time being. I decided to write a KiXtart script to monitor the website and let me know of any issues it may incur.

The following script uses two other applications:

BMail - A command line SMTP mailing tool
WebResult - A command line URL result code tool

Full credit to Craig Peacock for BMail and John Mueller for WebResult.

Here is the script:

;===============================================
;===============================================
;
; Remove temp files
;
;===============================================
;===============================================

IF EXIST ("result.txt")
DEL ("result.txt")
ENDIF

IF EXIST ("status.txt")
DEL ("status.txt")
ENDIF

;===============================================
;===============================================
;
; Check/record http status in result.txt
;
;===============================================
;===============================================

$website = "http://www.jjclements.co.uk"

SHELL "%comspec% /c " + chr(34) + "webresult.exe " + $website + chr(34) + " >> result.txt"

;===============================================
;===============================================
;
; Open result.txt and read into variable
;
;===============================================
;===============================================

getfilecontents("result.txt")

;===============================================
;===============================================
;
; Explode variable into array
;
;===============================================
;===============================================

$myarray = SPLIT ($result, " ", -1)

;===============================================
;===============================================
;
; Declare global variable to store desc
;
;===============================================
;===============================================

$errordesc = ""

;===============================================
;===============================================
;
; Check each array element against codes
;
;===============================================
;===============================================

$element = $myarray[1]
SELECT

CASE $element = "0"
$errordesc = "The current status is: Error " + $element + " - Website Unavailable"

CASE $element = "400"
$errordesc = "The current status is: Error " + $element + " - Bad Request"

CASE $element = "403"
$errordesc = "The current status is: Error " + $element + " - Forbidden"

CASE $element = "404"
$errordesc = "The current status is: Error " + $element + " - Not Found"

CASE $element = "405"
$errordesc = "The current status is: Error " + $element + " - Method Not Allowed"

CASE $element = "406"
$errordesc = "The current status is: Error " + $element + " - Not Acceptable"

CASE $element = "408"
$errordesc = "The current status is: Error " + $element + " - Request Timeout"

CASE $element = "409"
$errordesc = "The current status is: Error " + $element + " - Conflict"

CASE $element = "410"
$errordesc = "The current status is: Error " + $element + " - Gone"

CASE $element = "500"
$errordesc = "The current status is: Error " + $element + " - Internal Server Error"

CASE $element = "501"
$errordesc = "The current status is: Error " + $element + " - Not Implemented"

CASE $element = "502"
$errordesc = "The current status is: Error " + $element + " - Bad Gateway"

CASE $element = "503"
$errordesc = "The current status is: Error " + $element + " - Internal Server Error"

CASE $element = "504"
$errordesc = "The current status is: Error " + $element + " - Gateway Timeout"

CASE $element = "505"
$errordesc = "The current status is: Error " + $element + " - HTTP Version not supported"

CASE 1
EXIT

ENDSELECT

;===============================================
;===============================================
;
; Threshold - Times to retry + interval
;
;===============================================
;===============================================

$numberofretries = "2"
$latencyseconds = "10"

IF $numberofretries > "0"

DO

SLEEP $latencyseconds

IF EXIST ("result.txt")
DEL ("result.txt")
ENDIF

SHELL "%comspec% /c " + chr(34) + "webresult.exe " + $website + chr(34) + " >> result.txt"

getfilecontents("result.txt")

$mytemparray = SPLIT ($result, " ", -1)

$tempelement = $mytemparray[1]

IF NOT $element = $tempelement
EXIT
ENDIF

$currentretry = $currentretry + 1

UNTIL $numberofretries = $currentretry

ENDIF

;===============================================
;===============================================
;
; Email Server Status
;
;===============================================
;===============================================

$emailserver = "someemailserver"
$toaddress = "james" + chr(64) + "somedomain.com"
$fromaddress = "serverfailure" + chr(64) + "somedomain.com"
$subject = "Server Issue"

;Form email body
shell "%comspec% /c echo. >> status.txt"
shell "%comspec% /c echo. >> status.txt"
shell "%comspec% /c echo WebServer is currently offline >> status.txt"
shell "%comspec% /c echo. >> status.txt"
shell "%comspec% /c echo " + $errordesc + " >> status.txt"
shell "%comspec% /c echo. >> status.txt"
shell "%comspec% /c echo Please restart the WebServer application to ensure SLAs are adhered to! >> status.txt"

;Form email command
$emailcommand = "bmail -s " + $emailserver + " -t " + $toaddress + " -f " + $fromaddress + " -h -a " + chr(34) + $subject + chr(34) + " -m " + "status.txt" + " -c"

SHELL ($emailcommand)

;=======================================
; Get File Contents
;=======================================

Function getfilecontents($filesource)

OPEN (1, "$filesource")
$result = READLINE (1)
CLOSE (1)

EndFunction

;=======================================

This script obviously requires a few variables to be modified to get it to work in another environment. The following will need to be altered:

$website - you will need to enter your own website you want to monitor here (you must use http://)
$numberofretries - the number of times the script will test the website before emailing an error
$latencyseconds - the time in seconds before each retry (if $numberofretries is NOT set to 0)
$emailserver - the name of your email server (the server running this script must be allowed to relay through it)
$toaddress - the address you want the email alert to go to
$fromaddress - the (spoof) address you want the email to appear to come from
$subject - the subject line of the email

The only other thing you may want to change is the message contained within the email (underneath ';Form email body'). I have a few instances of this script monitoring different servers so I have customised the email body for each server to inform me of the server name and IP address etc.

As mentioned the script makes use of a threshold although it isn't used if you set $numberofretries = "0". The threshold sets the number of times to try the website before sending an email. You can also set the delay between each retry (in seconds) by setting a value for $latencyseconds.

I use a scheduled task on a Windows Server 2003 to run this script every 5 minutes. When there is a problem with the web application I am alerted to it and can respond as necessary. One thing to be aware of, if you set your scheduled task to run every 5 minutes but you set the script to retry say 3 times with a latency of 120 seconds (total 360 seconds - 6 minutes) then the scheduled task will try to run again before the script has finished causing problems.

To use this:

1) Save the above script as kixtart.kix in a directory containing the kixtart application
2) Save webresult.exe and bmail.exe (available from the links above) in the same directory
3) Modify variables as appropriate
4) Make sure that the server running the script can relay email through your email server
5) Test by running the script manually and/or create the scheduled task

Alternatively, download the above script and necessary files - HERE

The end result is an email that tells you the exact http error code and description when your web application becomes unavailable and meets any threshold that may be set.