<% CodBanSwf = BuscaValDB("SELECT Cod FROM Site_Municipios WHERE MostrarBanner = true AND atv = true AND Lcase(ArquivoBannerExt) = 'swf'") if Not isNull(CodBanSwf) then %> <% else %> <%=BanSlide("BanTopo", "Site_Municipios.ArquivoBanner", Rq("w"), Rq("h"), "crop")%> <% end if %>