SISTEMA DE NOTICIAS ROTATIVO

<style type=[Ô]text/css[Ô]>
#noticia2, #noticia3, #noticia4, #noticia5 { display: none; }
</style>

<script type=[Ô]text/javascript[Ô]>
noticias = function() {                
this.quantidade = 5; // int        
this.intervalo = 2000; // seconds                
this.num = 1;        
this.start = false;        

function noticia() {                
if (this.num == 1) {                        
if (document.getElementById([ô]noticia[ô]+this.quantidade).style.display == [Ô]block[Ô]) {                                 
hideNoticia(this.quantidade);                        
}                
} else {                        
hideNoticia(this.num-1);                
}                
showNoticia(this.num);        
}                

function showNoticia(noticia) { 
document.getElementById([ô]noticia[ô]+noticia).style.display = [Ô]block[Ô];
}                
function hideNoticia(noticia) { 
document.getElementById([ô]noticia[ô]+noticia).style.display = [Ô]none[Ô];
}                
function rodaNoticia() {                
if (this.start && this.num < this.quantidade) {                        
this.num = this.num + 1;                
} else {                        
this.num = 1                
} 
                               
noticia();

this.start = true;        
}                

window.setInterval(rodaNoticia, this.intervalo);
}
window.onload = noticias;
</script>

<%
Set nt1 = Server.CreateObject([Ô]ADODB.Recordset[Ô])
nt1.Open [Ô]SELECT * from noticias order by id desc[Ô], DB
			
Contar = 0
numNoticia = 1
			
Do while not nt1.Eof
Topico = nt1([Ô]Topico[Ô])
Resumo = nt1([Ô]Resumo[Ô])
Classe1 = nt1([Ô]Classe1[Ô])
Classe = nt1([Ô]Classe[Ô])
Foto = nt1([Ô]Foto[Ô])
Horas = nt1([Ô]Horas[Ô])
id = nt1([Ô]id[Ô])
				
textoRes = Mid(Resumo, 1, 90)
				
if Foto <> [Ô]fotos/[Ô] then %>
				
<p align=[Ô]left[Ô] style=[Ô]margin-top: 0; margin-bottom: 0[Ô] id=[Ô]noticia<%Response.Write numNoticia%>[Ô]>
<a target=[Ô]conteudo[Ô] href=[ô]Mostra.asp?Noticias=<%=nt1([Ô]id[Ô])%>&Classe=<%=nt1([Ô]classe[Ô])%>[ô]>
<img src=[Ô]<%=nt1([Ô]foto[Ô])%>[Ô] width=[Ô]189[Ô] height=[Ô]158[Ô] border=[Ô]1[Ô]>
<font face=[Ô]Arial[Ô] color=[Ô]red[Ô] style=[Ô]font-size:8pt;[Ô]><strong><%Response.Write topico%></strong></font><br>
<font face=[Ô]Arial[Ô] color=[Ô]black[Ô] style=[Ô]font-size:6pt;[Ô]><strong><%Response.Write textoRes&[Ô]...[Ô]%></strong></font></a></p> 
		  
<%
numNoticia = numNoticia + 1
end if
nt1.Movenext
Loop
%>