|
|||||||||||||||
![]() <% Dim last_here ' leggo la visita precedente last_here = Request.Cookies("User")("last_here_date") ' salvo la nuova visita Response.Cookies("User").Path = "/" Response.Cookies("User").Expires = dateAdd("d", 45, Now()) Response.Cookies("User")("last_here_date") = Now() if isDate(last_here) then Response.Write ("Bentornato! La tua ultima connessione risale al ") Response.Write (last_here) else Response.Write ("In attesa di dati..") end if %> <%Response.Write(Request.ServerVariables("SERVER_NAME"))%> ▪ <%Response.Write(Request.ServerVariables("LOCAL_ADDR"))%> ▪ Url: <%Response.Write(Request.ServerVariables("SERVER_NAME"))%><%Response.Write(Request.ServerVariables("PATH_INFO"))%> Copyright © 2000-<% Response.Write Year(now) %> Diego Rispoli™ ▪ Tutti i diritti riservati - Vietata la riproduzione anche parziale Questa opera è pubblicata sotto una Licenza Creative Commons ▪ Designed & Developed by Diego Rispoli C.F. RSPDGI80E12C034A ▪ Privacy & Copyright ▪ Web: www.diegorispoli.it ▪ e-mail: diego.rispoli@gmail.com Donazioni: Postpay n° 4023 6005 6436 5007 ▪ PayPal: diego.rispoli@gmail.com Profiles: Facebook ▪ Twitter ▪ MySpace ▪ Google ▪ Netlog ▪ Live Support: Messenger ▪ Skype
|