<!--
		on error resume next
		Dim checkForFlash6, flashObject, cycleVal
		checkForFlash6 = (IsObject(CreateObject("ShockwaveFlash.ShockwaveFlash.6")))
		
		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 checkForFlash6 = true then
		  document.write(flashObject)
		else
		  document.write("<div><img src=""/images/header_alt.jpg"" height=""100"" align=""bottom"" border=""0"" style=""border:0px;"" /></div>")
		end If
//-->
