This program displays a message according to the time of the day and weekday.
greeting.asp
%@ Language=VBScript %>
%
If Time >= #12:00:00 AM# and Time #12:00:00 PM# then
greeting = "Good Morning"
else
greeting = "Hello!"
End if
%>
Sub SayDate()
Response.Write("<h1>Today's date is "& Date &"</h1>")
End sub
% =greeting %>
% Call SayDate()
Response.Write("")
%>