Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

Gdias

Rotina de banners Randomicos

Recommended Posts

Salve amigos,

 

Fiz uma rotina pegando um pedaço aqui e outro ali e misturando com ASP, puxo da tabela os banners existentes e gero um randomico, mas acontece que no FF não funciona... alguém pode me dar uma luz?

 

      <% 'espaço 1
	 	 Set objRS_ESPACO1 = Server.CreateObject("ADODB.Recordset")
		     MySQL_ESPACO1 = "SELECT * FROM TB_PATROCINADOR_BANNER_ONDE where FK_CATEGORIA = "&vPK_CATEGORIA&" and QL_ESPACO = '1' and ST_PUBLICACAO = 'pp' and TP_PATROCINIO = 'Patrocínio' " 
		     objRS_ESPACO1.Open MySQL_ESPACO1, con1, 3
      
         if objRS_ESPACO1.RecordCount > 0 then
      %>   
      
		<script> 
		  imagens1 = new Array();
		  links1 = new Array(); 
						    
		  <%a = 0
			  while not objRS_ESPACO1.eof

			 Set objRS_BANNER1 = Server.CreateObject("ADODB.Recordset")
			     MySQL_BANNER1 = "SELECT * FROM TB_PATROCINADOR_BANNER where PK_BANNER = "&objRS_ESPACO1("FK_BANNER")&" "
			     objRS_BANNER1.Open MySQL_BANNER1, con1, 3

		 
				   LNK_BANNER1 = objRS_BANNER1("LNK_Banner")
				   NM_BANNER1  = objRS_BANNER1("IMG_Banner")

		  %>  
						    
		  imagens1[<%=a%>]="ADM/static/imagens/banners/<%=NM_Banner1%>"; 
		  links1[<%=a%>] = "<%=LNK_BANNER1%>"; 
						    
		  <%objRS_ESPACO1.MoveNext
			    a = a + 1
			wend
		  %>  
						    
		  var b;
		  b=0; 

		  function troca1(){ 
			       if (b==imagens1.length){ 
				       b=0; 
				      } 
				      document.getElementById('img1').src=imagens1[b]; 
					  document.getElementById('banner1').href=links1[b]; 
					   b++; 
				   }
		</script>                
		                
		<a id="banner1" target="_blank">
		   <img id="img1" src="ADM/static/imagens/banners/<%=NM_Banner1%>" border="0">
		   <script> 
			setInterval('troca1()',5000) 
		   </script> 
		</a>
                  
      <%
         end if

         objRS_ESPACO1.Close
         Set objRS_ESPACO1 = nothing  
         
         objRS_BANNER1.Close
         Set objRS_BANNER1 = nothing  
                
      %>   

agradeço desde já

 

Abraços

Gustavo

Compartilhar este post


Link para o post
Compartilhar em outros sites

Nos informe um link para sua página, pois muitas vezes não temos como testar os códigos ASP localmente (e nem conseguiríamos nesse caso devido ao banco de dados)... E se tivermos acesso à página podemos identificar facilmente se é um problema com JS mesmo ou não...

 

 

http://forum.imasters.com.br/public/style_emoticons/default/joia.gif

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.