::: AVVISO AI VISITATORI E AGLI UTENTI REGISTRATI:::

LAVORI IN CORSO PER IL NUOVO GRISUS.COM. LA VERSIONE 2.0 SARA' RILASCIATA PRIMA DELLA PARTENZA DEL GRISUS PER BARCELLONA, ANCHE SE SI TRATTERA' DI UNA VERSIONE BETA, SPERIMENTALE.

Messaggio di benvenuto in base all'ora corrente

 CODICE IN AZIONE:

Buonanotte carissimo utente!

Codice sottostante

<%

Dim orario, messaggio

Orario = Hour(Now())

if (orario>=7) and (orario<13) then
messaggio = "Buongiorno"
elseif (orario>=13) and (orario<20) then
messaggio = "Buon pomeriggio"
elseif (orario>=20) then
messaggio = "Buonasera"
else
messaggio = "Buonanotte"
end if


Response.write "<p>" & messaggio &_
" carissimo utente!</p>"

%>

Giorni mancanti ad una data

 CODICE IN AZIONE:
Mancano ancora -2548 giorni al compleanno del grisus

Codice sottostante

<%

StartDate = Now()
EndDate = CDate ("30/5/2005")

DaysLeft = DateDiff("d", StartDate, EndDate )

Response.Write "Mancano ancora " & DaysLeft
Response.Write(" giorni al compleanno del grisus")
%>