Foro de Informatica
" Hay la misma diferencia entre un sabio y un ignorante que entre un hombre vivo y un cadáver "

- Aristóteles -



        


Google
 
Web www.ComputerFacil.com
Forista del Mes:

amateos1404


  Reply to this topicStart new topicStart Poll

> Recibir A Un Usuario Cordialmente. (cookies)
dejavi
  Publicado: Aug 25 2007, 02:03 AM
Quote Post


Tera user
Group Icon

Grupo: _Moderadores_
Mensajes: 3.657
Miembro nº: 17.695
Registrado: 18-January 07



250807.



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).

Aqui está funcionando mi reconocedor de usuarios y sus visitas:

Tu Nombre:

Y aquí el código que representa el ejemplo de arriba:

<%
'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 %>



laugh.gif






--------------------
user posted image
PMEmail Poster
Top
0 usuario(s) está(n) leyendo esta discusión (0 invitado(s) y 0 usuario(s) anónimo(s))
0 miembro(s):

Topic Options Reply to this topicStart new topicStart Poll

 


ComputerFacil.com © 2006
          Webs Afiliadas - Contacto
Ofertas PCs :: Consultor de Marketing Online :: Foros :: Posicionamiento Web :: Foros de Informatica :: Foros :: eurodipity :: elhacker