Recibir a un usuario cordialmente. (Cookies)
Trabajaremos con las Cookies para almacenar el nombre del visitante y la cantidad de veces que visitó la página. Para ello mostraremos un formulario, donde se preguntará por el nombre de la persona. Al completarlo, creamos una cookie que contenga la informacion del nombre, y otra que lleve la cuenta de sus visitas. Cada vez que entra, comprobamos la existencia de la cookie con el nombre. Si no existe, es que nunca llenó el formulario, entonces se lo mostramos. En cambio si la cookie existe, no mostramos el formulario, y mostramos la información que contienen las galletas (cookies).
<%
Declaro la varible visit, con la cual modificaré el valor de las visitas.
Dim visit
Pregunto si el form se relleno recien.
if Request.Form <> "" then
response.Cookies("nombre").Expires = "1/1/2005"
Si se cumple, creo las cookies para este usuario nuevo.
response.Cookies("nombre") = Request.Form("nombre")
end If
Verifico la existencia de la cookie("nombre").
if Request.Cookies("nombre") <> "" then
Si existe la cookie, muestro los datos.
response.Write "Hola <B>"&Request.Cookies("nombre")&"</B>"
Modifico el valor de la cookie("visitas"), dandole el valor de la variable
visit (modificada arriba).
si no existe, muestro el formulario .
else
%>
<FORM METHOD="post" ACTION="misma_pagina.asp">
Tu Nombre: <INPUT name=nombre>
<INPUT TYPE="submit" VALUE="Enviar">
</FORM>
<% end if %>Observación:
Cuidado con el tema de los encabezados HTTP. Una forma de solucionar este conflicto es agregar la linea <% response.Buffer = true %> al comienzo de la página ASP