// check for Flash on IE 
		       on error resume next 
		       //set a variable to hold the detection result 
		       Dim checkForFlash6   
			   Dim text
			   
			   text = "<h1 class=""subHeading2"" id=""centered"">Macromedia Flash is not installed on your computer!</h1>"
			   text = text &  "<p class=""mainText"" id=""centered"">Please click <a href=""http://www.macromedia.com/go/getflashplayer"">here</a> to be redirected to the Macromedia Website for further instructions. Thank you.</p>"
		       //assign a boolean value 
		       checkForFlash6 = (IsObject(CreateObject("ShockwaveFlash.ShockwaveFlash.6"))) 
		       if checkForFlash6 = true then 
		          document.write("<object classid=""clsid:D27CDB6E-AE6D-11cf-96B8-444553540000"" codebase=""http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,29,0"" width=""589"" height=""341""><param name=""movie"" value=""swf/intl_home.swf""><param name=""menu"" value=""false""><param name=""quality"" value=""high""><embed src=""swf/intl_home.swf"" quality=""high"" pluginspage=""http://www.macromedia.com/go/getflashplayer"" type=""application/x-shockwave-flash"" width=""589"" height=""341""></embed></object>") 
		       else 
		          document.write("<br><br><br><br><br><br>" & text) 
		       end If