<!--
		on error resume next
		Dim checkForFlash5, flashObject, cycleVal
		checkForFlash5 = (IsObject(CreateObject("ShockwaveFlash.ShockwaveFlash.5")))
		
		flashObject = "<object type=""application/x-shockwave-flash"" data=""/flash/header.swf"" width=""980"" height=""100""><param name=""movie"" value=""/flash/header.swf"" /><param name=""wmode"" value=""transparent"" /><param name=""menu"" value=""false"" /></object>"
		
		if checkForFlash5 = true then
		  document.write(flashObject)
		else
		  document.write("<div><img src=""/images/header_alt.jpg"" height=""130"" align=""bottom"" border=""0"" style=""border:0px;"" /></div>")
		end If
//-->