<!--
		on error resume next
		Dim checkForFlash6, flashObject, cycleVal
		checkForFlash6 = (IsObject(CreateObject("ShockwaveFlash.ShockwaveFlash.7")))
		
		flashObject = "<object type=""application/x-shockwave-flash"" data=""/flash/playcanopy.swf""  id=""playcanopy"" align=""center"" width=""760"" height=""250""><param name=""movie"" value=""/flash/playcanopy.swf"" /><param name=""menu"" value=""false"" /><param name=""wmode"" value=""transparent"" /><param name=""bgcolor"" value=""#ffffff"" /><param name=""quality"" value=""best"" /></object>"
		
		if checkForFlash6 = true then
		  document.write(flashObject)
		else
		  document.write("<a href=""http://www.macromedia.com/go/getflashplayer/"" target=""_blank""><img src=""/images/buttons/get_flashplayer.gif"" align=""right"" alt="""" title="""" border=""0"" /></a><div style=""background-color:#ffffff;height:30px;border-top:1px solid #000000;padding:7px;"">Por favor, descarga la &uacute;ltima versi&oacute;n de Macromedia Flash Player.&nbsp;&nbsp;</div>")
		end If
//-->