Ver Mensaje Individual
  #9 (permalink)  
Antiguo 30/09/2004, 19:36
Avatar de Larc
Larc
 
Fecha de Ingreso: octubre-2003
Ubicación: Mexico
Mensajes: 259
Antigüedad: 21 años, 2 meses
Puntos: 0
bueno al parecer no fue tan dificil aqui esta el codigo solo de las etiquetas head y si lo quieres dentro de tu sitio :



Código:
<script>

function detenerError(){

return true
}
window.onerror=detenerError
</script>
<head>
<!--
function MM_reloadPage(init) {  
  if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
    document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
  else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);
//-->
</script>
 <script language=VBScript>
   <!--
   Dim Bar, Line, SP
   Bar = 0 
   Line = "|"
   sP = 250
   
   Function Window_onLoad()
     Bar = 95
     sP = 10
   END Function
   
   Function Count()
   If Bar < 100 Then
      Bar = Bar + 1
      Window.Status = " C a r g a n d o   p á g i n a   . . . " & Bar & "%" & " " & String(Bar, Line)
      setTimeout "Count()", SP
   Else
      Window.Status = "Aqui escribe el nombre que quieras"
      Document.Body.Style.Display = "" 
   End If 
   End Function
   
   Call Count()
   -->
   </script>



suerte .
__________________
Quien parte de las sombras y se levanta como un muerto brillando como una estrella sobre èl (towlen), entre la oscuridad congelante y la luz.
LÄRÇ :serio: