Merry Christmas

<%
Dim msg
if date() = "25/12/2010" then
   msg = "MERRY CHRISTMAS TO ALL"
else
   msg = "Where's Santa?"
end if
Response.write msg
%>