<%
data = year(date) & "" & month(date) & "" & day(date)
oggi = day(date)
mese = month(date)
anno = year(date)
If len (mese) = "1" and len(oggi) = 1Then
data = year(date) & "0" & month(date) & "0" & day(date)
End If
If len (mese) = "1" and len(oggi) = 2Then
data = year(date) & "0" & month(date) & "" & day(date)
End If
If len (mese) = "2" and len(oggi) = 1Then
data = year(date) & "" & month(date) & "0" & day(date)
End If
%>
