<script>
<! -
/ / Copyright (c) 1996-1997 Shiran Tomer. Todos los derechos reservados.
/ / Le dé permiso para usar el script que dicho anuncio se mantiene tal cual.
/ / Scripts adicionales pueden ser encontrados en la yehuda http://www.geocities.com/ ~ /

/ / Variable Boolean especificado si la alerta se debe mostrar si excede cookie 4KB
precaución var = false

/ / Nombre - nombre de la cookie
/ / Valor - el valor de la cookie
/ / [Caduca] - fecha de caducidad de la cookie (por defecto al final de la sesión actual)
/ / [Ruta] - ruta de acceso para que la cookie es válida (por defecto a la ruta de llamar documento)
/ / [Dominio] - dominio para el que la cookie es válida (por defecto es de dominio de llamar documento)
/ /] [Segura - Valor booleano que indica si la transmisión de cookies requiere una transmisión segura
/ / * De incumplimiento de un argumento cuando se asigna NULL como marcador de posición
/ / * Un marcador de posición nula no es necesaria para los argumentos omitidos final
setCookie función (nombre, valor, expira, la ruta, dominio, seguro) (
curCookie var = name + "=" + escape (valor) +
((Expira)? "; Expira =" expires.toGMTString + (): "") +
((Path)? "Path =" + ruta de acceso: "") +
((Dominio)? "; = Dominio" dominio +: "") +
((Seguro)? "Seguro": "")
if (! precaución | | (+ nombre "=" + escape (valor)). longitud <= 4000)
document.cookie = curCookie
más
if (confirm ("Cookie supera 4 KB y se corte!"))
document.cookie = curCookie
)

/ / Nombre - nombre de la cookie deseada
/ / * Declaración de cadena que contiene el valor de la cookie especificada cookie o null si no existe
getCookie función (nombre) (
prefijo var = nombre + "="
cookieStartIndex var = document.cookie.indexOf (prefijo)
if (cookieStartIndex == -1)
return null
cookieEndIndex var = document.cookie.indexOf (";", cookieStartIndex prefix.length +)
if (cookieEndIndex == -1)
cookieEndIndex = document.cookie.length
unescape retorno (document.cookie.substring (+ cookieStartIndex prefix.length, cookieEndIndex))
)

/ / Nombre - nombre de la cookie
/ / [Ruta] - ruta de la cookie (debe ser el mismo que ruta de acceso utilizada para crear cookie)
/ / [Dominio] - dominio de la cookie (debe ser el mismo que dominio utilizado para crear cookie)
/ / * Ruta de acceso y de dominio si se ha asignado por defecto nulo o omitido si no hay argumento explícito producto
función deleteCookie (nombre, ruta, dominio) (
if (getCookie (nombre)) (
document.cookie = nombre + "=" +
((Path)? "Path =" + ruta de acceso: "") +
((Dominio)? "; = Dominio" dominio +: "") +
"Expira = Thu, 01-Ene-70 00:00:01 GMT"
)
)

/ / Fecha - cualquier instancia del objeto Date
/ / * Que debe entregar todas las instancias del objeto Date a esta función de "reparaciones"
/ / * Esta función procede del capítulo 14, "hora y fecha en JavaScript", en "Aprender de programación avanzados de JavaScript"
fixDate función (fecha) (
base var = new Date (0)
sesgar var = base.getTime ()
if (sesgo> 0)
date.setTime (date.getTime () - inclinación)
)

var ahora = new Date ()
fixDate (ahora)
now.setTime (now.getTime () + 31 * 24 * 60 * 60 * 1000)
var nombre = getCookie ("nombre")
if (! nombre)
nombre = prompt ("Por favor, ingrese su nombre:", "John Doe")
setcookie ("nombre", el nombre, ahora)
document.write ("Hola" + + "nombre!")
/ / ->
</ Script>

Inserte esto en la sección de cabecera

<SCRIPT LANGUAGE="JavaScript">
<! - Original: Bill Dortch, hIdaho Diseño (bdortch@netw.com)
<! - Comenzar
getCookieVal función (offset) (
endstr var = document.cookie.indexOf (";", offset);
if (endstr == -1)
endstr = document.cookie.length;
unescape retorno (document.cookie.substring (offset, endstr));
)
GetCookie función (nombre) (
arg var = nombre + "=";
Alen var = arg.length;
clen var = document.cookie.length;
var i = 0;
while (i <clen) (
var j = i + Alen;
if (document.cookie.substring (i, j) == arg)
volver getCookieVal (j);
i = document.cookie.indexOf ("", i) + 1;
if (i == 0)
break;
)
return null;
)
la función setcookie (nombre, valor) (
argv var = SetCookie.arguments;
argc var = SetCookie.arguments.length;
var expira = (2 <argc)? argv [2]: null;
ruta var = (3 <argc)? argv [3]: null;
var dominio = (4 <argc)? argv [4]: null;
var segura = (5 <argc)? argv [5]: falso;
document.cookie = name + "=" + escape (valor) +
((Expira == null)? ": ("; Expira = "expires.toGMTString + ())) +
((Ruta == null)? ": (" Path = "ruta de acceso +)) +
((Dominio == null)? ": ("; De dominio = "+ dominio)) +
((Seguro == true)? "Seguro": "");
)
DisplayInfo función () (
expdate var = new Date ();
var visita;
expdate.setTime (expdate.getTime () + (24 * 60 * 60 * 1000 * 365));
if (! (= la visita GetCookie ("La visita")))
visita = 0;
visita + +;
Setcookie ("La visita", visita, expdate, "/", null, false);
var mensaje;
si (la visita == 1)
message = "Bienvenidos a mi página!";
si (la visita == 2)
message = "Veo que volvió!";
si (la visita == 3)
message = "¡Oh, es usted otra vez!";
si (la visita == 4)
mensaje = "Usted debe ser curioso";
si (la visita == 5)
mensaje = "Usted es prácticamente una corriente!";
si (la visita == 6)
message = "Se necesita un hobby";
si (la visita == 7)
message = "No hay nada mejor que hacer?";
si (la visita == 8)
mensaje = "¿Es que nunca duerme?";
si (la visita == 9)
message = "Obtener un !!!"; la vida
if (visita> = 10)
mensaje = "La renta debe pagarse en la primera del mes";
alert ("\ n" + "Su navegador ha visitado esta página \ n"
+ "" + Visita + "\ n"
+ "(S )."+" \ n" + "\ n"
mensaje +);
)
ResetCounts function () (
expdate var = new Date ();
expdate.setTime (expdate.getTime () + (24 * 60 * 60 * 1000 * 365));
visita = 0;
Setcookie ("La visita", visita, expdate, "/", null, false);
history.go (0);
)
/ / End ->
</ Script>

insertar en el cuerpo de la sección

<FORM>
<CENTER>
NAME="update" <INPUT type="button" VALUE="Revisit Page" OnClick="history.go(0)">
NAME="reset" <INPUT type="button" VALUE="Reset OnClick="ResetCounts()"> Counter"
</ CENTER>
</ Form>

modificar la etiqueta <body>

<BODY Onload="DisplayInfo()">