	addLoadEvent(correctPNG)			
			
	// ***************************************************************************************************************************************************
	// checkEmail(String email address) returns boolean if valid/invalid email
	// ***************************************************************************************************************************************************
		function checkEmail(szEmail) {
			// Checks the passed field value and makes sure its a valid email address.
						
			// var szEmail = oEmailField.value
			var bEmailValid = false
			var bBadFlag = false
			var szUsername = ""
			var szDomain = ""
			var b1 = false
			var b2 = false
			var b3 = false
			var b4 = false
						
			if ((szEmail != "") && (InStr(szEmail,"@") > -1) && (InStr(szEmail,".") > -1)) {
				var iAtCount = 0
				var bSpecialFlag = false
				var szAtChr = ""
							
				for (var iAtLoop = 0; iAtLoop <= Len(szEmail); iAtLoop++) {
					szAtChr = Mid(szEmail, iAtLoop, 1)
								
					if (szAtChr == "@") {iAtCount++}
					if ((szAtChr >= Chr(32)) && (szAtChr <= Chr(44))) {bSpecialFlag = true; b1 = true}
					if ((szAtChr == Chr(47)) || (szAtChr == Chr(96)) || (szAtChr >= Chr(123))) {bSpecialFlag = true; b2 = true}
					if ((szAtChr >= Chr(58)) && (szAtChr <= Chr(63))) {bSpecialFlag = true; b3 = true}
					if ((szAtChr >= Chr(91)) && (szAtChr <= Chr(94))) {bSpecialFlag = true; b4 = true}
				}	
							
				if ((iAtCount == 1) && (bSpecialFlag == false)) {
					arrEmail = Split(szEmail, "@")
					szUsername = arrEmail[0]
					szDomain = arrEmail[1]
								
					// if user or domain empty, bad
					if ((szUsername == "") || (szDomain == "") || (szUsername == undefined) || (szDomain == undefined)) {bBadFlag = true}
								
					// if "." first character of domain, bad
					if (Mid(szDomain, 0, 1) == ".") {bBadFlag = true}
								
					// if no "." in domain, bad
					if (InStr(szDomain, ".") <= 0) {bBadFlag = true}
								
					// if "." at end of domain, bad
					if (Mid(szDomain, Len(szDomain)-1, 1) == ".") {bBadFlag = true}
								
					bEmailValid = true }
								
				else if (iAtCount == 0) {
					// no @ symbols, bad
					bBadFlag = true
				}
			}
						
			if (bBadFlag) {
				bEmailValid = false }
			else {
				bEmailValid = true
			}
						
			return bEmailValid;
		}
	// ***************************************************************************************************************************************************
	
	
	
	
	
	// ***************************************************************************************************************************************************
	// addLoadEvent (function name) run the specified function on page load
	// ***************************************************************************************************************************************************			
			function addLoadEvent(func) {
				var oldonload = window.onload;
				if (typeof window.onload != 'function') {
					window.onload = func;
				} else {
					window.onload = function() {
						if (oldonload) {
							oldonload();
						}
						func();
					}
				}
			}
	// ***************************************************************************************************************************************************
	
	
	
	
	
	// ***************************************************************************************************************************************************
	// createFlash - create a flash object through javascript to avoid he whole 'click to activate' crap
	// ***************************************************************************************************************************************************			
			function createFlash(szMovieName, szWidth, szHeight) {

				//	var objHTML = '<object id="obj1" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,40,0" border="0" width="' + szWidth + '" height="' + szHeight + '">'
				//	objHTML += '<param name="movie" value="' + szMovieName + '"><param name="quality" value="High">'
				//	objHTML += '<param name="wmode" value="transparent">'
				//	objHTML += '<embed src="' + szMovieName + '" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" name="obj1" width="' + szWidth + '" height="' + szHeight + '" quality="High" wmode="transparent"></object>'

				var objHTML = '<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=7,0,19,0" width="' + szWidth + '" height="' + szHeight + '">'
				objHTML += '<param name="movie" value="' + szMovieName + '" />'
				objHTML += '<param name="quality" value="high" />'
				objHTML += '<param name="scale" value="noscale" />'
				objHTML += '<embed src="' + szMovieName + '" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" width="' + szWidth + '" height="' + szHeight + '"></embed>'
				objHTML += '</object>'
				
				//the next line needs to be in an external file
				// document.getElementById(szContainer).innerHTML = objHTML;
				document.write(objHTML);
			}
	// ***************************************************************************************************************************************************




			
	// ***************************************************************************************************************************************************
	// correctPNG - sort the non transparent PNG problem in old IEs
	// ***************************************************************************************************************************************************
			function correctPNG() { // correctly handle PNG transparency in Win IE 5.5 & 6.
			   var arVersion = navigator.appVersion.split("MSIE")
			   var version = parseFloat(arVersion[1])
			   if ((version >= 5.5) && (document.body.filters)) 
			   {
			      for(var i=0; i<document.images.length; i++)
			      {
			         var img = document.images[i]
			         var imgName = img.src.toUpperCase()
			         if (imgName.substring(imgName.length-3, imgName.length) == "PNG")
			         {
			            var imgID = (img.id) ? "id='" + img.id + "' " : ""
			            var imgClass = (img.className) ? "class='" + img.className + "' " : ""
			            var imgTitle = (img.title) ? "title='" + img.title + "' " : "title='" + img.alt + "' "
			            var imgStyle = "display:inline-block;" + img.style.cssText 
			            
			            if (img.align == "left") imgStyle = "float:left;" + imgStyle
			            if (img.align == "right") imgStyle = "float:right;" + imgStyle
			            if (img.parentElement.href) imgStyle = "cursor:hand;" + imgStyle
			            
			            var strNewHTML = "<span " + imgID + imgClass + imgTitle
							+ " style=\"" + "width:" + img.width + "px; height:" + img.height + "px;" + imgStyle + ";"
							+ "filter:progid:DXImageTransform.Microsoft.AlphaImageLoader"
							+ "(src=\'" + img.src + "\', sizingMethod='scale');\"></span>" 
						
						img.outerHTML = strNewHTML
						i = i-1
			         }
			      }
			   }    
			}
	// ***************************************************************************************************************************************************