USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Dicas

  ASP - Active Server Page    (Miscelâneas)

Título da Dica:  Títulos animados
Postada em 13/10/2003 por Tekki            
<HTML>
<HEAD>
<TITLE>Title Animations</TITLE>
</HEAD>
<Script Language="Javascript">

bname=navigator.appName;
bversion=parseInt(navigator.appVersion)
if ((bname=="Netscape" && bversion>=4) || (bname=="Microsoft Internet Explorer" && bversion>=4)){
if (bname=="Netscape"){
brows=true
del=30
}
else{
brows=false
del=80
}
var msg=0;
var z=0;
var timer1;
var message= new Array();
var color= new Array();
var values= new Array('-6','-5','-4','-3','-2','-1','+1','+2','+3','+4','+5','+6')


message[0]='Titulos animados'
color[0]='#FF0000'

message[1]='Com JavaScript'
color[1]='#0000FF'

message[2]='www.vbweb.com.br'
color[2]='#FFFF00'

message[3]='Seu site de VB, VB.Net e Asp'
color[3]='#FFFFFF'

message[4]='Netscape 4 and Internet Explorer 4 supported'
color[4]='#00FF00'



function start(){
if ((bname=="Netscape" && bversion>=4) || (bname=="Microsoft Internet Explorer" && bversion>=4)){
if(z<values.length){
if (brows){
document.layers['text'].document.writeln('<P Class="main" Align="Center"><font color="'+color[msg]+'" size="'+values[z]+'" face="Arial"><NOBR>'+message[msg]+'</NOBR></font></P>')
document.layers['text'].document.close();
}
else{
text.innerHTML='<Pre><P Class="main" Align="Center"><font color="'+color[msg]+'" size="'+values[z]+'" face="Arial"><NOBR>'+message[msg]+'</NOBR></font></P></Pre>'
}
z++;
timer1=window.setTimeout('start()',del)
}
else
chg();
}
}
function stop(){
if ((bname=="Netscape" && bversion>=4) || (bname=="Microsoft Internet Explorer" && bversion>=4))
window.clearTimeout(timer1);
window.clearTimeout(timer2);
}

function chg(){
if (brows){
document.layers['text'].document.writeln('')
document.layers['text'].document.close();
}
else
text.innerHTML='';
if(msg<message.length-1){
msg++;
}
else
msg=0;
z=0;
timer2=window.setTimeout('start()',1000)
}
}


</Script>

<BODY BGCOLOR="#000000" LINK="#FF0000" VLINK="#FF0000" ALINK="#FFFF00" TEXT="#000000" onLoad="start()" onUnload="stop()">
<Div id="text" style="position: absolute; left: 4; top: 80">
</Div>
<Layer name="text" left=4 top=80>
</Layer>
</HTML>
 


CyberWEB Network Ltda.    © Copyright 2000-2018   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página