ti posto di nuovo il mio codice con la mia idea
sembra quasi che non veda la data come una stringa



if not page.ispostback then


'ora inserisco come ultimo allievo inserito
'formattazione data ****************************************
dim d as string
dim br as string
dim ora as string
d=(datetime.now.tolongdatestring())
d=replace(d,"lunedì","")
d=replace(d,"martedì","")
d=replace(d,"mercoledì","")
d=replace(d,"giovedì","")
d=replace(d,"venerdì","")
d=replace(d,"sabato","")
d=replace(d,"domenica","")
d=replace(d,"gennaio","gen")
d=replace(d,"febbraio","feb")
d=replace(d,"marzo","mar")
d=replace(d,"aprile","apr")
d=replace(d,"maggio","mag")
d=replace(d,"giugno","giu")
d=replace(d,"luglio","lug")
d=replace(d,"agosto","ago")
d=replace(d,"settembre","set")
d=replace(d,"ottobre","ott")
d=replace(d,"novembre","nov")
d=replace(d,"dicembre","dic")
d=replace(d,"2005","05")
d=replace(d,"2006","06")
d=replace(d,"2007","07")
d=replace(d,"2008","08")
d=replace(d,"2009","09")
d=replace(d,"2010","10")
d=replace(d,"2011","11")


br="
"
ora=(datetime.now.toshorttimestring())
dim dataeora as string
dataeora=d

response.Write(dataeora & "

")

dim timex as string
timex="27 giu 2013"


if (timex=dataeora) then
response.Write("ok")
else
response.Write("no")


end if




end if